login
Primes arising in A073697.
2

%I #8 Dec 05 2013 19:55:31

%S 3,5,7,13441,17,19,7380172801,7591472824321,140401,51036733441,

%T 146109005759529941022461793072270221794657871709130281512574451086642415308955967454343059210240000000000001,

%U 173,123607727923097573594325460106230958516233681919759351808000001,229,40733079612825601,15732964097851392001

%N Primes arising in A073697.

%t t = {}; s = 1; Do[s = s*i; If[PrimeQ[s + 1], AppendTo[t, s + 1]; s = 1], {i, 2, 260, 2}]; t (* _Jayanta Basu_, Jul 07 2013 *)

%Y Cf. A073696, A073697.

%K nonn

%O 1,1

%A _Amarnath Murthy_, Aug 12 2002

%E More terms from _Felice Russo_, Oct 11 2002