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 A096012 #24 Sep 08 2022 08:45:14 %S A096012 2,4,14,24,54,124,204,384,464,634,644,714,1094,1144,1174,1244,1274, %T A096012 1314,1374,1564,1614,1674,1684,1964,2054,2084,2094,2404,2454,2534, %U A096012 2664,2834,2924,3134,3304,3534,3754,3774,4024,4154,4174,4364,4604,4614,4734,4784 %N A096012 Numbers k such that k^2+1 and (k+2)^2+1 are both prime; twin k^2+1 primes. %H A096012 Amiram Eldar, <a href="/A096012/b096012.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..1000 from Seiichi Manyama) %F A096012 a(k) = A108814(k) - 1. - _Jeppe Stig Nielsen_, Feb 26 2016 %t A096012 Select[Range[5000],AllTrue[{#^2+1,(#+2)^2+1},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Jul 23 2014 *) %t A096012 Select[Range[5000], PrimeQ[#^2 + 1] && PrimeQ[(# + 2)^2 + 1] &] (* _Vincenzo Librandi_, Feb 27 2016 *) %o A096012 (Magma) [n: n in [1..5000] | IsPrime(n^2+1) and IsPrime((n+2)^2+1)]; // _Vincenzo Librandi_, Feb 27 2016 %o A096012 (PARI) isok(n) = isprime(n^2+1) && isprime((n+2)^2+1); \\ _Michel Marcus_, Feb 27 2016 %Y A096012 Cf. A005574, A108814. %K A096012 easy,nonn %O A096012 1,1 %A A096012 _Jason Earls_, Jul 20 2004