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.

Showing 1-9 of 9 results.

A079100 Number of 1's in n# (n primorial) = 1's in A002110(n).

Original entry on oeis.org

1, 0, 0, 0, 1, 1, 0, 2, 0, 0, 0, 1, 2, 1, 3, 3, 2, 3, 3, 2, 2, 2, 2, 3, 3, 4, 1, 3, 5, 4, 5, 5, 6, 6, 5, 5, 8, 4, 7, 9, 5, 11, 5, 5, 11, 11, 9, 12, 11, 12, 11, 9, 14, 17, 10, 11, 6, 15, 10, 20, 8, 9, 9, 6, 10, 15, 14, 17, 13, 10, 12, 11, 15, 15, 17, 12, 18, 15, 19, 13, 29, 16, 8, 14, 20, 16, 16, 32, 20, 16, 23
Offset: 0

Views

Author

Cino Hilliard, Feb 03 2003

Keywords

Crossrefs

Programs

  • Mathematica
    DigitCount[#, 10, 1]&/@Rest[FoldList[Times, 1, Prime[Range[100]]]] (* Vincenzo Librandi, Apr 07 2014 *)
  • PARI
    \\ See program in A079099.

Extensions

Offset corrected and a(0) added by Alois P. Heinz, Jul 21 2025

A079110 Number of 2's in n# (n primorial) = 2's in A002110(n).

Original entry on oeis.org

0, 1, 0, 0, 1, 1, 0, 0, 0, 3, 1, 1, 1, 4, 1, 1, 1, 4, 2, 2, 1, 5, 2, 4, 1, 3, 3, 11, 1, 4, 4, 2, 6, 5, 2, 5, 8, 5, 3, 7, 5, 9, 8, 7, 12, 5, 5, 8, 7, 7, 6, 16, 14, 7, 12, 11, 7, 12, 6, 10, 13, 7, 14, 12, 16, 11, 14, 10, 14, 11, 22, 12, 10, 27, 19, 18, 6, 17, 18, 16, 13, 16, 19, 16, 12, 20, 21, 12, 21, 18, 18
Offset: 0

Views

Author

Cino Hilliard, Feb 03 2003

Keywords

Crossrefs

Programs

  • Mathematica
    DigitCount[#, 10, 2]&/@Rest[FoldList[Times, 1, Prime[Range[100]]]] (* Vincenzo Librandi, Apr 07 2014 *)
  • PARI
    \\ See program in A079099.

Extensions

Offset corrected by Alois P. Heinz, Jul 21 2025

A079113 Number of 3's in n# (n primorial) = 3's in A002110(n).

Original entry on oeis.org

0, 0, 0, 1, 0, 1, 2, 0, 0, 1, 2, 1, 2, 2, 4, 0, 2, 2, 3, 1, 2, 2, 3, 1, 5, 5, 8, 4, 3, 3, 3, 7, 2, 6, 9, 8, 9, 4, 9, 6, 5, 4, 6, 7, 6, 11, 8, 7, 16, 11, 6, 8, 12, 8, 12, 8, 12, 4, 16, 11, 4, 15, 14, 15, 11, 15, 14, 8, 13, 20, 10, 8, 18, 14, 15, 14, 16, 14, 16, 12, 22, 17, 17, 15, 17, 17, 20, 14, 16, 21, 25
Offset: 0

Views

Author

Cino Hilliard, Feb 03 2003

Keywords

Crossrefs

Programs

  • Mathematica
    DigitCount[#, 10, 3]&/@Rest[FoldList[Times, 1, Prime[Range[100]]]] (* Vincenzo Librandi, Apr 07 2014 *)
  • PARI
    \\ See program in A079099.

Extensions

Offset corrected by Alois P. Heinz, Jul 21 2025

A079123 Number of 4's in n# (n primorial) = 4's in A002110(n).

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 2, 1, 0, 3, 3, 1, 1, 0, 2, 4, 5, 2, 2, 4, 2, 1, 8, 3, 7, 9, 4, 4, 6, 5, 3, 8, 2, 8, 3, 9, 6, 4, 6, 8, 7, 7, 4, 12, 4, 15, 10, 10, 9, 13, 10, 15, 7, 7, 19, 15, 9, 20, 12, 11, 12, 15, 19, 12, 15, 20, 10, 12, 13, 13, 19, 16, 13, 21, 17, 17, 23, 19, 13, 13, 15, 18, 20, 16, 27
Offset: 0

Views

Author

Cino Hilliard, Feb 03 2003

Keywords

Crossrefs

Programs

  • Mathematica
    Count[IntegerDigits[#], 4]&/@FoldList[Times, 1, Prime[Range[90]]] (* Harvey P. Dale, Oct 12 2011 *)
  • PARI
    \\ See program in A079099.

Extensions

Offset corrected by Alois P. Heinz, Jul 21 2025

A079127 Number of 5's in n# (n primorial).

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 1, 0, 2, 0, 1, 2, 2, 1, 5, 3, 2, 2, 6, 6, 6, 2, 4, 4, 1, 3, 3, 4, 2, 5, 7, 6, 6, 10, 5, 9, 5, 13, 7, 9, 7, 7, 12, 9, 5, 8, 6, 9, 13, 7, 12, 16, 4, 13, 10, 11, 12, 19, 13, 17, 12, 10, 9, 14, 14, 15, 15, 14, 19, 12, 26, 14, 18, 11, 11, 18, 18, 22, 8, 23, 22, 11, 21, 14, 26, 18
Offset: 0

Views

Author

Cino Hilliard, Feb 03 2003

Keywords

Comments

Number of 5's in A002110(n).

Crossrefs

Programs

  • Mathematica
    DigitCount[#, 10, 5]&/@Rest[FoldList[Times, 1, Prime[Range[100]]]] (* Vincenzo Librandi, Apr 07 2014 *)
  • PARI
    \\ See program in A079099.

Extensions

Offset corrected by Alois P. Heinz, Jul 21 2025

A079133 Number of 6's in n# (n primorial) = 6's in A002110(n).

Original entry on oeis.org

0, 0, 1, 0, 0, 0, 0, 0, 2, 0, 3, 1, 0, 1, 2, 1, 0, 2, 1, 1, 4, 2, 3, 4, 4, 3, 6, 4, 4, 6, 8, 5, 5, 4, 8, 6, 5, 5, 13, 7, 9, 6, 7, 6, 6, 6, 9, 6, 9, 8, 6, 7, 8, 7, 10, 9, 12, 10, 12, 6, 11, 9, 6, 12, 7, 16, 21, 17, 10, 21, 12, 21, 14, 11, 15, 17, 26, 14, 14, 18, 18, 19, 12, 18, 16, 17, 25, 17, 15, 11, 15
Offset: 0

Views

Author

Cino Hilliard, Feb 03 2003

Keywords

Crossrefs

Programs

  • Mathematica
    DigitCount[#, 10, 6]&/@Rest[FoldList[Times, 1, Prime[Range[100]]]] (* Vincenzo Librandi, Apr 07 2014 *)
  • PARI
    \\ See program in A079099.

Extensions

Offset corrected by Alois P. Heinz, Jul 21 2025

A079134 Number of 8's in n# (n primorial) = 8's in A002110(n).

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 2, 0, 1, 5, 2, 0, 4, 4, 2, 1, 2, 2, 3, 1, 4, 6, 2, 5, 3, 3, 1, 4, 0, 8, 5, 5, 4, 1, 10, 6, 5, 10, 5, 10, 8, 6, 5, 8, 8, 7, 6, 6, 13, 7, 9, 9, 11, 9, 9, 13, 13, 11, 14, 16, 8, 9, 11, 13, 13, 11, 15, 10, 16, 14, 16, 18, 18, 27, 12, 12, 23, 23, 22, 23, 18, 16, 18, 17, 17
Offset: 0

Views

Author

Cino Hilliard, Feb 03 2003

Keywords

Crossrefs

Programs

  • Mathematica
    DigitCount[#, 10, 8]&/@Rest[FoldList[Times, 1, Prime[Range[90]]]] (* Harvey P. Dale, Apr 04 2014 *)
  • PARI
    \\ See program in A079099.

Extensions

Offset corrected by Alois P. Heinz, Jul 21 2025

A079135 Number of 7's in n# (n primorial) = 7's in A002110(n).

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 2, 1, 2, 1, 3, 2, 3, 3, 2, 2, 5, 4, 5, 5, 3, 2, 6, 9, 4, 3, 10, 7, 2, 4, 2, 13, 2, 5, 4, 6, 9, 6, 6, 9, 7, 10, 9, 11, 10, 8, 5, 5, 7, 6, 10, 16, 10, 14, 12, 14, 10, 16, 13, 10, 12, 14, 13, 16, 17, 13, 20, 14, 11, 12, 8, 10, 15, 17, 9, 16, 15, 26, 21, 18, 19, 20, 28, 20, 12
Offset: 0

Views

Author

Cino Hilliard, Feb 03 2003

Keywords

Crossrefs

Programs

  • Mathematica
    DigitCount[#, 10, 7]&/@Rest[FoldList[Times, 1, Prime[Range[100]]]] (* Vincenzo Librandi, Apr 07 2014 *)
  • PARI
    \\ See program in A079099.

Extensions

Offset corrected by Alois P. Heinz, Jul 21 2025

A079163 Number of 9's in n# (n primorial) = 9's in A002110(n).

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 0, 0, 4, 1, 2, 1, 0, 0, 0, 2, 2, 2, 3, 2, 5, 4, 3, 4, 1, 2, 2, 4, 7, 7, 4, 6, 6, 3, 7, 4, 8, 7, 5, 11, 11, 8, 7, 14, 8, 8, 13, 10, 8, 5, 16, 6, 8, 10, 5, 14, 14, 14, 12, 15, 15, 15, 11, 7, 12, 14, 13, 18, 15, 17, 10, 17, 13, 18, 14, 13, 16, 20, 16, 14, 17, 19, 19, 18, 22, 13, 19, 17, 17, 24, 23
Offset: 0

Views

Author

Cino Hilliard, Feb 03 2003

Keywords

Crossrefs

Programs

  • Mathematica
    DigitCount[#, 10, 9]&/@Rest[FoldList[Times, 1, Prime[Range[90]]]] (* Harvey P. Dale, Dec 07 2011 *)
  • PARI
    \\ See program in A079099.

Extensions

Offset corrected by Alois P. Heinz, Jul 21 2025
Showing 1-9 of 9 results.