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.

A302749 Number of maximal matchings in the n-path complement graph.

This page as a plain text file.
%I A302749 #14 Feb 16 2025 08:33:53
%S A302749 1,1,1,2,6,11,41,77,365,694,3984,7639,51499,99343,769159,1490474,
%T A302749 13031514,25341713,246925295,481540391,5173842311,10113069526,
%U A302749 118776068256,232612909297,2964697094281,5815557347521,79937923931761,157024987610282,2315462770608870,4553838477539219
%N A302749 Number of maximal matchings in the n-path complement graph.
%H A302749 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/MaximalIndependentEdgeSet.html">Maximal Independent Edge Set</a>
%H A302749 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/PathComplementGraph.html">Path Complement Graph</a>
%F A302749 a(2n+1) = A302750(2n+1), a(2n) = Sum_{k=0..n} (1-k)*(-1)^k*binomial(2*n-k,k)*(2*(n-k)-1)!!. - _Andrew Howroyd_, Apr 15 2018
%t A302749 Table[If[Mod[n, 2] == 0, (n - 1)!! (Hypergeometric1F1[1 - n/2, 1 - n, -2] + Hypergeometric1F1[-n/2, -n, -2]), (2^-Floor[n/2] n! Hypergeometric1F1[-Floor[n/2], -n, -2])/Floor[n/2]!], {n, 30}]
%o A302749 (PARI)
%o A302749 b(n)=(2*n)!/(2^n*n!);
%o A302749 a(n)=sum(k=0, n\2, if(n%2,1,(1-k))*(-1)^k*binomial(n-k,k)*b((n+1)\2-k)) \\ _Andrew Howroyd_, Apr 15 2018
%Y A302749 Cf. A170941 (matchings), A302750 (maximum matchings).
%K A302749 nonn
%O A302749 1,4
%A A302749 _Eric W. Weisstein_, Apr 12 2018
%E A302749 a(17)-a(30) from _Andrew Howroyd_, Apr 15 2018