login
A130207
Diagonalized matrix of A000010.
8
1, 0, 1, 0, 0, 2, 0, 0, 0, 2, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 6, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0
OFFSET
1,6
FORMULA
T(n,n) = A000010(n).
T(n,k) = 0, if k <> n.
EXAMPLE
First few rows of the triangle are:
1;
0, 1;
0, 0, 2;
0, 0, 0, 2;
0, 0, 0, 0, 4;
...
MAPLE
A130207 := proc(n, k)
if k = n then
numtheory[phi](n);
else
0;
end if;
end proc:
seq(seq(A130207(n, k), k=1..n), n=1..15) ;
PROG
(PARI) for(n=1, 9, for(k=2, n, print1("0, ")); print1(eulerphi(n)", ")) \\ Charles R Greathouse IV, Feb 19 2013
CROSSREFS
KEYWORD
nonn,tabl,easy
AUTHOR
Gary W. Adamson, May 16 2007
STATUS
approved