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 A095135 #6 Jan 08 2013 12:19:55 %S A095135 1,2,3,4,5,6,7,8,9,10,11,13,14,15,17,22,26,29,33,37,58,75,126,127,150, %T A095135 205,356,424,492,661,674,697,831,1687,2068,3422,3495,4183,4920,5128 %N A095135 Indices of primes in A095134(n). %t A095135 f[n_] := Product[ Prime[i], {i, 2, n, 2}] + Product[ Prime[i], {i, 1, n, 2}]; f[1] = 2; Do[ If[ PrimeQ[ f[n]], Print[n]], {n, 2060}] %Y A095135 Cf. A095134. %K A095135 nonn %O A095135 1,2 %A A095135 _Robert G. Wilson v_, May 27 2004 %E A095135 a(36)-a(40) added by _James G. Merickel_, Jan 03 2013