login
A086813
a(1)=1 then a(n)= (1/2) *(5*a(n-1)+1) if a(n-1) is odd, a(n)=3/2*a(n-1) otherwise.
0
1, 3, 8, 12, 18, 27, 68, 102, 153, 383, 958, 1437, 3593, 8983, 22458, 33687, 84218, 126327, 315818, 473727, 1184318, 1776477, 4441193, 11102983, 27757458, 41636187, 104090468, 156135702, 234203553, 585508883, 1463772208, 2195658312
OFFSET
1,2
FORMULA
It appears that limit n ->infinity log(a(n))/n exists and = 0.660...
MATHEMATICA
NestList[If[OddQ[#], (5#+1)/2, (3#)/2]&, 1, 40] (* Harvey P. Dale, Apr 28 2012 *)
CROSSREFS
Sequence in context: A063225 A213238 A005660 * A287081 A352814 A294482
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Aug 06 2003
STATUS
approved