|
Search: id:A058369
|
|
|
| A058369 |
|
Numbers n such that n and n^2 have same digit sum. |
|
+0
4
|
|
| 0, 1, 9, 10, 18, 19, 45, 46, 55, 90, 99, 100, 145, 180, 189, 190, 198, 199, 289, 351, 361, 369, 379, 388, 450, 451, 459, 460, 468, 495, 496, 550, 558, 559, 568, 585, 595, 639, 729, 739, 775, 838, 855, 900, 954, 955, 990, 999, 1000
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
MAPLE
|
P:=proc(n) local i, k, w, x; for i from 1 by 1 to n do w:=0; k:=i; while k>0 do w:=w+k-(trunc(k/10)*10); k:=trunc(k/10); od; x:=0; k:=i^2; while k>0 do x:=x+k-(trunc(k/10)*10); k:=trunc(k/10); od; if x=w then print(i); fi; od; end: P(10000); - Paolo P. Lava (ppl(AT)spl.at), Nov 30 2007
|
|
CROSSREFS
|
Cf. A007953, A058370, A058852.
Sequence in context: A107433 A090570 A131417 this_sequence A110939 A015898 A050551
Adjacent sequences: A058366 A058367 A058368 this_sequence A058370 A058371 A058372
|
|
KEYWORD
|
base,easy,nice,nonn
|
|
AUTHOR
|
G. L. Honaker, Jr. (honak3r(AT)bvunet.net), Dec 17 2000
|
|
|
Search completed in 0.002 seconds
|
