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

A291772 Number of minimal dominating sets in the 2n-crossed prism graph.

Original entry on oeis.org

4, 12, 61, 316, 1304, 5223, 21557, 90404, 377863, 1572942, 6545785, 27262279, 113572619, 473082153, 1970443556, 8207168564, 34184621296, 142386794787, 593071821262, 2470268797246, 10289192009129, 42856677944829, 178507203892808, 743520516941183
Offset: 1

Views

Author

Eric W. Weisstein, Aug 31 2017

Keywords

Crossrefs

Programs

  • Mathematica
    Rest@ CoefficientList[Series[x (4 - 4 x + 21 x^2 + 68 x^3 + 10 x^4)/(1 - 4 x + 2 x^2 - 7 x^3 - 17 x^4 - 2 x^5), {x, 0, 24}], x] (* Michael De Vlieger, Aug 31 2017 *)
    LinearRecurrence[{4,-2,7,17,2},{4,12,61,316,1304},30] (* Harvey P. Dale, Jul 02 2019 *)
    Table[RootSum[-2 - 17 # - 7 #^2 + 2 #^3 - 4 #^4 + #^5 &, #^n &], {n, 20}] (* Eric W. Weisstein, Sep 08 2021 *)
  • PARI
    Vec((4 - 4*x + 21*x^2 + 68*x^3 + 10*x^4)/(1 - 4*x + 2*x^2 - 7*x^3 - 17*x^4 - 2*x^5)+O(x^30)) \\ Andrew Howroyd, Aug 31 2017
    
  • PARI
    \\ sequence prepended by a 5:
    polsym(-2 - 17*x - 7*x^2 + 2*x^3 - 4*x^4 + x^5, 24) \\ Joerg Arndt, Sep 08 2021

Formula

From Andrew Howroyd, Aug 31 2017: (Start)
a(n) = 4*a(n-1) - 2*a(n-2) + 7*a(n-3) + 17*a(n-4) + 2*a(n-5) for n > 5.
G.f.: x*(4 - 4*x + 21*x^2 + 68*x^3 + 10*x^4)/(1 - 4*x + 2*x^2 - 7*x^3 - 17*x^4 - 2*x^5).
(End)

Extensions

a(1) and terms a(7) and beyond from Andrew Howroyd, Aug 31 2017

A287327 Number of independent vertex sets (and vertex covers) in the 2n-crossed prism graph.

Original entry on oeis.org

2, 7, 35, 196, 1127, 6517, 37730, 218491, 1265327, 7327852, 42437675, 245768761, 1423317602, 8242841887, 47736669995, 276456796756, 1601040887327, 9272088633997, 53697334226690, 310976719148851, 1800955694455127, 10429852827143932, 60402279928821635
Offset: 0

Views

Author

Andrew Howroyd, Aug 31 2017

Keywords

Comments

Sequence extrapolated to n = 0 using recurrence.

Crossrefs

Cf. A276225 (maximal independent vertex sets), A287062, A290708.

Programs

  • Mathematica
    CoefficientList[Series[(2 - 7 x)/(1 - 7 x + 7 x^2), {x, 0, 22}], x] (* Michael De Vlieger, Aug 31 2017 *)
    Table[(1/2 (7 - Sqrt[21]))^n + (1/2 (7 + Sqrt[21]))^n, {n, 0, 20}] // Expand (* Eric W. Weisstein, Sep 21 2017 *)
    LinearRecurrence[{7, -7}, {7, 35}, {0, 20}] (* Eric W. Weisstein, Sep 21 2017 *)
  • PARI
    Vec((2 - 7*x)/(1 - 7*x + 7*x^2) + O(x^30))

Formula

a(n) = 7*a(n-1) - 7*a(n-2) for n > 1.
G.f.: (2 - 7*x)/(1 - 7*x + 7*x^2).

A291065 Number of maximal irredundant sets in the 2n-crossed prism graph.

Original entry on oeis.org

12, 124, 588, 2319, 11094, 52882, 255900, 1213693, 5681867, 26951995, 128276070, 607245760, 2873887210, 13621766889, 64560977404, 305887320978, 1449284744409, 6867120322984, 32538956230983, 154179092000785, 730537134063463, 3461478405209108, 16401475071020550
Offset: 2

Views

Author

Eric W. Weisstein, Aug 17 2017

Keywords

Crossrefs

Cf. A290708.

Extensions

a(7)-a(8) from Andrew Howroyd, Aug 31 2017
More terms from Christian Sievers, Nov 13 2023
Showing 1-3 of 3 results.