|
%I #22 May 05 2019 18:41:31
%S 2,3,6,5,10,15,7,14,21,28,11,22,33,44,55,13,26,39,52,65,78,17,34,51,
%T 68,85,102,119,19,38,57,76,95,114,133,152,23,46,69,92,115,138,161,184,
%U 207,29,58,87,116,145,174,203,232,261,290
%N Triangle in which n-th row contains n smallest multiples of the n-th prime.
%C 0. A000040 (primes) gives initial terms of rows.
%C 1. A033286 contains the final terms of rows.
%C 2. Sum of the n-th row = prime(n)*A000217(n), by definition.
%C 3. a(A000217(n) + 1) = prime(n+1), by definition.
%H Ivan Neretin, <a href="/A077320/b077320.txt">Table of n, a(n) for n = 1..8128</a>
%F T(n,k) = k*prime(n) with 1 <= k <= n. - _Bruno Berselli_, Sep 05 2017
%e From _Bruno Berselli_, Sep 05 2017: (Start)
%e Triangle begins:
%e 2;
%e 3, 6;
%e 5, 10, 15;
%e 7, 14, 21, 28;
%e 11, 22, 33, 44, 55;
%e 13, 26, 39, 52, 65, 78;
%e 17, 34, 51, 68, 85, 102, 119;
%e 19, 38, 57, 76, 95, 114, 133, 152;
%e 23, 46, 69, 92, 115, 138, 161, 184, 207;
%e 29, 58, 87, 116, 145, 174, 203, 232, 261, 290;
%e 31, 62, 93, 124, 155, 186, 217, 248, 279, 310, 341;
%e 37, 74, 111, 148, 185, 222, 259, 296, 333, 370, 407, 444;
%e 41, 82, 123, 164, 205, 246, 287, 328, 369, 410, 451, 492, 533;
%e 43, 86, 129, 172, 215, 258, 301, 344, 387, 430, 473, 516, 559, 602, etc.
%e (End)
%t Table[Prime[n]*Range[n], {n, 10}] // Flatten (* _Ivan Neretin_, May 02 2019 *)
%Y Cf. A000040, A000217, A033286.
%Y Row sums give A196421. - _Omar E. Pol_, Mar 12 2012
%K nonn,tabl,easy
%O 1,1
%A _Amarnath Murthy_, Nov 04 2002
|
