A233008 p mod 24, where p is such that 2^p - 1 is prime (see Mersenne primes, A000043).
2, 3, 5, 7, 13, 17, 19, 7, 13, 17, 11, 7, 17, 7, 7, 19, 1, 1, 5, 7, 17, 5, 5, 17, 5, 1, 1, 11, 7, 1, 19, 23, 17, 19, 5, 5, 17, 17, 13, 19, 7, 23, 1, 17, 11, 1, 17, 17
Offset: 1
Links
- Chris K. Caldwell, Mersenne Primes.
- Chris K. Caldwell, Recent Mersenne primes.
- Walter Wegscheider, Liste der Mersenne-Primzahlen, Pädagogische Hochschule für Niederösterreich (in German).
Programs
-
Mathematica
Mod[#, 24] &@ MersennePrimeExponent@ Range@ 45 (* Michael De Vlieger, Jul 22 2018 *)
Formula
a(n) = A000043(n) mod 24.
Extensions
a(46)-a(47) corrected and a(48) removed by Gord Palameta, Jul 21 2018
a(48) from Amiram Eldar, Oct 15 2024