300] (***Export animation***) output = Table[TotalPlot[t], {t, 0, 90/91, 1/91}]; SetDirectory["C:\\Users\\Steve\\Desktop"] Export["test.gif", output] I,...
