A157928 -id:A157928 - cp's OEIS frontend

A165652 Number of disconnected 2-regular graphs on n vertices.

0, 0, 0, 0, 0, 0, 1, 1, 2, 3, 4, 5, 8, 9, 12, 16, 20, 24, 32, 38, 48, 59, 72, 87, 109, 129, 157, 190, 229, 272, 330, 390, 467, 555, 659, 778, 926, 1086, 1283, 1509, 1774, 2074, 2437, 2841, 3322, 3871, 4509, 5236, 6094, 7055, 8181, 9464, 10944, 12624, 14577, 16778, 19322, 22209

Offset: 0

Jason Kimberley, Sep 28 2009

a(n) is also the number of partitions of n such that each part i satisfies 2

For n>=2, it appears that a(n+1) is the number of (1,0)-separable partitions of n, as defined at A239482. For example, the four (1,0)-separable partitions of 9 are 621, 531, 441, 31212, corresponding to a(10) = 4. - Clark Kimberling, Mar 21 2014.

			The a(6)=1 graph is C_3+C_3. The a(7)=1 graph is C_3+C_4. The a(8)=2 graphs are C_3+C_5, C_4+C_4. The a(9)=3 graphs are 3C_3, C_3+C_6, C_4+C_5.

Andrew van den Hoeven, Table of n, a(n) for n = 0..10000
Jason Kimberley, Disconnected regular graphs (with girth at least 3)
Jason Kimberley, Index of sequences counting disconnected k-regular simple graphs with girth at least g

2-regular simple graphs: A179184 (connected), this sequence (disconnected), A008483 (not necessarily connected).
Disconnected regular simple graphs: A068932 (any degree), A068933 (triangular array), specified degree k: A157928 (k=0), A157928 (k=1), this sequence (k=2), A165653 (k=3), A033483 (k=4), A165655 (k=5), A165656 (k=6), A165877 (k=7), A165878 (k=8).
Disconnected 2-regular simple graphs with girth at least g: this sequence (g=3), A185224 (g=4), A185225 (g=5), A185226 (g=6), A185227 (g=7), A185228 (g=8), A185229 (g=9).
Cf. A239482.

p := NumberOfPartitions; a := func< n | n lt 3 select 0 else p(n) - p(n-1) - p(n-2) + p(n-3) - 1 >;

a = A008483 - A179184 = Euler_tranformation(A179184) - A179184.
For n > 2, since there is exactly one connected 2-regular graph on n vertices (the n cycle C_n) then a(n) = A008483(n) - 1.
(A008483(n) is also the number of not necessarily connected 2-regular graphs on n vertices.)
Column D(n, 2) in the triangle A068933.

A185012 Characteristic function of two.

Original entry on oeis.org

0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0

Offset: 0

Jason Kimberley, Oct 11 2011

The Euler transformation of this sequence is A059841.

This sequence is the first differences of A157928.

Index entries for linear recurrences with constant coefficients, signature (1).

Cf. A171386.

Characteristic function of g: A000007 (g=0), A063524 (g=1), this sequence (g=2), A185013 (g=3), A185014 (g=4), A185015 (g=5), A185016 (g=6), A185017 (g=7).

def A185012(n): return int(n==2) # Chai Wah Wu, Feb 04 2022

A185293 Number of disconnected 9-regular graphs with 2n nodes.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 9, 88238, 113315027550, 281342192047999912, 1251394783006077652496450, 9854615127100313024544239975139, 134283364935428822131144679491097123786

Offset: 0

Jason Kimberley, Jan 26 2012

Jason Kimberley, Index of sequences counting disconnected k-regular simple graphs with girth at least g

9-regular simple graphs: A014381 (connected), this sequence (disconnected).

Disconnected regular simple graphs: A068932 (any degree), A068933 (triangular array), specified degree k: A157928 (k=0), A157928 (k=1), A165652 (k=2), A165653 (k=3), A033483 (k=4), A165655 (k=5), A165656 (k=6), A165877 (k=7), A165878 (k=8), this sequence (k=9), A185203 (k=10), A185213 (k=11).

a(14)-a(17) from Andrew Howroyd, May 20 2020

A284050 a(n) = floor(A240751(n) / n), where A240751(n) = the smallest k such that in the prime power factorization of k! there exists at least one exponent n.

Original entry on oeis.org

2, 3, 1, 1, 2, 2, 1, 1, 2, 1, 1, 4, 2, 2, 1, 1, 2, 1, 1, 4, 2, 1, 1, 4, 1, 1, 2, 2, 6, 2, 1, 1, 4, 1, 1, 2, 4, 1, 1, 2, 1, 1, 4, 2, 2, 1, 1, 2, 1, 1, 4, 4, 1, 1, 2, 1, 1, 2, 2, 6, 2, 2, 1, 1, 4, 1, 1, 2, 4, 1, 1, 2, 1, 1, 2, 2, 4, 1, 1, 2, 1, 1, 4, 2, 1, 1, 4

Offset: 1

David A. Corneth, Mar 19 2017

For n > 2, p = a(n) + 1 is the prime that has exponent n in A240751(n)! (see A240751 for an outline of a proof).

First occurrence of p-1: 1, 2, 12, 29, 186, 2865, 3265, 379852, 7172525, ..., (A240764). - Robert G. Wilson v, Apr 15 2017. Comment changed by David A. Corneth, Apr 15 2017

			For n = 5, p = a(n) + 1 = 3 is the prime such that A240751(5)! = 12! is the least factorial that has exponent 5.

Robert G. Wilson v, Table of n, a(n) for n = 1..10000

Cf. A240751, A240755, A240764, A284051, A157928.

