OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
MATHEMATICA
a[n_]:= a[n]= 13 +Quotient[Sum[a[k], {k, n-1}], 2];
Table[a[n], {n, 60}] (* G. C. Greubel, May 11 2023 *)
PROG
CROSSREFS
KEYWORD
nonn
AUTHOR
Graeme McRae, Jun 10 2006
STATUS
approved