A160233 Numbers k such that k is a member of A002183 but 2*k is not.
1280, 1600, 4800, 28672, 131072, 688128, 6881280, 7864320, 39321600, 43253760, 94371840, 201326592, 528482304, 9663676416, 115964116992, 241591910400, 265751101440, 347892350976, 811748818944, 3522410053632, 4174708211712, 21646635171840, 23811298689024, 27058293964800
Offset: 1
Keywords
Examples
1280 qualifies because 1280 is a member of A002183 but 1280*2 = 2560 is not.
Links
- Amiram Eldar, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
(* capture the terms in the b002183.txt file: "Number of divisors of n-th highly composite number" and assign it to the variable 's' *) Select[ Take[s, 964], !MemberQ[s, 2 # ] &] (* Robert G. Wilson v, May 09 2009 *)
Extensions
More terms from Robert G. Wilson v, May 09 2009
More terms from Amiram Eldar, Nov 13 2019