A070944 Complement of A002036.

1, 2, 8, 25, 29, 40, 51, 53, 56, 77, 85, 97, 117, 120, 124, 132, 140, 145, 148, 154, 162, 170, 177, 178, 183, 186, 187, 188, 192, 195, 201, 207, 216, 222, 223, 226, 227, 229, 236, 242, 245, 251, 254, 256, 259, 267, 275, 277, 280, 282, 284, 285, 289, 299, 300

Offset

1,2

Links

Table of n, a(n) for n=1..55.

Mathematica

Complement[ Table[n, {n, 1, 350}], Union[ Table[ Round[ Prime[n] / Log[ Prime[n]]], {n, 1, 500}]]]

Crossrefs

Cf. A002036.

Sequence in context: A118855 A009515 A309088 * A278836 A227447 A077167

Adjacent sequences: A070941 A070942 A070943 * A070945 A070946 A070947

Keyword

nonn

Author

Robert G. Wilson v, May 16 2002

Status

approved