login
A136903
Numbers k such that k and k^2 use only the digits 0, 2, 4, 6 and 7.
1
0, 2, 20, 26, 200, 260, 474, 2000, 2600, 2602, 4740, 4762, 20000, 20602, 26000, 26020, 26602, 47400, 47620, 77474, 77602, 200000, 206020, 260000, 260200, 266020, 474000, 476200, 476474, 476662, 774740, 776020, 2000000, 2006002, 2060200, 2060762, 2600000, 2602000, 2647026, 2660200, 4474674, 4740000, 4762000, 4764740, 4766620, 7747400
OFFSET
1,2
COMMENTS
Generated with DrScheme.
LINKS
J. Wellons, Tables of Shared Digits [archived]
EXAMPLE
776020464064074^2 = 602207760646220766424777477476.
MATHEMATICA
Module[{d={0, 2, 4, 6, 7}}, Select[FromDigits/@Tuples[d, 7], SubsetQ[d, IntegerDigits[ #^2]]&]] (* Harvey P. Dale, Nov 27 2022 *)
CROSSREFS
Sequence in context: A108061 A154546 A108342 * A078460 A059208 A268742
KEYWORD
base,nonn
AUTHOR
Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
STATUS
approved