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 A122825 #14 Feb 28 2018 11:30:32
%S A122825 1,2,4,5,7,9,10,11,13,15,16,17,19,21,22,23,25,26,27,28,29,31,33,34,35,
%T A122825 36,37,39,40,41,43,45,46,47,49,50,51,52,53,55,56,57,58,59,61,63,64,65,
%U A122825 66,67,69,70,71,73,75,76,77,78,79,81,82,83,85,86,87,88,89,91,92,93,94
%N A122825 a(n) = n + number of previous prime terms, a(1) = 1.
%C A122825 Or, a(1)=1; a(n)=a(n-1) + d: if a(n-1) is prime then d=2 otherwise d=1.
%H A122825 Vincenzo Librandi, <a href="/A122825/b122825.txt">Table of n, a(n) for n = 1..10000</a>
%t A122825 s={1};p=0;Do[b=n+p;AppendTo[s,b];If[PrimeQ[b],p++ ],{n,2,130}];s
%o A122825 (PARI) lista(nn) = {print1(a=1, ", "); nbp = 0; for (n=2, nn, newn = nbp + n; print1(newn, ", "); nbp += isprime(newn););} \\ _Michel Marcus_, Jul 31 2017
%Y A122825 Cf. A135731 (complement).
%K A122825 nonn
%O A122825 1,2
%A A122825 _Zak Seidov_, Oct 23 2006