OFFSET
1,1
EXAMPLE
If k=8, then k^2 + n - 41 = 31 (prime).
If k=99, then k^2 + n - 41 = 9859 (prime).
MAPLE
isA133157 := proc(n) isprime(n*(n+1)-41) ; end: for n from 1 to 400 do if isA133157(n) then printf("%d, ", n) ; fi ; od: # R. J. Mathar, Jan 08 2008
MATHEMATICA
Select[Range[7, 400], PrimeQ[ #^2 + # - 41] &] (* Stefan Steinerberger, Dec 24 2007 *)
PROG
(PARI) is(n)=isprime(n^2+n-41) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Parthasarathy Nambi, Dec 17 2007
EXTENSIONS
More terms from Stefan Steinerberger, Dec 24 2007
More terms from R. J. Mathar, Jan 08 2008
STATUS
approved