A183208 Iterates of f(x)=floor((3x-1)/2) from x=6.

6, 8, 11, 16, 23, 34, 50, 74, 110, 164, 245, 367, 550, 824, 1235, 1852, 2777, 4165, 6247, 9370, 14054, 21080, 31619, 47428, 71141, 106711, 160066, 240098, 360146, 540218, 810326, 1215488, 1823231, 2734846, 4102268, 6153401, 9230101, 13845151

Offset

1,1

Links

Table of n, a(n) for n=1..38.

Formula

Iterates of f(x)=floor((3x-1)/2) from x=6.

Example

a(1)=6; a(2)=f(a(1))=8; a(3)=f(a(2))=11.

Mathematica

x=6; Join[{x}, Table[x=Floor[(3*x-1)/2], {n, 0, 36}]]
f[x_]:=Floor[(3x-1)/2]; NestList[f, 6, 37]

Prog

(PARI) v=vector(100); v[1]=6; for(n=2, #v, v[n]=floor((3*v[n-1]-1)/2)); v

Crossrefs

Cf. A183207, A178931.

Sequence in context: A167499 A020716 A020937 * A048586 A080824 A100602

Adjacent sequences: A183205 A183206 A183207 * A183209 A183210 A183211

Keyword

nonn

Author

Clark Kimberling, Dec 30 2010

Status

approved