OFFSET
1,2
EXAMPLE
First few rows of the triangle are;
.1;
.2, 1;
.3, 0, 2;
.4, 3, 0, 2;
.5, 0, 0, 0, 4;
.6, 3, 4, 0, 0, 2;
.7, 0, 0, 0, 0, 0, 6;
.8, 7, 0, 6, 0, 0, 0, 4;
....
MAPLE
A127472 := proc(n, k)
a := 0 ;
for j from k to n do
if (n mod j = 0 ) and (j mod k =0 ) then
a := a+numtheory[phi](j) ;
end if;
end do;
a ;
end proc:
seq(seq(A127472(n, k), k=1..n), n=1..14) ; # R. J. Mathar, Nov 11 2011
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Gary W. Adamson, Jan 15 2007
STATUS
approved