1,1

Steven Harvey, Generalized Woodall Search

Do[ If[ PrimeQ[ n*5^n - 1 ], Print[ n ]], {n, 1, 4000} ]

Sequence in context: A064969 A144840 A121866 this_sequence A111050 A009453 A050582

Adjacent sequences: A059673 A059674 A059675 this_sequence A059677 A059678 A059679

nonn

Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 05 2001

More terms from Herman Jamke (hermanjamke(AT)fastmail.fm), Jan 05 2008