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 A278926 #10 Dec 24 2018 02:48:55 %S A278926 1,2,353,561608,4341274884,111107400842568,7493918659070379300, %T A278926 1139021252689549522419840,348457223545199873458486125120, %U A278926 196982631587037086047232203674775680,192443334239172066295878807351087122210880,307899710379447999264505625949360598523097530880 %N A278926 a(n) = permanent M_n where M_n is the n X n matrix m(i,j) = i^4 + j^4. %H A278926 Vaclav Kotesovec, <a href="/A278926/b278926.txt">Table of n, a(n) for n = 0..36</a> %F A278926 a(n) ~ c * d^n * n!^5 / n^2, where d = 11.83108... and c = 0.68284... %p A278926 with(LinearAlgebra): %p A278926 a:= n-> `if`(n=0, 1, Permanent(Matrix(n, (i, j)-> i^4+j^4))): %p A278926 seq(a(n), n=0..16); %t A278926 Flatten[{1, Table[Permanent[Table[i^4+j^4, {i, 1, n}, {j, 1, n}]], {n, 1, 15}]}] %o A278926 (PARI) {a(n) = matpermanent(matrix(n, n, i, j, i^4+j^4))} %o A278926 for(n=0, 20, print1(a(n), ", ")) \\ _Vaclav Kotesovec_, Dec 21 2018 %Y A278926 Cf. A204249, A278847, A278925. %K A278926 nonn %O A278926 0,2 %A A278926 _Vaclav Kotesovec_, Dec 01 2016