tr[A]=Apply[Plus,Table[&lgr;[i],{i,3}]]

     3