login
a(n) = prime(prime(n+1)) + prime(prime(n)).
2

%I #15 Sep 08 2022 08:46:20

%S 8,16,28,48,72,100,126,150,192,236,284,336,370,402,452,518,560,614,

%T 684,720,768,832,892,970,1056,1110,1150,1186,1216,1326,1448,1512,1570,

%U 1656,1736,1796,1886,1958,2022,2094,2150,2240,2324,2372,2418,2514,2706,2842,2880,2918

%N a(n) = prime(prime(n+1)) + prime(prime(n)).

%C All terms are even. - _Michel Marcus_, Mar 20 2018

%F a(n) = A006450(n+1) + A006450(n).

%t Table[Prime[Prime[n + 1]] + Prime[Prime[n]], {n, 1, 50}]

%o (Magma) [NthPrime(NthPrime(n+1))+NthPrime(NthPrime(n)):n in [1..50]];

%o (PARI) a(n) = prime(prime(n+1)) + prime(prime(n)); \\ _Michel Marcus_, Mar 20 2018

%Y Cf. A000040, A006450, A073131.

%K nonn

%O 1,1

%A _Vincenzo Librandi_, Mar 20 2018