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
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