OFFSET
1,2
PROG
(PARI) T(n, k) = n\10^(k-1)%10; \\ A031298
lista(nn) = my(j=0, list = List()); for (n=0, nn, for (k=1, #Str(n), if (T(n, k) == 0, listput(list, j)); j++; ); ); Vec(list); \\ Michel Marcus, Jan 26 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
0 added by Arkadiusz Wesolowski, Jan 10 2012
STATUS
approved