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 A022146 #24 Aug 13 2025 08:35:37
%S A022146 1,32,224,768,1856,3680,6432,10304,15488,22176,30560,40832,53184,
%T A022146 67808,84896,104640,127232,152864,181728,214016,249920,289632,333344,
%U A022146 381248,433536,490400,552032,618624,690368,767456,850080,938432,1032704,1133088,1239776,1352960
%N A022146 Coordination sequence for root lattice B_4.
%H A022146 Vincenzo Librandi, <a href="/A022146/b022146.txt">Table of n, a(n) for n = 0..1000</a>
%H A022146 M. Baake and U. Grimm, <a href="https://arxiv.org/abs/cond-mat/9706122">Coordination sequences for root lattices and related graphs</a>, arXiv:cond-mat/9706122, Zeit. f. Kristallographie, 212 (1997), 253-256.
%H A022146 R. Bacher, P. de la Harpe and B. Venkov, <a href="http://dx.doi.org/10.1016/S0764-4442(97)83542-2">Séries de croissance et séries d'Ehrhart associées aux réseaux de racines</a>, C. R. Acad. Sci. Paris, 325 (Series 1) (1997), 1137-1142.
%H A022146 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (4,-6,4,-1).
%F A022146 a(0) = 1, a(n) = 32*n^3 - 16*n^2 + 16*n. - _Ralf Stephan_, Sep 03 2003
%F A022146 G.f.: (1+28*x+102*x^2+60*x^3+x^4)/(1-x)^4 = 1+32*x*(x+1)*(2*x+1)/(1-x)^4. - _Colin Barker_, Apr 13 2012
%t A022146 CoefficientList[Series[(1+28*x+102*x^2+60*x^3+x^4)/(1-x)^4,{x,0,40}],x] (* _Vincenzo Librandi_, Apr 20 2012 *)
%o A022146 (Magma) [1] cat[32*n^3 - 16*n^2 + 16*n: n in [1..40]]; // _Vincenzo Librandi_, Apr 20 2012
%K A022146 nonn,easy
%O A022146 0,2
%A A022146 mbaake(AT)sunelc3.tphys.physik.uni-tuebingen.de (Michael Baake)