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-2 of 2 results.

A158994 Denominator of Bernoulli(n, 1/10).

Original entry on oeis.org

1, 5, 300, 250, 30000, 25000, 21000000, 2500000, 300000000, 250000000, 330000000000, 25000000000, 273000000000000, 2500000000000, 300000000000000, 250000000000000, 510000000000000000, 25000000000000000
Offset: 0

Views

Author

N. J. A. Sloane, Nov 08 2009

Keywords

Crossrefs

For numerators see A158992.

Programs

  • Mathematica
    Table[Denominator[BernoulliB[n, 1/10]], {n, 0, 50}] (* Vincenzo Librandi, Mar 19 2014 *)

A158989 Numbers n such that product of double factorials of the digits of n equals sigma(n).

Original entry on oeis.org

1, 54, 62, 4190, 4920, 10538, 12376, 16065, 16732, 26345, 37236, 47026, 48323, 53480, 56712, 58520, 61209, 62337, 65163, 83720, 84135, 94520, 100980, 126238, 135266, 141078, 143726, 146910, 147354, 154238, 174217, 183505, 185334, 207328
Offset: 1

Views

Author

Farideh Firoozbakht, Jul 07 2009

Keywords

Examples

			sigma(444119)=4!!*4!!*4!!*1!!*1!!*9!!, so 444119 is in the sequence.
		

Crossrefs

Programs

  • Mathematica
    Select[Range[210000],DivisorSigma[1,# ]==Apply[Times,IntegerDigits[ # ]!! ]&]
Showing 1-2 of 2 results.