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!)
A046831 Digits of n^2 include digits of n as substring, n does not end in 0. 6
1, 5, 6, 25, 76, 376, 625, 3792, 9376, 14651, 90625, 109376, 495475, 505025, 890625, 971582, 1713526, 2890625, 4115964, 5133355, 6933808, 7109376, 10050125, 12890625, 48588526, 50050025, 66952741, 87109376, 88027284, 88819024 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Giovanni Resta, Table of n, a(n) for n = 1..64

MATHEMATICA

Reap[For[n = 1, n < 10^8, n++, If[Mod[n, 10] != 0, If[StringPosition[ToString[n^2], ToString[n]] != {}, Print[n]; Sow[n]]]]][[2, 1]] (* Jean-François Alcover, Apr 04 2013 *)

PROG

(Haskell)

a046831 n = a046831_list !! (n-1)

a046831_list = filter ((> 0) . (`mod` 10)) a018834_list

-- Reinhard Zumkeller, Jul 27 2011

CROSSREFS

Cf. A018834, A003226, A008851.

Sequence in context: A034497 A136888 A038248 * A003226 A088834 A137081

Adjacent sequences:  A046828 A046829 A046830 * A046832 A046833 A046834

KEYWORD

nonn,base

AUTHOR

David W. Wilson

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 June 16 16:02 EDT 2021. Contains 345063 sequences. (Running on oeis4.)