OFFSET
1,2
COMMENTS
Generated with DrScheme.
LINKS
Jonathan Wellons, Table of n, a(n) for n = 1..1036
J. Wellons, Tables of Shared Digits [archived]
EXAMPLE
5005050005005^2 = 25050525552600550525050025.
MATHEMATICA
odQ[n_]:=Module[{idn2=IntegerDigits[n^2]}, And@@Table[MemberQ[{0, 2, 5, 6}, idn2[[i]]], {i, Length[idn2]}]]; Union[Flatten[Table[Select[FromDigits/@ Tuples[{0, 2, 5, 6}, d], odQ], {d, 6}]]] (* Harvey P. Dale, Jul 17 2012 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
STATUS
approved