|
%I #10 Oct 10 2019 13:47:52
%S 1,5,12,23,36,60,78,105,132,170,201,254,290,344,397,456,502,584,637,
%T 722,793,881,946,1057,1131,1233,1320,1437,1516,1679,1770,1892,2002,
%U 2140,2254,2425,2529,2675,2808,2984,3100,3322,3448,3621,3785,3971,4108,4339
%N a(n) = sum of terms in n-th row of triangle A126571.
%t f[m_, n_] := Block[{k = 0, c = n},While[c > 0,k++;While[GCD[k, m] > 1, k++ ];c--;];k];Table[Sum[f[m, n], {m, n}], {n, 50}] (* _Ray Chandler_, Dec 29 2006 *)
%Y Cf. A126571, A126574.
%K nonn
%O 1,2
%A _Leroy Quet_, Dec 28 2006
%E Extended by _Ray Chandler_, Dec 29 2006
|
