|
%I #65 Sep 08 2022 08:46:09
%S 1,0,2,0,2,9,0,4,20,64,0,6,48,204,625,0,10,121,682,2604,7776,0,18,312,
%T 2340,11160,39990,117649,0,32,820,8192,48828,209952,720600,2097152,0,
%U 56,2187,29127,217013,1119744,4483734,14913080,43046721,0,102,5904,104857
%N Floor(m^n/n) with n >= m >= 1.
%e Triangle begins:
%e 1;
%e 0, 2;
%e 0, 2, 9;
%e 0, 4, 20, 64;
%e 0, 6, 48, 204, 625;
%e 0, 10, 121, 682, 2604, 7776;
%e 0, 18, 312, 2340, 11160, 39990, 117649;
%e 0, 32, 820, 8192, 48828, 209952, 720600, 2097152;
%e 0, 56, 2187, 29127, 217013, 1119744, 4483734, 14913080, 43046721;
%e ...
%t Table[Floor[m^n/n], {n, 1, 10}, {m, 1, n}]
%o (Magma) /* As triangle: */ [[Floor(m^n/n): m in [1..n]]: n in [1..10]];
%o (PARI) tabl(nn) = {for (n=1, nn, for (m=1, n, print1(m^n\n, ", ");); print(););} \\ _Michel Marcus_, Dec 12 2014
%Y Cf. A117142.
%Y Cf. for the k-th column: A063524 (k=1), A000799(k=2), A092763(k=3), A129794(k=4), A129795(k=5), A129796 (k=6), A129797 (k=7), A129798 (k=8), A129799 (k=9).
%K nonn,tabl
%O 1,3
%A _Vincenzo Librandi_, Dec 11 2014
|
