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 A191289 #7 Nov 17 2016 12:13:57 %S A191289 1,2,4,5,11,14,16,25,32,41,47,74,95,121,122,140,196,221,256,284,362, %T A191289 365,419,587,625,662,767,851,1024,1085,1094,1256,1681,1760,1874,1985, %U A191289 2209,2300,2552,3071,3254,3281,3767,5042,5279,5476,5621,5954,6626,6899,7655,9025,9212,9761,9842,11300,14641,14884,15125,15836 %N A191289 Increasing sequence generated by these rules: a(1)=1, and if x is in a then 3x-1 and x^2 are in a. %C A191289 See A191203. %H A191289 Ivan Neretin, <a href="/A191289/b191289.txt">Table of n, a(n) for n = 1..10000</a> %e A191289 1 -> 2 -> 4,5 -> 11,14,16,25 -> %t A191289 g = 11; Union[Flatten[NestList[{-1 + 3 #, #^2} &, 1, g]]] %t A191289 (* A191289; use g>9 to get all of first 60 terms *) %Y A191289 Cf. A191203. %K A191289 nonn %O A191289 1,2 %A A191289 _Clark Kimberling_, May 29 2011