OFFSET
1,2
COMMENTS
The sequence is infinite since if m = 10^(2*j) then m^3 / digitsum(m) = m^(6*k). - Marius A. Burtea, Dec 21 2018
LINKS
Colin Barker, Table of n, a(n) for n = 1..1000
EXAMPLE
192 is in the sequence because the digital sum of 192 is 12, and 192^3/12 = 589824 = 768^2.
PROG
(PARI)
s=[]; for(n=1, 5000, d=sumdigits(n); if(n^3%d==0 && issquare(n^3\d), s=concat(s, n))); s
(Magma) [n: n in [1..1500] | IsIntegral((n^3)/(&+Intseq(n))) and IsSquare((n^3)/(&+Intseq(n)))]; // Marius A. Burtea, Dec 21 2018
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Colin Barker, Jan 30 2014
STATUS
approved