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

A346935 a(n) = Sum_{d|n} mu(n/d) * binomial(4*d,d) / (3*d+1).

Original entry on oeis.org

1, 3, 21, 136, 968, 7059, 53819, 420592, 3362238, 27342916, 225568797, 1882926144, 15875338989, 134993712777, 1156393242330, 9969937070688, 86445222719723, 753310719641286, 6594154339031799, 57956002304003096, 511238042454487704, 4524678117713613419, 40166643855158315819
Offset: 1

Views

Author

Ilya Gutkovskiy, Aug 08 2021

Keywords

Comments

Moebius transform of A002293.

Crossrefs

Programs

  • Mathematica
    Table[Sum[MoebiusMu[n/d] Binomial[4 d, d]/(3 d + 1), {d, Divisors[n]}], {n, 23}]

A346936 a(n) = Sum_{d|n} mu(n/d) * binomial(5*d,d) / (4*d+1).

Original entry on oeis.org

1, 4, 34, 280, 2529, 23712, 231879, 2330160, 23950320, 250540836, 2658968129, 28558319744, 309831575759, 3390416555996, 37377257156716, 414741861215840, 4628362722856424, 51912988232308104, 584909606696793884, 6617078646710069720, 75134301594081157746, 855968478539048248916
Offset: 1

Views

Author

Ilya Gutkovskiy, Aug 08 2021

Keywords

Comments

Moebius transform of A002294.

Crossrefs

Programs

  • Mathematica
    Table[Sum[MoebiusMu[n/d] Binomial[5 d, d]/(4 d + 1), {d, Divisors[n]}], {n, 22}]

A346937 a(n) = Sum_{d|n} mu(n/d) * binomial(6*d,d) / (5*d+1).

Original entry on oeis.org

1, 5, 50, 500, 5480, 62776, 749397, 9203128, 115607259, 1478308780, 19180049927, 251857056364, 3340843549854, 44700484300317, 602574657421585, 8175951649914160, 111572030260242089, 1530312970224714489, 21085148778264281864, 291705220703240850760, 4050527291832419432577
Offset: 1

Views

Author

Ilya Gutkovskiy, Aug 08 2021

Keywords

Comments

Moebius transform of A002295.

Crossrefs

Programs

  • Mathematica
    Table[Sum[MoebiusMu[n/d] Binomial[6 d, d]/(5 d + 1), {d, Divisors[n]}], {n, 21}]

A346939 a(n) = Sum_{d|n} mu(n/d) * binomial(8*d,d) / (7*d+1).

Original entry on oeis.org

1, 7, 91, 1232, 18277, 285285, 4638347, 77650784, 1329890613, 23190011435, 410333440535, 7349042707872, 132969010888279, 2426870701777445, 44627576949345735, 826044435331747776, 15378186970730687399, 287756293702214647875, 5409093674555090316299, 102094541350713952736608
Offset: 1

Views

Author

Ilya Gutkovskiy, Aug 08 2021

Keywords

Comments

Moebius transform of A007556.

Crossrefs

Programs

  • Mathematica
    Table[Sum[MoebiusMu[n/d] Binomial[8 d, d]/(7 d + 1), {d, Divisors[n]}], {n, 20}]
Showing 1-4 of 4 results.