OFFSET
1,2
COMMENTS
A136904 is a subsequence. - Zak Seidov, Dec 03 2012
LINKS
Zak Seidov, Table of n, a(n) for n = 1..2000
FORMULA
a(n) = sqrt(A030098(n)). - Zak Seidov, Dec 03 2012
MATHEMATICA
Select[ Range[ 3000 ], Union[ EvenQ[ IntegerDigits[ #^2 ] ] ] == {True} & ]
PROG
(PARI) is_A030097(n)=!setminus(Set(Vec(Str(n^2))), Vec("02468")) \\ M. F. Hasler, Dec 13 2011
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
More terms from Zak Seidov, May 24 2010
STATUS
approved