cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A138862 First two (i.e., the two most significant) digits of n-th Mersenne prime A000668(n).

Original entry on oeis.org

3, 7, 31, 12, 81, 13, 52, 21, 23, 61, 16, 17, 68, 53, 10, 14, 44, 25, 19, 28, 47, 34, 28, 43, 44, 40, 85, 53, 52, 51, 74, 17, 12, 41, 81, 62, 12, 43, 92, 12, 29, 12, 31, 12, 20, 16, 31
Offset: 1

Views

Author

Omar E. Pol, Apr 02 2008

Keywords

Crossrefs

Programs

  • Mathematica
    Join[{3,7},FromDigits[Take[IntegerDigits[#],2]]&/@ (2^MersennePrimeExponent[ Range[ 3,47]]-1)] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Aug 01 2020 *)

Extensions

a(40)-a(47) from Ivan Panchenko, Aug 03 2018
Definition clarified by Harvey P. Dale, Aug 01 2020