|
%I #14 Aug 12 2021 10:47:05
%S 2,3,5,7,13,3,5,3,5,5,9,1,3,5,5,5,13,11,11,13,1,1,13,1,1,11,5,3,1,1,1,
%T 13,1,13,5,3,9,5,9,1,11,5,1,9,9,11,1
%N Exponents p of the Mersenne primes 2^p - 1 (see A000043) read mod 14.
%F a(n) = A070696(A000043(n)). - _Michel Marcus_, Apr 07 2018
%t Mod[MersennePrimeExponent[Range[47]],14] (* _Harvey P. Dale_, Aug 12 2021 *)
%Y Cf. A126043-A126059.
%K nonn,more
%O 1,1
%A _Artur Jasinski_, Dec 17 2006
%E a(45)-a(47) from _Ivan Panchenko_, Apr 08 2018
|
