OFFSET
1,1
COMMENTS
Primes that are third prime chords.
These come from music based on the prime differences where the chords are an even number of note steps from the primary note.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
m = 3; Prime[1 + Select[ Range[3300], Prime[ # + 2] - 2*Prime[ # + 1] + Prime[ # ] - 4*m == 0 &]] (* Robert G. Wilson v, Jul 14 2004 *)
Transpose[Select[Partition[Prime[Range[4000]], 3, 1], #[[1]]+#[[3]]== 2#[[2]] +12&]][[2]] (* Harvey P. Dale, Apr 18 2015 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Jul 02 2004
EXTENSIONS
Edited and extended by Robert G. Wilson v, Jul 14 2004
Edited by N. J. A. Sloane, Nov 07 2005
STATUS
approved