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 A366816 #22 Feb 16 2025 08:34:06
%S A366816 232,1296,3868,8624,16240,27392,42756,63008,88824,120880,159852,
%T A366816 206416,261248,325024,398420,482112,576776,683088,801724,933360,
%U A366816 1078672,1238336,1413028,1603424,1810200,2034032,2275596,2535568,2814624,3113440,3432692,3773056
%N A366816 Wiener index in diamond nanowires obtained by connecting n unit cells in a sequence.
%H A366816 Paolo Xausa, <a href="/A366816/b366816.txt">Table of n, a(n) for n = 1..10000</a>
%H A366816 Benedek Nagy, <a href="https://doi.org/10.1002/qua.27258">The hyper-Wiener Index of diamond nanowires</a>, International Journal of Quantum Chemistry, e27258, 2023.
%H A366816 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/WienerIndex.html">Wiener Index</a>
%H A366816 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (4,-6,4,-1).
%F A366816 a(n) = (338*n^3 + 234*n^2 + 124*n)/3.
%t A366816 A366816[n_] := 2/3*((13*n + 9)*13*n + 62)*n; Array[A366816, 50] (* or *)
%t A366816 LinearRecurrence[{4, -6, 4, -1}, {232, 1296, 3868, 8624}, 50] (* _Paolo Xausa_, Oct 01 2024 *)
%Y A366816 Cf. A366815.
%K A366816 nonn,easy
%O A366816 1,1
%A A366816 _Benedek Nagy_, Oct 24 2023