This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A160233 #13 Nov 13 2019 10:15:45 %S A160233 1280,1600,4800,28672,131072,688128,6881280,7864320,39321600,43253760, %T A160233 94371840,201326592,528482304,9663676416,115964116992,241591910400, %U A160233 265751101440,347892350976,811748818944,3522410053632,4174708211712,21646635171840,23811298689024,27058293964800 %N A160233 Numbers k such that k is a member of A002183 but 2*k is not. %H A160233 Amiram Eldar, <a href="/A160233/b160233.txt">Table of n, a(n) for n = 1..1000</a> %e A160233 1280 qualifies because 1280 is a member of A002183 but 1280*2 = 2560 is not. %t A160233 (* 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 *) %Y A160233 Cf. A002182, A002183. %K A160233 nonn %O A160233 1,1 %A A160233 _J. Lowell_, May 04 2009 %E A160233 More terms from _Robert G. Wilson v_, May 09 2009 %E A160233 More terms from _Amiram Eldar_, Nov 13 2019