cp's OEIS Frontend

A031169 a(n) = prime(n+7) - prime(n).

%I A031169 #20 Sep 08 2022 08:44:50
%S A031169 17,20,24,24,26,28,26,28,30,30,30,30,30,30,32,30,30,36,34,32,34,30,30,
%T A031169 38,34,36,36,42,42,44,36,36,36,40,32,40,36,34,32,38,44,46,38,40,42,42,
%U A031169 40,34,36,40,38,38,40,32,36,44,42,42,40,50,54,54,42,42,46,50,42
%N A031169 a(n) = prime(n+7) - prime(n).
%H A031169 Reinhard Zumkeller, <a href="/A031169/b031169.txt">Table of n, a(n) for n = 1..10000</a>
%p A031169 ithprime(n+7)-ithprime(n);
%t A031169 #[[8]]-#[[1]]&/@Partition[Prime[Range[80]],8,1] (* _Harvey P. Dale_, Sep 16 2020 *)
%o A031169 (Magma) [NthPrime(n+7)-NthPrime(n): n in [1..100] ]; // _Vincenzo Librandi_, Apr 23 2011
%o A031169 (Haskell)
%o A031169 a031169 n = a031169_list !! (n-1)
%o A031169 a031169_list = zipWith (-) (drop 7 a000040_list) a000040_list
%o A031169 -- _Reinhard Zumkeller_, Aug 23 2015
%Y A031169 Cf. A000040, A001223, A031131, A031165, A031166, A031167, A031168, A031170, A031171, A031172.
%K A031169 nonn
%O A031169 1,1
%A A031169 _Jeff Burch_
%E A031169 Offset changed from 2 to 1 and a(1)=17 inserted by _Vincenzo Librandi_, Apr 23 2011