OFFSET
1,1
COMMENTS
LINKS
FORMULA
a(n) = floor(-LambertW(-1, -(1/3)*log(2)*2^(3/2-n))/log(2) + 1/2). - Nicolas Normand (Nicolas.Normand(at)polytech.univ-nantes.fr), Nov 29 2017
MAPLE
a:=proc(n) floor(-LambertW(-1, -1/3*ln(2)*2^(3/2-n))/ln(2)+1/2) end:
seq(a(n), n=1..70); # Simon Plouffe, Nov 29 2017
MATHEMATICA
Complement[Range[m = 100], LinearRecurrence[{1, 2}, {0, 1}, m]] (* Jean-François Alcover, Feb 13 2018 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Nov 08 2008
STATUS
approved