A066495 Numbers k such that f(k) = f(k-1) + f(k-2) where f denotes the prime gaps function given by f(m) = prime(m+1) - prime(m).
4, 9, 15, 21, 51, 71, 118, 184, 208, 227, 231, 238, 255, 267, 290, 317, 326, 354, 381, 392, 396, 437, 494, 499, 544, 553, 569, 627, 645, 660, 720, 756, 796, 922, 932, 937, 960, 968, 990, 1027, 1034, 1087, 1103, 1130, 1157, 1173, 1175, 1227, 1237, 1251
Offset: 1
Keywords
Examples
f(9) = 6 = 4 + 2 = f(8) + f(7); so 9 is a term.
Links
- Robert Israel, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
f[n_] := Prime[n + 1] - Prime[n]; Select[Range[3, 10^4], f[ # ] == f[ # - 1] + f[ # - 2] &]
Formula
Extensions
Extended by Ray Chandler, Aug 23 2005