This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A183208 #8 Mar 30 2012 18:57:12 %S A183208 6,8,11,16,23,34,50,74,110,164,245,367,550,824,1235,1852,2777,4165, %T A183208 6247,9370,14054,21080,31619,47428,71141,106711,160066,240098,360146, %U A183208 540218,810326,1215488,1823231,2734846,4102268,6153401,9230101,13845151 %N A183208 Iterates of f(x)=floor((3x-1)/2) from x=6. %F A183208 Iterates of f(x)=floor((3x-1)/2) from x=6. %e A183208 a(1)=6; a(2)=f(a(1))=8; a(3)=f(a(2))=11. %t A183208 x=6; Join[{x}, Table[x=Floor[(3*x-1)/2], {n,0,36}]] %t A183208 f[x_]:=Floor[(3x-1)/2]; NestList[f,6,37] %o A183208 (PARI) v=vector(100); v[1]=6; for(n=2,#v,v[n]=floor((3*v[n-1]-1)/2)); v %Y A183208 Cf. A183207, A178931. %K A183208 nonn %O A183208 1,1 %A A183208 _Clark Kimberling_, Dec 30 2010