OFFSET
1,1
COMMENTS
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..89
EXAMPLE
n a(n) s(n) 2^a(n)-1 2^a(n)+1
----------------------------------------------------
1 2 1 3 5
2 11 2 23 * 89 3 * 683
3 14 3 3 * 43 * 127 5 * 29 * 113
4 23 2 47 * 178481 3 * 2796203
5 29 3 233 * 1103 * 2089 3 * 59 * 3033169
MATHEMATICA
Select[Select[Range[120], AllTrue[2^# + {-1, 1}, SquareFreeQ] &], Apply[PrimeNu[#1] == PrimeNu[#2] &, 2^# + {-1, 1}] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Michael De Vlieger, Oct 17 2025
EXTENSIONS
More terms from Amiram Eldar, Oct 17 2025
STATUS
approved
