OFFSET
1,2
MATHEMATICA
Complement[ Table[n, {n, 1, 350}], Union[ Table[ Round[ Prime[n] / Log[ Prime[n]]], {n, 1, 500}]]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, May 16 2002
STATUS
approved