OFFSET
1,1
COMMENTS
FORMULA
EXAMPLE
a(1) = 283 since prevprime(283) + nextprime(283) = 281 + 293 = 574 = 41 * 14.
a(2) = 409 since prevprime(409) + nextprime(409) = 401 + 419 = 820 = 41 * 20.
a(3) = 739 since prevprime(739) + nextprime(739) = 733 + 743 = 1476 = 41 * 36.
a(4) = 983 since prevprime(983) + nextprime(983) = 977 + 991 = 1968 = 41 * 48.
MATHEMATICA
Prime@Select[Range[2, 1766], Mod[Prime[ # - 1] + Prime[ # + 1], 41] == 0 &] (* Robert G. Wilson v *)
Transpose[Select[Partition[Prime[Range[2000]], 3, 1], Divisible[First[#] + Last[#], 41]&]][[2]] (* Harvey P. Dale, Jul 25 2012 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jonathan Vos Post, Jan 05 2006
EXTENSIONS
More terms from Robert G. Wilson v, Jan 11 2006
STATUS
approved