Table[k = 2; While[! MemberQ[FactorInteger[k!][[All, -1]], n], k++]; Floor[k/n], {n, 87}] (* Michael De Vlieger, Mar 24 2017 *)

a(n) = A240751(n)\n \\ (for computation of A240751(n), see A240751)

A240751(n) = n*a(n) + A284051(n). - Antti Karttunen, Mar 22 2017

a(n) = A240755(n) - 1 for n > 2 and a(n) = A240755(n) for n < 3. I.e., A240755(n) - A157928(n+1). - David A. Corneth, Mar 27 2017

A294619 a(0) = 0, a(1) = 1, a(2) = 2 and a(n) = 1 for n > 2.

Original entry on oeis.org

0, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1

Offset: 0

Franck Maminirina Ramaharo, Nov 05 2017

Continued fraction expansion of (sqrt(5) + 1)/(2*sqrt(5)).
Inverse binomial transform is {0, 1, 4, 10, 21, 41, 78, 148, ...}, A132925 with one leading zero.
Also the main diagonal in the expansion of (1 + x)^n - 1 + x^2 (A300453).
The partial sum of this sequence is A184985.
a(n) is the number of state diagrams having n components that are obtained from an n-foil [(2,n)-torus knot] shadow. Let a shadow diagram be the regular projection of a mathematical knot into the plane, where the under/over information at every crossing is omitted. A state for the shadow diagram is a diagram obtained by merging either of the opposite areas surrounding each crossing.
a(n) satisfies the identities a(n)^a(n+k) = a(n), 2^a(k) = 2*a(k) and a(k)! = a(k), k > 0.
Also the number of non-isomorphic simple connected undirected graphs with n+1 edges and a longest path of length 2. - Nathaniel Gregg, Nov 02 2021

			For n = 2, the shadow of the Hopf link yields 2 two-component state diagrams (see example in A300453). Thus a(2) = 2.

V. I. Arnold, Topological Invariants of Plane Curves and Caustics, American Math. Soc., 1994.
L. H. Kauffman, Knots and Physics, World Scientific Publishers, 1991.
V. Manturov, Knot Theory, CRC Press, 2004.

I. Altintas, An oriented state model for the Jones polynomial and its applications to alternating links, Appl. Math. Comput. 194 (2007) 168-178.
J. A. Baldwin and A. S. Levine, A combinatorial spanning tree model for knot Floer homology, Advances in Mathematics, Vol. 231 (2012), 1886-1939.
A. Banerjee, Knot theory [Foil knot family].
D. Denton and P. Doyle, Shadow movies not arising from knots, arXiv preprint, arXiv:1106.3545 [math.GT], 2011.
L. H. Kauffman, State models and the Jones polynomial, Topology, Vol. 26 (1987), 395-407.
Franck Ramaharo, A generating polynomial for the two-bridge knot with Conway's notation C(n,r), arXiv:1902.08989 [math.CO], 2019.
Index entries for linear recurrences with constant coefficients, signature (1).

Cf. A000007, A000045, A004278, A005096, A005803, A010701, A063524, A103775, A107583, A130130, A132925, A141044, A157928, A158411, A163985, A171386, A179184, A184985, A185012, A300453.

CoefficientList[Series[(x + x^2 - x^3)/(1 - x), {x, 0, 100}], x] (* Wesley Ivan Hurt, Nov 05 2017 *)
f[n_] := If[n > 2, 1, n]; Array[f, 105, 0] (* Robert G. Wilson v, Dec 27 2017 *)
PadRight[{0,1,2},120,{1}] (* Harvey P. Dale, Feb 20 2023 *)

makelist((1 + (-1)^((n + 1)!))/2 + kron_delta(n, 2), n, 0, 100);

PARI
```
a(n) = if(n>2, 1, n);
```

a(n) = ((-1)^2^(n^2 + 3*n + 2) + (-1)^2^(n^2 - n) - (-1)^2^(n^2 - 3*n + 2) + 1)/2.
a(n) = (1 + (-1)^((n + 1)!))/2 + Kronecker(n, 2).
a(n) = min(n, 3) - 2*(max(n - 2, 0) - max(n - 3, 0)).
a(n) = floor(F(n+1)/F(n)) for n > 0, with a(0) = 0, where F(n) = A000045(n) is the n-th Fibonacci number.
a(n) = a(n-1) for n > 3, with a(0) = 0, a(1) = 1, a(2) = 2 and a(3) = 1.
A005803(a(n)) = A005096(a(n)) = A000007(n).
A107583(a(n)) = A103775(n+5).
a(n+1) = 2^A185012(n+1), with a(0) = 0.
a(n) = A163985(n) mod A004278(n+1).
a(n) = A157928(n) + A171386(n+1).
a(n) = A063524(n) + A157928(n) + A185012(n).
a(n) = A010701(n) - A141044(n) - A179184(n).
G.f.: (x + x^2 - x^3)/(1 - x).
E.g.f.: (2*exp(x) - 2 + x^2)/2.

Showing 1-5 of 5 results.

cp's OEIS Frontend

A165652 Number of disconnected 2-regular graphs on n vertices.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Magma

Formula

A185012 Characteristic function of two.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Python

A185293 Number of disconnected 9-regular graphs with 2n nodes.

Views

Author

Keywords

Links

Crossrefs

Extensions

A284050 a(n) = floor(A240751(n) / n), where A240751(n) = the smallest k such that in the prime power factorization of k! there exists at least one exponent n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Formula

A294619 a(0) = 0, a(1) = 1, a(2) = 2 and a(n) = 1 for n > 2.

Views

Author

Keywords

Comments

Examples

References

Links

Crossrefs

Programs

Mathematica

Maxima

PARI

Formula