OFFSET
0,2
LINKS
Robert Israel, Table of n, a(n) for n = 0..2500
MAPLE
N:= 100: # for a(0)..a(N)
S:= sort([seq(seq(2^i*6^j, i=0..ilog2(2^N/6^j)), j=0..floor(log[6](2^N)))]):
seq(ListTools:-BinarySearch(S, 2^i), i=0..N); # Robert Israel, Jan 12 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Offset corrected by Robert Israel, Jan 12 2021
STATUS
approved