OFFSET
1,2
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
f:= proc(x) local r;
r:= convert(x, base, 7);
add((1+2*r[i])*14^(i-1), i=0..nops(r))
end proc:
seq(seq(f(x)-3*14^d, x=7^d..2*7^d-1), d=1..3); # Robert Israel, Mar 30 2018
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved