login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A052076 List of cubes p^3 of primes with property that next prime after p is a substring of p^3. 4
1331, 1030301, 11224377919, 40343019516073, 83964379378069, 153551511228149, 153548930496746303, 214889691497505989703913, 79943078473759892945966959, 16573430415736921632549592733, 22837138677705447754568672309, 940309072235302647342697969346063 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
LINKS
MATHEMATICA
f[0]=8; f[n_]:=Module[{i=PrimePi[f[n-1]^(1/3)]+1},
While[StringPosition[ToString[Prime[i]^3], ToString[NextPrime[Prime[i]]]]=={}, i++]; Prime[i]^3]; f/@Range[7] (* Ivan N. Ianakiev, Nov 16 2016 *)
#^3&/@Select[Prime[Range[10^6]], SequenceCount[IntegerDigits[#^3], IntegerDigits[ NextPrime[ #]]]> 0&] (* Harvey P. Dale, Jul 29 2023 *)
CROSSREFS
Sequence in context: A076443 A278936 A263613 * A013795 A013860 A052072
KEYWORD
nonn,base,nice
AUTHOR
Patrick De Geest, Jan 15 2000
EXTENSIONS
More terms from Sam Handler (sam_5_5_5_0(AT)yahoo.com), Sep 12 2006
Definition clarified by Charles R Greathouse IV, Dec 24 2014
a(12) from Giovanni Resta, Jul 02 2018
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 05:02 EDT 2024. Contains 371235 sequences. (Running on oeis4.)