login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Row sums of A156254.
1

%I #10 Jul 23 2017 16:34:55

%S 1,2,2,1,2,4,2,1,1,4,2,1,2,4,4,1,2,1,2,1,4,4,2,1,1,4,1,1,2,8,2,1,4,4,

%T 4,1,2,4,4,1,2,8,2,1,1,4,2,1,1,1,4,1,2,1,4,1,4,4,2,1,2,4,1,1,4,8,2,1,

%U 4,8,2,1,2,4,1

%N Row sums of A156254.

%H Mats Granvik, <a href="/A156260/b156260.txt">Table of n, a(n) for n = 1..1500</a>

%t nn = 75; Total[Transpose[Inverse[Table[Table[If[Mod[n, k] == 0, If[n == k, 1, MoebiusMu[n]*MoebiusMu[k]], 0], {k, 1, nn}], {n, 1, nn}]]]] (* _Mats Granvik_, Jul 23 2017 *)

%Y Cf. A156254.

%K nonn

%O 1,2

%A _Mats Granvik_, Feb 07 2009