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 A096481 #13 Feb 15 2025 09:22:18 %S A096481 2,19,11,79,53,47,137,331,293,971,457,263,367,1231,757,3607,1229,1663, %T A096481 6131,12227,1879,1831,10733,8423,9221,7393,3793,32941,19213,45863, %U A096481 21961,51871,25763,37591,16879,89017,98867,138241,63611,44773,77279,77783 %N A096481 a(n) = A000040(A096480(n)). %H A096481 Amiram Eldar, <a href="/A096481/b096481.txt">Table of n, a(n) for n = 1..214</a> %t A096481 Prime[Table[Min[Flatten[Position[Table[Prime[Prime[n]+1]- Prime[Prime[n]], {n, 1, 10000}], 2*j]]], {j, 1, 100}]] %o A096481 (PARI) {m=42;for(n=1,m,k=1;while((prime(prime(k)+1)-prime(prime(k)))!=2*n,k++);print1(prime(k),","))} \\ _Klaus Brockhaus_, Jun 27 2004 %Y A096481 Cf. A000040, A006450, A073124, A072677, A096477, A096478, A096479, A096480, A096482. %K A096481 nonn %O A096481 1,1 %A A096481 _Labos Elemer_, Jun 23 2004 %E A096481 a(31)-a(42) from _Klaus Brockhaus_, Jun 27 2004