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 A094463 #10 Mar 13 2015 23:08:53 %S A094463 5,5,199,5,433,1601,31,457,7109609443,5,7,127,71,5,7,2620003,4583, %T A094463 1217,5,67,6729871,39334891,5,53,461,449885311,1511,197,7,22008559,19, %U A094463 1249,7,7,3217,7,7,3931,7,110663370509047,375155719,29,28529671,23,24603331 %N A094463 a(n) is the 7th term in Euclid-Mullin (EM) prime sequence initiated with n-th prime. %e A094463 First term is p(n), 2nd equals 2; %e A094463 3rd term is A091460 as largest p-divisor of 2p+1 %e A094463 (occasionally safe primes, A005385); %e A094463 4th terms listed in A051614; 5th term is in A094461; %e A094463 6th-7th terms in A094462, A094463; %t A094463 a[x_]:=First[Flatten [FactorInteger[Apply[Times, Table[a[j], {j, 1, x-1}]]+1]]];ta=Table[0, {168}];a[1]=1; Do[{a[1]=Prime[j], el=6};Print[a[el];ta[[j]]=a[el];j++ ], {j, 1, 168}];ta %Y A094463 Cf. A000945, A005385, A051614-A051616, A051308-A051335, A093778-A093782, A094152-A094153, A094460-A094463. %K A094463 nonn %O A094463 1,1 %A A094463 _Labos Elemer_, May 06 2004