A095193 Common differences of the arithmetic progressions corresponding to A095181.

1, 11, 1, 7, 11, 47, 25, 17, 52, 23, 73, 97, 41, 61, 151, 131, 157, 139, 89, 239, 451, 281, 371, 509, 283, 661, 263, 841, 587, 839, 1339, 671, 1171, 499, 1283, 289, 1903, 743, 1621, 2609, 359, 2533, 1751, 2993, 1153, 6211, 881, 3011, 3613, 3631, 2771, 6869, 1553, 5801, 1159, 4603, 2311, 1141, 9097

Offset

2,2

Comments

How many terms are even?

Links

Jean-François Alcover, Table of n, a(n) for n = 2..200

Formula

a(n) = (A095182(n) - prime(n))/(n-1). [R. J. Mathar, Oct 14 2010]

Mathematica

(* b = A095182 *) b[n_] := For[r = 1, True, r++, ro = Table[Prime[n] + k*r, {k, 0, n - 1}]; If[AllTrue[Rest[ro], CompositeQ[#] && ! Divisible[#, Prime[n]] &], Return[ro[[-1]]]]];
a[n_] := (b[n] - Prime[n])/(n - 1);
Table[a[n], {n, 2, 60}] (* Jean-François Alcover, Jan 15 2018, after R. J. Mathar *)

Crossrefs

Cf. A095181.

Sequence in context: A010200 A086320 A185540 * A171250 A010201 A228407

Adjacent sequences: A095190 A095191 A095192 * A095194 A095195 A095196

Keyword

nonn

Author

Amarnath Murthy, Jun 04 2004

Extensions

Extended beyond a(6) by R. J. Mathar, Oct 14 2010

a(43)-a(60) by Jean-François Alcover, Jan 15 2018

Status

approved