A031171 a(n) = prime(n+9) - prime(n).

27, 28, 32, 34, 32, 34, 36, 40, 38, 38, 40, 36, 38, 40, 42, 44, 42, 42, 40, 38, 40, 48, 48, 48, 42, 48, 48, 50, 54, 54, 46, 48, 44, 52, 44, 46, 42, 48, 56, 54, 50, 52, 48, 48, 54, 58, 52, 46, 44, 48, 48, 44, 52, 56, 54, 50, 48, 60, 60, 66, 66, 60, 52, 56, 60, 62, 52

Offset

1,1

Links

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Maple

ithprime(n+9)-ithprime(n);

Mathematica

Table[Prime[n+9]-Prime[n], {n, 80}] (* Harvey P. Dale, Jan 29 2023 *)

Prog

(Magma) [NthPrime(n+9)-NthPrime(n): n in [1..100] ]; // Vincenzo Librandi, Apr 23 2011
(Haskell)
a031171 n = a031171_list !! (n-1)
a031171_list = zipWith (-) (drop 9 a000040_list) a000040_list
-- Reinhard Zumkeller, Aug 23 2015

Crossrefs

Cf. A000040, A001223, A031131, A031165, A031166, A031167, A031168, A031169, A031170, A031172.

Sequence in context: A350769 A258267 A332927 * A106126 A069551 A022397

Adjacent sequences: A031168 A031169 A031170 * A031172 A031173 A031174

Keyword

nonn

Author

Jeff Burch

Extensions

Offset changed from 2 to 1 and a(1)=27 inserted by Vincenzo Librandi, Apr 23 2011

Status

approved