login
Exponents p of the Mersenne primes 2^p - 1 (see A000043) read mod 6.
0

%I #27 Sep 19 2023 15:41:59

%S 2,3,5,1,1,5,1,1,1,5,5,1,5,1,1,1,1,1,5,1,5,5,5,5,5,1,1,5,1,1,1,5,5,1,

%T 5,5,5,5,1,1,1,5,1,5,5,1,5,5

%N Exponents p of the Mersenne primes 2^p - 1 (see A000043) read mod 6.

%F a(n) = A010875(A000043(n)). - _Michel Marcus_, Apr 07 2018

%t Array[Mod[MersennePrimeExponent@ #, 6] &, 45] (* _Michael De Vlieger_, Apr 07 2018 *)

%Y Cf. A000043, A010875, A126043-A126059.

%K nonn,more

%O 1,1

%A _Artur Jasinski_, Dec 17 2006

%E a(45)-a(46) from _Ivan Panchenko_, Apr 07 2018

%E a(47) from _Ivan Panchenko_, Apr 09 2018

%E a(48) from _Max Alekseyev_, Sep 19 2023