OFFSET
1,2
COMMENTS
Conjectured to be finite.
The subsequence of squarefree numbers in A245569. - M. F. Hasler, Nov 28 2014
MATHEMATICA
Select[Range[100], SquareFreeQ[#] && SquareFreeQ[Binomial[2^# - 1, #]] &] (* Vincenzo Librandi, Nov 14 2014 *)
Select[Range[60], AllTrue[{#, Binomial[2^#-1, #]}, SquareFreeQ]&] (* Harvey P. Dale, Feb 07 2025 *)
PROG
(Magma) [n: n in [1..200] | IsSquarefree(n) and IsSquarefree(Binomial(2^n-1, n))];
(PARI) is(n)=issquarefree(n) && issquarefree(binomial(2^n-1, n)) \\ Charles R Greathouse IV, Nov 16 2014
CROSSREFS
KEYWORD
nonn,changed
AUTHOR
Juri-Stepan Gerasimov, Nov 15 2014
STATUS
approved