A184858 Numbers m such that prime(m) is of the form floor(k*e/(e-1)); complement of A184855.

2, 4, 5, 7, 9, 11, 12, 13, 15, 16, 18, 20, 22, 23, 26, 28, 29, 30, 32, 33, 34, 36, 39, 42, 43, 44, 45, 46, 47, 48, 49, 50, 54, 55, 60, 61, 64, 65, 66, 70, 72, 73, 74, 75, 77, 78, 79, 80, 81, 83, 84, 85, 87, 88, 89, 90, 92, 93, 94, 95, 96, 97, 99, 100, 101, 103, 104, 105, 106, 108, 109, 110, 111, 112, 115, 117, 118, 119, 120, 121, 122, 123, 124, 125, 128, 129, 132, 133, 134, 137, 138, 139, 140, 141, 142, 144, 148, 149, 150, 151, 152, 154, 156, 157, 160, 161

Offset

1,1

Links

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

Example

See A077545.

Mathematica

PrimePi[Select[Floor[Range[1000] E/(E-1)], PrimeQ]]

Crossrefs

Cf. A077545, A184855.

Sequence in context: A256228 A114055 A169581 * A083026 A047379 A093848

Adjacent sequences: A184855 A184856 A184857 * A184859 A184860 A184861

Keyword

nonn

Author

Clark Kimberling, Jan 23 2011

Status

approved