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.

A182166 The total number of components of size 2 over all simple labeled graphs on n nodes.

This page as a plain text file.
%I A182166 #22 Sep 05 2022 05:25:25
%S A182166 1,3,12,80,960,21504,917504,75497472,12079595520,3779571220480,
%T A182166 2322168557862912,2810246167479189504,6714614842830276788224,
%U A182166 31734302764884015836037120,297105609428491265975789813760,5516815412193254355313652349796352
%N A182166 The total number of components of size 2 over all simple labeled graphs on n nodes.
%H A182166 Alois P. Heinz, <a href="/A182166/b182166.txt">Table of n, a(n) for n = 2..50</a>
%F A182166 E.g.f.: x^2/2 * G(x) where G(x) is e.g.f. for A006125.
%F A182166 a(n) = C(n,2) * 2^C(n-2,2). - _Alois P. Heinz_, Apr 16 2012
%p A182166 a:= n-> binomial(n, 2) *2^binomial(n-2, 2):
%p A182166 seq (a(n), n=2..20);  # _Alois P. Heinz_, Apr 16 2012
%t A182166 nn = 20; g = Sum[2^Binomial[n, 2] x^n/n!, {n, 0, nn}]; Drop[Range[0, nn]! CoefficientList[Series[x^2/2 g, {x, 0, nn}], x], 2]
%o A182166 (Magma) B:=Binomial; [B(n,2)*2^B(n-2,2): n in [2..20]]; // _G. C. Greubel_, Sep 04 2022
%o A182166 (SageMath) b=binomial; [b(n,2)*2^b(n-2,2) for n in (2..20)] # _G. C. Greubel_, Sep 04 2022
%Y A182166 Cf. A000217, A006125.
%K A182166 nonn
%O A182166 2,2
%A A182166 _Geoffrey Critzer_, Apr 15 2012