plot Table[(sin(n+0))^(n+0),{n,1,60,1}]