login
a(n) = prime(n+8) - prime(n).
11

%I #23 Sep 08 2022 08:44:50

%S 21,26,26,30,30,30,30,34,36,32,36,34,32,36,36,36,38,40,36,36,36,34,44,

%T 42,40,38,46,44,48,50,40,42,42,42,42,42,40,36,44,50,48,48,42,46,44,52,

%U 46,40,42,42,44,42,42,42,50,48,44,46,54,56,64,56,46,48,54,56,48

%N a(n) = prime(n+8) - prime(n).

%H Reinhard Zumkeller, <a href="/A031170/b031170.txt">Table of n, a(n) for n = 1..10000</a>

%F a(n) = A000040(n+8) - A000040(n). - _Zak Seidov_, Mar 23 2011

%p ithprime(n+8)-ithprime(n);

%t Table[Prime[n+8]-Prime[n],{n,1,100}] (* _Harvey P. Dale_, Mar 23 2011 *)

%o (Magma) [NthPrime(n+8)-NthPrime(n): n in [1..100] ]; // _Vincenzo Librandi_, Apr 23 2011

%o (Haskell)

%o a031170 n = a031170_list !! (n-1)

%o a031170_list = zipWith (-) (drop 8 a000040_list) a000040_list

%o -- _Reinhard Zumkeller_, Aug 23 2015

%Y Cf. A000040.

%Y Cf. A001223, A031131, A031165, A031166, A031167, A031168, A031169, A031171, A031172.

%K nonn

%O 1,1

%A _Jeff Burch_