login
A098042
Primes of the form (prime(prime(k)) + prime(prime(k+1)))/2.
2
307, 593, 1459, 1511, 1609, 2399, 2447, 2579, 2903, 4409, 5953, 6317, 7151, 11083, 12491, 14753, 16067, 18199, 18223, 20929, 21787, 23893, 25667, 26317, 31051, 37139, 37573, 37871, 40283, 40471, 41201, 41479, 42013, 44537, 44741, 48409
OFFSET
1,1
COMMENTS
Primes of the form A299644(k)/2. - Amiram Eldar, Jul 08 2024
LINKS
EXAMPLE
prime(prime(18)) = 283, prime(prime(19)) = 331. (283 + 331)/2 = 614/2 = 307.
MATHEMATICA
With[{t = Table[Prime[Prime[n]], {n, 1, 400}]}, Select[(Most[t] + Rest[t])/2, PrimeQ]] (* Amiram Eldar, Jul 08 2024 *)
PROG
(PARI) lista(n) = for(x=1, n, y=prime(prime(x+1))+prime(prime(x)); if(y%2==0&isprime(y/2), print1(y\2", ")))
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Sep 10 2004
EXTENSIONS
Offset corrected by Amiram Eldar, Jul 08 2024
STATUS
approved