login
a(n) = sum of terms in n-th row of triangle A126571.
1

%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