login
A046834
Internal digits of n^2 include digits of n as subsequence.
2
50, 60, 250, 500, 600, 760, 1050, 2050, 2500, 3050, 3628, 3710, 3760, 3792, 4050, 4410, 5000, 5010, 5050, 5060, 5250, 6000, 6010, 6050, 6250, 6760, 7050, 7560, 7600, 8050, 8250, 8260, 8882, 9050, 9460, 10050, 10500, 14650, 14651, 20050, 20500
OFFSET
1,1
COMMENTS
If n is a member then so is 10*n. - Robert Israel, May 07 2020
LINKS
David A. Corneth, Table of n, a(n) for n = 1..10000 (first 5000 terms from Robert Israel)
EXAMPLE
a(7) = 1050 is a term because 1050^2 = 1102500; remove the first and last to get internal digits 10250, and 1050 is a subsequence of 10250. - Robert Israel, May 07 2020
MAPLE
filter:= n -> StringTools:-IsSubSequence(sprintf("%d", n), sprintf("%d", n^2)[2..-2]):
select(filter, [$10..30000]); # Robert Israel, May 07 2020
PROG
(Python)
from itertools import count, islice
def A046834_gen(startvalue=1): # generator of terms >= startvalue
for k in count(max(startvalue, 1)):
c = iter(str(k**2)[1:-1])
if all(map(lambda b:any(map(lambda a:a==b, c)), str(k))):
yield k
A046834_list = list(islice(A046834_gen(), 20)) # Chai Wah Wu, Apr 03 2023
CROSSREFS
Sequence in context: A282112 A172468 A046832 * A046836 A062118 A167329
KEYWORD
nonn,base,easy
STATUS
approved