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 A346464 #8 Jul 20 2021 05:17:53 %S A346464 0,1,-7,93,-2159,79205,-4243431,313117357,-30459187423,3777547352949, %T A346464 -581776592603735,108932905225448381,-24370170371013413967, %U A346464 6419958293615735090053,-1967044830254804722091719,693575524342402846796188365,-278846808098157253796358662591 %N A346464 a(n) = 6 * GaussBinomial(2*n, 2, 2) * Bernoulli(2*n, 1). %F A346464 a(n) = -2*n*(4^n - 2)*(4^n - 1)*zeta(1 - 2*n) for n >= 1. %p A346464 a := n -> `if`(n = 0, 0, -2*n*(4^n - 2)*(4^n - 1)*Zeta(1 - 2*n)): %p A346464 seq(a(n), n = 0..16); %t A346464 Table[6 QBinomial[2 n, 2, 2] BernoulliB[2 n, 1], {n, 0, 16}] %Y A346464 Cf. A006095, A000367, A002445, A346463. %K A346464 sign %O A346464 0,3 %A A346464 _Peter Luschny_, Jul 19 2021