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 A084571 #12 May 28 2013 12:17:11
%S A084571 1,2,3,5,11,17,29,47,71,107,163,251,379,569,857,1289,1949,2927,4391,
%T A084571 6599,9901,14867,22303,33457,50207,75323,112997,169501,254257,381389,
%U A084571 572087,858149,1287233,1930879,2896319,4344479,6516739,9775111,14662727
%N A084571 Let a(1)=1; for n>1, a(n)=nextprime((3/2)*a(n-1)).
%C A084571 The definition refers to the nextprime() function in A007918.
%t A084571 Join[{1,2},NestList[NextPrime[(3/2)*#]&,3,36]] (* _Jayanta Basu_, May 26 2013 *)
%o A084571 (PARI) a(n)=if(n<2,1,nextprime((3/2)*a(n-1))); for(n=1,50,print1(a(n),","))
%Y A084571 Cf. A084572.
%K A084571 nonn
%O A084571 1,2
%A A084571 _Paul D. Hanna_, May 30 2003