|
| |
|
|
A061677
|
|
When squared gives number composed just of the digits 1, 2, 3, 4.
|
|
0
| |
|
|
1, 2, 11, 12, 18, 21, 38, 111, 182, 338, 462, 482, 1111, 1188, 1488, 1521, 2079, 3338, 3368, 3482, 3512, 3639, 4818, 5868, 10688, 11011, 12018, 17639, 17979, 18012, 20521, 20771, 20838, 21079, 33338, 33368, 33632, 34962, 36361, 37739, 37962
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
MATHEMATICA
| Do[ If[ Union[ Join[ {1, 2, 3, 4}, IntegerDigits[n^2] ] ] == {1, 2, 3, 4}, Print[n] ], {n, 0, 200000} ]
|
|
|
CROSSREFS
| Sequence in context: A087339 A160948 A136971 * A110126 A125020 A065020
Adjacent sequences: A061674 A061675 A061676 * A061678 A061679 A061680
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 23 2001
|
| |
|
|
