OFFSET
0,1
COMMENTS
MAPLE
Digits:=100; seq(ceil((3-sqrt(3))*4^(n-3)) + 1, n=0..30);
MATHEMATICA
With[{c=3-Sqrt[3]}, Ceiling[c*4^Range[-3, 30]]+1] (* Harvey P. Dale, Jan 27 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Jorge Coveiro, Dec 25 2004
STATUS
approved