OFFSET
1,1
EXAMPLE
31, 61, 181, etc. are primes.
MATHEMATICA
k = 3; Print[k]; Do[i = 2; While[ !PrimeQ[10*i*k + 1], i++ ]; k *= i; Print[k], {n, 1, 30}] (* Ryan Propper, Aug 06 2005 *)
CROSSREFS
KEYWORD
base,nonn,easy
AUTHOR
Amarnath Murthy, Nov 03 2003
EXTENSIONS
More terms from Ryan Propper, Aug 06 2005
STATUS
approved