|
%I #7 Dec 15 2018 13:59:25
%S 7,4032,89812800,56510213760000,849349360466006400000,
%T 275486641731816152769331200000,
%U 1803836893978771496626439330581708800000,227637647167687849779974528677945404209233920000000,535361773557812808743387755473014006489270247399358464000000000
%N Let M_n be the n X n matrix with M_n(i,j)=1/(i+j+5); then a(n)=1/det(M_n).
%t Table[Denominator[Det[Table[1/(i+j+5),{i,n},{j,n}]]],{n,10}] (* _Harvey P. Dale_, Dec 15 2018 *)
%o (PARI) for(n=1,10,print1(1/matdet(matrix(n,n,i,j,1/(i+j+5))),","))
%K easy,nonn
%O 1,1
%A _Benoit Cloitre_, Apr 21 2002
%E More terms from _Harvey P. Dale_, Dec 15 2018
|
