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 A191325 #8 May 17 2018 21:20:38 %S A191325 1,2,3,4,5,6,7,9,10,12,13,15,17,18,19,22,25,27,28,30,32,33,37,40,42, %T A191325 45,47,48,49,55,60,62,63,67,70,72,73,75,80,82,90,92,93,94,100,105,108, %U A191325 109,112,117,120,122,123,135,137,138,139,141,150,155,157,162,163,167,168,175,180,182,183,184,187,200,202,205,207,208,211,225 %N A191325 Increasing sequence generated by these rules: a(1)=1, and if x is in a then [3x/2] and [5x/2] are in a, where [ ]=floor. %C A191325 See A191323. %H A191325 Ivan Neretin, <a href="/A191325/b191325.txt">Table of n, a(n) for n = 1..10000</a> %e A191325 1 -> 2 -> 3,5 -> 4,7,12 -> 6,10,17,18,30 -> %t A191325 h = 3; i = 0; j = 5; k = 0; f = 1; g = 15; %t A191325 Union[Flatten[NestList[{Floor[h #/2] + i, Floor[j #/2] + k} &, f, g]]] %t A191325 (* A191325 *) %Y A191325 Cf. A191323. %K A191325 nonn %O A191325 1,2 %A A191325 _Clark Kimberling_, May 30 2011