A327617 a(n) is the least integer k such that digit_sum(A007494(n)*k) = digit_sum(A007494(n)+k).
0, 2, 6, 8, 3, 5, 9, 2, 6, 8, 3, 32, 9, 2, 6, 35, 3, 5, 9, 20, 6, 17, 66, 14, 9, 11, 6, 8, 3, 14, 9, 2, 15, 17, 3, 5, 63, 11, 6, 8, 3, 23, 18, 11, 33, 8, 3, 5, 27, 2, 6, 8, 3, 50, 18, 2, 6, 35, 3, 5, 18, 2, 6, 44, 3, 41, 90, 2, 6, 35, 3, 32, 90, 2, 186, 62, 3, 32, 9, 20, 6
Offset: 1
Programs
-
PARI
lista(nn) = {for (n=0, nn, if ((n%3) != 1, my(k=0); while(sumdigits(n+k) != sumdigits(n*k), k++); print1(k, ", ");););} \\ Michel Marcus, Sep 19 2019
Comments