A163443 Primes p such that floor(p^3/27) is prime.

17, 31, 103, 157, 179, 193, 233, 733, 827, 1097, 1129, 1327, 1543, 1597, 1723, 1831, 1889, 1907, 2069, 2137, 2393, 2677, 2803, 3163, 3257, 3433, 3617, 3797, 4261, 4999, 5233, 5237, 5309, 5449, 5701, 5939, 6079, 6173, 6637, 6781, 6961, 7069, 7321, 7879

Offset

1,1

Links

G. C. Greubel, Table of n, a(n) for n = 1..1000

Example

p=17 is in the sequence because [17/3)^3] =[181.963] =181 is prime.
p=31 is in the sequence because [(31/3)^3] =[1103.37] =1103 is prime.

Mathematica

f[n_]:=IntegerPart[(p/3)^3]; lst={}; Do[p=Prime[n]; If[PrimeQ[f[p]], AppendTo[lst, p]], {n, 7!}]; lst

Crossrefs

Cf. A162652, A163418, A163419, A163420, A163421, A163422, A163424, A163425, A163426, A163427, A163428, A163429, A163430, A163431, A163442

Sequence in context: A370851 A164041 A085598 * A339181 A027722 A060342

Adjacent sequences: A163440 A163441 A163442 * A163444 A163445 A163446

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Jul 27 2009

Extensions

Introduced standard terminology in the definition - R. J. Mathar, Aug 02 2009

Status

approved