|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Generated with DrScheme.
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
|
|
STATUS
|
approved
|
|
|
|