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.

A068904 a(n) = binomial(sigma(n),tau(n)), where sigma(n) is the sum and tau(n) the number of divisors of n (A000203, A000005).

Original entry on oeis.org

1, 3, 6, 35, 15, 495, 28, 1365, 286, 3060, 66, 376740, 91, 10626, 10626, 169911, 153, 3262623, 190, 5245786, 35960, 58905, 276, 2558620845, 4495, 111930, 91390, 32468436, 435, 11969016345, 496, 67945521, 194580, 316251, 194580, 783768050065, 703, 487635
Offset: 1

Views

Author

Reinhard Zumkeller, Mar 06 2002

Keywords

Crossrefs

Programs

  • Mathematica
    Table[Binomial[DivisorSigma[1, n], DivisorSigma[0, n]], {n, 50}] (* Carl Najafi, Oct 10 2011 *)
  • PARI
    a(n)=binomial(sigma(n),numdiv(n)) \\ Charles R Greathouse IV, Feb 19 2013

Extensions

More terms from Carl Najafi, Oct 10 2011

A068905 Binomial(sigma(n),omega(n)), where sigma(n) is the sum of divisors of n (A000203) and omega the number of distinct prime factors (A001221).

Original entry on oeis.org

1, 3, 4, 7, 6, 66, 8, 15, 13, 153, 12, 378, 14, 276, 276, 31, 18, 741, 20, 861, 496, 630, 24, 1770, 31, 861, 40, 1540, 30, 59640, 32, 63, 1128, 1431, 1128, 4095, 38, 1770, 1540, 4005, 42, 142880, 44, 3486, 3003, 2556, 48, 7626
Offset: 1

Views

Author

Reinhard Zumkeller, Mar 06 2002

Keywords

Crossrefs

Programs

  • Mathematica
    Binomial[DivisorSigma[1,#],Length[FactorInteger[#]]]&/@Range[50]  (* Harvey P. Dale, Feb 18 2011 *)
  • PARI
    a(n)=binomial(sigma(n),omega(n)) \\ Charles R Greathouse IV, Feb 19 2013
Showing 1-2 of 2 results.