%I #11 Sep 15 2024 02:16:13
%S 4,26,44,102,92,290,156,366,332,614,332,1166,444,1050,1076,1310,716,
%T 2234,876,2522,1860,2258,1244,4310,1812,3030,2564,4374,1916,7262,2172,
%U 4798,4052,4910,4164,9302,3036,6018,5460,9554,3692,12642,4044,9566,8852,8570,4796
%N Row sums of A376168.
%H Paolo Xausa, <a href="/A376169/b376169.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = Sum_{k = 1..2*A048691(n)} A376168(n,k).
%F a(n) = 2*Sum_{k = 1..A048691(n)} A376168(n,k).
%t A376168row[n_] := Module[{a, b}, SolveValues[1/a + 1/b == 1/n && a > 0 && b > 0, {a, b}, Integers]];
%t Array[Total[A376168row[#], 2] &, 50]
%Y Cf. A048691, A376168.
%K nonn
%O 1,1
%A _Paolo Xausa_, Sep 13 2024