A184857 Numbers k such that floor(k*e/(e-1)) is prime.

2, 5, 7, 11, 15, 20, 24, 26, 30, 34, 39, 45, 50, 53, 64, 68, 69, 72, 83, 87, 88, 96, 106, 115, 121, 122, 125, 126, 134, 141, 144, 145, 159, 163, 178, 179, 197, 198, 201, 221, 227, 232, 236, 240, 246, 251, 254, 259, 265, 273, 274, 278, 284, 289, 292, 293, 303, 308, 311, 316, 318, 322, 331, 342, 346, 356, 360, 361, 365, 375, 379, 380, 384, 388, 399, 407, 409, 413, 417, 418, 426, 428, 432, 437, 455, 460, 470, 475, 479, 489, 498, 504, 512, 513, 519, 523, 542, 543, 546, 555, 557, 561, 576, 581, 595, 599

Offset: 1

Author

Clark Kimberling, Jan 23 2011

Keywords

• nonn

Examples

			See A077545.
		

Crossrefs

Cf. A077545, A184856, A184858.

Programs

Mathematica

(See A077545.)
Select[Range[600],PrimeQ[Floor[# E/(E-1)]]&]  (* Harvey P. Dale, Jan 25 2011 *)