OFFSET
1,2
COMMENTS
a(n)=a(0)*(3^(n-i))/(2^i) + c where c is in the range (0..sum(i*3^(n-i))). Sum(i*3^(n-i)) for i=1 to n equals A001793 (coefficients of Chebyshev polynomials). Max a(n) = 3^n*(a(0)/3^i*2^i + 9/4) - ((2*n+5)/4) which for large n gives max a(n) ~ 2.25*3^n - n/2. - Ctibor O. Zizka, Dec 26 2007
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
nxt[{n_, a_}]:={n+1, If[OddQ[a], 3a+n, a/2]}; NestList[nxt, {1, 1}, 70][[;; , 2]] (* Harvey P. Dale, Oct 01 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Ctibor O. Zizka, Dec 04 2007
EXTENSIONS
Corrected and extended by Harvey P. Dale, Oct 01 2024
STATUS
approved