A092733 Sum of two consecutive primes of the form 2^x+1 (including Fermat primes and 2).
5, 8, 22, 274, 65794
Offset: 1
Examples
a(1) = [2^0+1] + [2^(2^0)+1] a(2) = [2^(2^0)+1] + [2^(2^1)+1] a(3) = [2^(2^1)+1] + [2^(2^2)+1] a(4) = [2^(2^2)+1] + [2^(2^3)+1] a(5) = [2^(2^3)+1] + [2^(2^4)+1]
Programs
-
Mathematica
Total/@Partition[Select[2^Range[0,50]+1,PrimeQ],2,1] (* Harvey P. Dale, Jun 21 2021 *)
Extensions
Offset corrected by Arkadiusz Wesolowski, Oct 22 2011