cp's OEIS Frontend

A031170 a(n) = prime(n+8) - prime(n).

%I A031170 #23 Sep 08 2022 08:44:50
%S A031170 21,26,26,30,30,30,30,34,36,32,36,34,32,36,36,36,38,40,36,36,36,34,44,
%T A031170 42,40,38,46,44,48,50,40,42,42,42,42,42,40,36,44,50,48,48,42,46,44,52,
%U A031170 46,40,42,42,44,42,42,42,50,48,44,46,54,56,64,56,46,48,54,56,48
%N A031170 a(n) = prime(n+8) - prime(n).
%H A031170 Reinhard Zumkeller, <a href="/A031170/b031170.txt">Table of n, a(n) for n = 1..10000</a>
%F A031170 a(n) = A000040(n+8) - A000040(n). - _Zak Seidov_, Mar 23 2011
%p A031170 ithprime(n+8)-ithprime(n);
%t A031170 Table[Prime[n+8]-Prime[n],{n,1,100}]  (* _Harvey P. Dale_, Mar 23 2011 *)
%o A031170 (Magma) [NthPrime(n+8)-NthPrime(n): n in [1..100] ]; // _Vincenzo Librandi_, Apr 23 2011
%o A031170 (Haskell)
%o A031170 a031170 n = a031170_list !! (n-1)
%o A031170 a031170_list = zipWith (-) (drop 8 a000040_list) a000040_list
%o A031170 -- _Reinhard Zumkeller_, Aug 23 2015
%Y A031170 Cf. A000040.
%Y A031170 Cf. A001223, A031131, A031165, A031166, A031167, A031168, A031169, A031171, A031172.
%K A031170 nonn
%O A031170 1,1
%A A031170 _Jeff Burch_