A326833 Numbers whose sum of digits is a power of 10.
1, 10, 19, 28, 37, 46, 55, 64, 73, 82, 91, 100, 109, 118, 127, 136, 145, 154, 163, 172, 181, 190, 208, 217, 226, 235, 244, 253, 262, 271, 280, 307, 316, 325, 334, 343, 352, 361, 370, 406, 415, 424, 433, 442, 451, 460, 505, 514, 523, 532, 541, 550, 604, 613
Offset: 1
Links
- Alois P. Heinz, Table of n, a(n) for n = 1..43758 (all terms with up to 9 digits)
Programs
-
Maple
q:= n-> (m-> m>0 and m=10^ilog[10](m))(add(i, i=convert(n, base, 10))): select(q, [$1..1000])[];
-
PARI
isok(n) = my(s=sumdigits(n), k); (s==1) || (s==10) || (ispower(s,,&k) && (k==10)); \\ Michel Marcus, Oct 21 2019