A073696 Initial members of groups in A073697.

2, 4, 6, 8, 16, 18, 20, 34, 50, 56, 68, 172, 174, 228, 230, 244, 260, 268, 270, 272, 296, 460, 462, 464, 486, 488, 498, 500, 510, 516, 662, 676, 678, 762, 806, 822, 824, 864, 880, 882, 884, 894, 906, 908, 932, 938

Offset

0,1

Comments

a(k+1)-a(k)=4 has no solutions.

Links

Table of n, a(n) for n=0..45.

Mathematica

t = {}; s = 1; c = 0; Do[s = s*i; c += 1; If[PrimeQ[s + 1], AppendTo[t, i - 2*(c - 1)]; s = 1; c = 0], {i, 2, 1000, 2}]; t (* Jayanta Basu, Jul 07 2013 *)

Crossrefs

Cf. A073695, A073697.

Sequence in context: A073935 A325764 A258119 * A058602 A133808 A160560

Adjacent sequences: A073693 A073694 A073695 * A073697 A073698 A073699

Keyword

nonn

Author

Amarnath Murthy, Aug 12 2002

Extensions

More terms from Felice Russo, Oct 11 2002

Status

approved