OFFSET
1,3
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
N:= 10^8: # for 2^i*9^j <= N
B:= sort([seq(seq(2^i*9^j, i=0..ilog2(N/9^j)), j=0..floor(log[9](N)))]):
map(padic:-ordp, B, 2); # Robert Israel, Jun 08 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved