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.

A014605 Partial sums of A001935; at one time this was conjectured to agree with A007478.

Original entry on oeis.org

1, 1, 1, 1, 2, 3, 5, 8, 12, 18, 27, 39, 55, 77, 106, 144, 194, 258, 340, 445, 577, 743, 951, 1209, 1529, 1924, 2408, 3000, 3722, 4598, 5658, 6938, 8477, 10323, 12533, 15169, 18307, 22035, 26451, 31673, 37836, 45092, 53620, 63626, 75342, 89038, 105024, 123648
Offset: 0

Views

Author

Keywords

Programs

  • Maple
    b:= proc(n) option remember; `if`(n=0, 1, add(b(n-j)*add(`if`(
          irem(d, 4)=0, 0, d), d=numtheory[divisors](j)), j=1..n)/n)
        end:
    a:= proc(n) option remember; `if`(n<4, 1, a(n-1)+b(n-4)) end:
    seq(a(n), n=0..60);  # Alois P. Heinz, Jul 21 2018
  • Mathematica
    QP = QPochhammer; Join[{1, 0, 0, 0}, CoefficientList[QP[q^4]/QP[q]+O[q]^50, q]] // Accumulate (* Jean-François Alcover, Jul 21 2018 *)

Formula

a(n) = a(n-1) + A001935(n-4), n>3. - R. J. Mathar, Mar 06 2016

A007293 Dimension of space of weight systems of chord diagrams.

Original entry on oeis.org

1, 0, 1, 1, 3, 4, 9, 14, 27, 44, 80, 132, 232
Offset: 0

Views

Author

Keywords

References

  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

Crossrefs

Formula

Broadhurst gives a conjectured g.f.

Extensions

Description corrected by Sergei Duzhin, Aug 29 2000

A007473 Dimension of space of Vassiliev knot invariants of order n.

Original entry on oeis.org

1, 1, 2, 3, 6, 10, 19, 33, 60, 104, 184, 316, 548
Offset: 0

Views

Author

Keywords

References

  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

Crossrefs

Cf. A007293 (first differences), A007478, A014595 (conjectured continuation).

Formula

G.f.: Product_{ m >= 1 } (1-y^m)^(-A007478(m)). - Andrey Zabolotskiy, Sep 19 2017
Broadhurst gives a conjectured explicit g.f. (different from A014595).

Extensions

Description corrected by Sergei Duzhin, Aug 29 2000

A014595 Conjectured dimensions of spaces of weight systems of chord diagrams.

Original entry on oeis.org

1, 1, 2, 3, 6, 10, 19, 33, 60, 104, 184, 316, 548, 931, 1588, 2676, 4511, 7539, 12590, 20890, 34603, 57036, 93804, 153655, 251109, 408961, 664467, 1076398, 1739660, 2804166, 4510035, 7236242, 11585908, 18509442, 29511312, 46957178, 74575323, 118213424, 187052097, 295453415
Offset: 0

Views

Author

Keywords

Comments

First 13 terms agree with A007473, next terms obtained from A014605.

Crossrefs

Cf. A014605 (conjectured to agree with A007478), A014596 (first differences, conjectured to agree with A007293). This sequences is conjectured to agree with A007473. All these (equivalent) conjectures are probably wrong since Jan Kneissler states that A007478(13) >= 78 (see A007478), while A014605(13)=77.

Programs

  • Mathematica
    terms = 40; QP = QPochhammer; A014605 = Join[{1, 0, 0, 0}, CoefficientList[ QP[q^4]/QP[q] + O[q]^terms, q]] // Accumulate;
    gf = Product[(1 - y^m)^(-A014605[[m+1]]), {m, 1, terms}] + O[y]^terms;
    CoefficientList[gf, y] (* Jean-François Alcover, Jul 21 2018 *)

Formula

G.f.: Product_{ m >= 1 } (1-y^m)^(-A014605(m)). - Andrey Zabolotskiy, Sep 15 2017

Extensions

More terms from Joerg Arndt, Sep 19 2017
Showing 1-4 of 4 results.