|
%I #24 Sep 08 2022 08:45:40
%S 2,5,10,8,15,22,11,20,29,38,14,25,36,47,58,17,30,43,56,69,82,20,35,50,
%T 65,80,95,110,23,40,57,74,91,108,125,142,26,45,64,83,102,121,140,159,
%U 178,29,50,71,92,113,134,155,176,197,218,32,55,78,101,124,147,170,193,216,239,262
%N Triangle read by rows where T(m,n)=2*m*n + m + n - 2.
%C All terms are in A153052.
%C First column: A016789; second column: 5*A000027; third column: A016993; fourth column: A017185. - _Vincenzo Librandi_, Nov 18 2012
%H Vincenzo Librandi, <a href="/A154680/b154680.txt">Rows n = 1..100, flattened</a>
%e Triangle begins:
%e 2;
%e 5, 10;
%e 8, 15, 22;
%e 11, 20, 29, 38;
%e 14, 25, 36, 47, 58;
%e 17, 30, 43, 56, 69, 82;
%e 20, 35, 50, 65, 80, 95, 110;
%e 23, 40, 57, 74, 91, 108, 125, 142;
%e 26, 45, 64, 83, 102, 121, 140, 159, 178;
%e 29, 50, 71, 92, 113, 134, 155, 176, 197, 218; etc.
%t Flatten[Table[Floor[2 n m + m + n - 2], {n, 1, 16}, {m, n}]] (* _Vincenzo Librandi_, May 14 2012 *)
%o (Magma) [2*n*k+n+k-2: k in [1..n], n in [1..11]]; // _Vincenzo Librandi_, Nov 18 2012
%Y Cf. A153052, A089038, A016789, A000027, A017185.
%K nonn,tabl,easy
%O 1,1
%A _Vincenzo Librandi_, Jan 18 2009
|
