cp's OEIS Frontend

A027479 Triangle of the fourth power of the normalized, unsigned Stirling matrix of the first kind.

%I A027479 #15 Jan 30 2021 02:13:04
%S A027479 1,15,1,1175,120,1,294330,36935,510,1,181082204,25816200,460035,1560,
%T A027479 1,231844265940,36133755364,757122975,3411835,3885,1,551220029003580,
%U A027479 91850446178400,2159098539409,11690792400,18037810,8400,1,2239429013789400720,393327895035809180,10088942720014620,62324463343569,117282133080,75042450,16380,1
%N A027479 Triangle of the fourth power of the normalized, unsigned Stirling matrix of the first kind.
%e A027479 First rows of the triangle are:
%e A027479           1;
%e A027479          15,        1;
%e A027479        1175,      120,      1;
%e A027479      294330,    36935,    510,    1;
%e A027479   181082204, 25816200, 460035, 1560, 1;
%e A027479   ...
%t A027479 Module[{nmax=8,m},m=(Table[Table[(-1)^(i+j) StirlingS1[i,j]/i!,{j,1,nmax}],{i,1,nmax}]);m=m.m.m.m*Table[i!^4,{i,1,nmax}]; Flatten[Table[Table[m[[i,j]],{j,1,i}],{i,1,nmax}],1]]
%Y A027479 Cf. A027477 (second-order triangle), A027478 (third-order triangle).
%K A027479 nonn,tabl,easy
%O A027479 1,2
%A A027479 _Olivier Gérard_
%E A027479 Definition, formula and program edited for clarity by _Olivier Gérard_, Jan 20 2019