login
A188443
Numbers not appearing in A178133, which gives the number of odd semiprimes between consecutive squares.
2
25, 33, 63, 66, 75, 88, 191, 269, 285, 309, 348, 379, 399, 400, 404, 413, 437, 443, 456, 548, 553, 594, 616, 638, 675, 684, 702, 724, 764, 810, 819, 823, 829, 843, 897, 901, 906, 907, 1000, 1031, 1041, 1068, 1075, 1159, 1200, 1230, 1241, 1255, 1279, 1280, 1281, 1300, 1323, 1332
OFFSET
1,1
MATHEMATICA
lst={}; k=0; s=4; Do[If[OddQ[n]&&Last/@FactorInteger[n]=={1, 1}, If[n<s^2, k++, AppendTo[lst, k]; k=1; s++]], {n, 2*10^8}]; Complement[Range@3000, Union@lst]
CROSSREFS
Cf. A178133.
Sequence in context: A269345 A134099 A129074 * A068411 A020160 A075452
KEYWORD
nonn
AUTHOR
STATUS
approved