OFFSET
1,2
COMMENTS
Generated with DrScheme.
Conjecture: The only squares present in the sequence are 1, 9, and 441. - Stefano Spezia, Apr 18 2024
LINKS
Jonathan Wellons, Table of n, a(n) for n = 1..49
Jonathan Wellons, Tables of Shared Digits [archived]
EXAMPLE
95819859194191^2 = 9181445415994589515848144481.
MATHEMATICA
Select[Range[10^6], SubsetQ[{1, 4, 5, 8, 9}, Union[IntegerDigits[#], IntegerDigits[#^2]]]&] (* Stefano Spezia, Apr 18 2024 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
STATUS
approved