login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A274932 Squares n = k^2 with the property that nextprime(k) is a substring of n. 3
529, 729, 6889, 12769, 162409, 644809, 851929, 1261129, 47969476, 64048009, 317837584, 1600240009, 2822053129, 24421563076, 40001200009, 84290347584, 107667328129, 145381301521, 160002400009, 437766166321, 788815751409 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Chai Wah Wu, Table of n, a(n) for n = 1..39 (all terms < 4*10^18)

EXAMPLE

529 = 23^2, and nextprime(23) = 29 is a substring of 529, so 529 is a term.

MATHEMATICA

Select[Range[2*10^6]^2, SequenceCount[IntegerDigits[#], IntegerDigits[ NextPrime[ Sqrt[ #]]]]>0&] (* The program uses the SequenceCount function from Mathematica version 10 *) (* Harvey P. Dale, Jul 13 2016 *)

Select[Range[2*10^6], {} != StringPosition @@ ToString /@ {#^2, NextPrime@ #} &]^2] (* Giovanni Resta, Jul 15 2016 *)

CROSSREFS

Suggested by A052074.

Sequence in context: A045788 A181414 A020289 * A082409 A066742 A067475

Adjacent sequences:  A274929 A274930 A274931 * A274933 A274934 A274935

KEYWORD

nonn,base

AUTHOR

Harvey P. Dale and N. J. A. Sloane, Jul 13 2016

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 18 07:10 EDT 2019. Contains 325134 sequences. (Running on oeis4.)