A266315 Numbers n such that 2*n and n^3 have the same digit sum.
0, 171, 324, 378, 468, 684, 1710, 3240, 3780, 4680, 6840, 17100, 28845, 29241, 32400, 34884, 37800, 46800, 46944, 48924, 68400, 69174, 84348, 171000, 242424, 288450, 292410, 324000, 348840, 378000, 467424, 468000, 469440, 489240, 493794, 684000, 691740
Offset: 1
Examples
171 is in the sequence because 171^3 = 5000211 and 2*171 = 342 have the same digit sum: 9.
Links
- G. C. Greubel, Table of n, a(n) for n = 1..160
Programs
-
Magma
[n: n in [0..2*10^6] | &+Intseq(2*n) eq &+Intseq(n^3)];
-
Mathematica
Select[Range[0, 7 10^5], Total[IntegerDigits[2 #]] == Total[IntegerDigits[#^3]] &]
-
PARI
isok(n) = sumdigits(2*n)==sumdigits(n^3); \\ Michel Marcus, Jan 02 2016