login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A163442 Primes of the form floor((p/3)^3), where p is prime. 2
181, 1103, 40471, 143329, 212419, 266261, 468493, 14586401, 20948491, 48894061, 53298877, 86546399, 136061111, 150851969, 189448891, 227353303, 249650309, 256855171, 328033129, 361451309, 507533053, 710528249, 815653171, 1172016731 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

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

EXAMPLE

(17/3)^3=181.963 -> 181, (31/3)^3=1103.37 -> 1103, (103/3)^3=40471.4 -> 40471

MATHEMATICA

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

Select[Table[Floor[(p/3)^3], {p, Prime[Range[800]]}], PrimeQ] (* Harvey P. Dale, Dec 16 2017 *)

PROG

(PARI) forprime(p=2, 1e3, n=p^3\27; if(isprime(n), print1(n", ")))

CROSSREFS

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

Sequence in context: A229877 A067383 A107255 * A268520 A235975 A137530

Adjacent sequences:  A163439 A163440 A163441 * A163443 A163444 A163445

KEYWORD

nonn

AUTHOR

Vladimir Joseph Stephan Orlovsky, Jul 27 2009

EXTENSIONS

Program and editing by Charles R Greathouse IV, Nov 09 2009

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 11 15:39 EDT 2020. Contains 335626 sequences. (Running on oeis4.)