OFFSET
1,2
COMMENTS
If m belongs to the sequence, then 1000*m also belongs to the sequence. - Rémy Sigrist, Jan 12 2020
EXAMPLE
a(11) = 243: 243/(2 + 4 + 3) = 27 = 3^3.
a(12) = 320: 320/(3 + 2 + 0) = 64 = 4^3.
MATHEMATICA
Select[Range[100000], IntegerQ[CubeRoot[#/Total[IntegerDigits[#]]]] &]
PROG
(Magma) [n : n in[1 .. 1000] | IsIntegral((n/(&+Intseq(n)))^(1/3))];
(PARI) is(n) = my (k=n/sumdigits(n)); type(k)==type(42) && ispower(k, 3) \\ Rémy Sigrist, Jan 12 2020
CROSSREFS
KEYWORD
nonn,base
AUTHOR
K. D. Bajpai, Jan 12 2020
STATUS
approved