%I #7 Sep 16 2015 11:54:43
%S 37,67,277,479,613,631,809,1297,1471,1607,1663,1721,1783,1867,1901,
%T 1931,1993,2137,2377,2411,2521,2683,2797,2879,3359,3571,3917,4391,
%U 4513,4621,5413,5437,5477,5647,6299,7321,7393,7873,7901,8087,8819,9007,10301
%N Primes p(n) for which (p(n-1) + p(n+2)) / p(n) = 2.
%F a(n) = Prime(A119382(n)), where Prime(n) is the n-th prime. - _Stefan Steinerberger_, Jul 26 2006
%e In the ordered set of primes we have ...271,277,281,283... and (271+283)/277 = 2, therefore 277 belongs in this sequence.
%t Prime[Select[Range[2, 1500], (Prime[ # - 1] + Prime[ # + 2])/(Prime[ # ]) == 2 &]] (* _Stefan Steinerberger_, Jul 26 2006 *)
%Y Cf. A119382.
%Y Cf. A119382.
%K easy,nonn
%O 1,1
%A _Axel Harvey_, Jul 25 2006
%E More terms from _Stefan Steinerberger_, Jul 26 2006
|