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.
%I A307885 #20 May 31 2020 21:58:14 %S A307885 1,0,-3,28,-255,2376,-20195,71688,3834369,-187855280,6676401501, %T A307885 -220595216280,7180102389889,-234023553073296,7631745228481725, %U A307885 -245429882267144624,7501602903392006145,-196609711096827812448,2542435002501531333949 %N A307885 Coefficient of x^n in (1 - (n-1)*x - n*x^2)^n. %C A307885 Also coefficient of x^n in the expansion of 1/sqrt(1 + 2*(n-1)*x + ((n+1)*x)^2). %H A307885 Seiichi Manyama, <a href="/A307885/b307885.txt">Table of n, a(n) for n = 0..386</a> %F A307885 a(n) = Sum_{k=0..n} (-n)^k * binomial(n,k)^2. %F A307885 a(n) = Sum_{k=0..n} (-n-1)^(n-k) * binomial(n,k) * binomial(n+k,k). %F A307885 a(n) = Hypergeometric2F1(-n, -n, 1, -n). - _Vaclav Kotesovec_, May 07 2019 %F A307885 a(n) = n! * [x^n] exp((1 - n)*x) * BesselI(0,2*sqrt(-n)*x). - _Ilya Gutkovskiy_, May 31 2020 %p A307885 A307885:= n -> simplify(hypergeom([-n,-n], [1], -n)); %p A307885 seq(A307885(n), n = 0..30); # _G. C. Greubel_, May 31 2020 %t A307885 Table[Hypergeometric2F1[-n, -n, 1, -n], {n, 0, 20}] (* _Vaclav Kotesovec_, May 07 2019 *) %o A307885 (PARI) {a(n) = polcoef((1-(n-1)*x-n*x^2)^n, n)} %o A307885 (PARI) {a(n) = sum(k=0, n, (-n)^k*binomial(n, k)^2)} %o A307885 (PARI) {a(n) = sum(k=0, n, (-n-1)^(n-k)*binomial(n, k)*binomial(n+k, k))} %o A307885 (Sage) [ hypergeometric([-n, -n], [1], -n).simplify_hypergeometric() for n in (0..30)] # _G. C. Greubel_, May 31 2020 %Y A307885 Main diagonal of A307884. %Y A307885 Cf. A187021. %K A307885 sign %O A307885 0,3 %A A307885 _Seiichi Manyama_, May 02 2019