Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #19 Dec 04 2020 15:01:44
%S 3,12,20,64,96,60,144,176,100,620,304,1316,220,1220,1120,1580,1044,
%T 736,3264,1356,944,976,500,1024,1056,3360,1184,1836,1264,3300,2076,
%U 1424,1456,7760,820,1664,6076,2724,2796,1904,4900,3036,2064,2096,3204,5500,2256
%N Differences between consecutive primes of the form k^2+1.
%C It is conjectured that the sequence of primes of the form k^2+1 is infinite, but this has never been proved. This sequence contains a subset of squares: {64, 144, 100, 1024, 4900, 10816, 11664, 12544, 18496, 102400, 41616, ...}.
%H Amiram Eldar, <a href="/A193558/b193558.txt">Table of n, a(n) for n = 1..10000</a>
%e a(2) = 12 because (4^2+1)-(2^2+1) = 17 - 5 = 12.
%t Differences[Select[Range[250]^2 + 1, PrimeQ]]
%o (PARI) lista(nn) = my(v=select(x->issquare(x-1), primes(nn))); vector(#v-1, k, v[k+1] - v[k]) \\ _Michel Marcus_, Dec 04 2020
%Y Cf. A002496.
%K nonn
%O 1,1
%A _Michel Lagneau_, Jul 30 2011