OFFSET
1,1
COMMENTS
FORMULA
EXAMPLE
a(1) = 59 because prevprime(59) + nextprime(59) = 53 + 61 = 114 = 19 * 6.
a(2) = 97 because prevprime(97) + nextprime(97) = 89 + 101 = 190 = 19 * 10.
a(3) = 683 because prevprime(683) + nextprime(683) = 677 + 691 = 1368 = 19 * 72.
a(4) = 797 because prevprime(797) + nextprime(797) = 787 + 809 = 1596 = 19 * 84.
MATHEMATICA
Prime@ Select[Range[2, 912], Mod[Prime[ # - 1] + Prime[ # + 1], 19] == 0 &] (* Robert G. Wilson v *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jonathan Vos Post, Jan 01 2006
EXTENSIONS
More terms from Robert G. Wilson v, Jan 05 2006
STATUS
approved