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