OFFSET
1,1
COMMENTS
The complement of A027883.
EXAMPLE
In the sequence A000961 (2,3,4,5,7,8,9,11,13,16,
17,19,23,25,27,...) of prime powers p^n for n>=1, the
composites 4,8,9,16,25,27,... occur with ranks
3,6,7,10,14,15...
MATHEMATICA
T[i_, j_]:=Sum[Floor[j*Log[Prime[i]]/Log[Prime[h]]], {h, 1, PrimePi[Prime[i]^j]}]; Complement[Range[200], Table[Flatten[Table[T[i, j], {i, 1, 80}, {j, 1, 1}]]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Dec 13 2010
STATUS
approved