Table[ParametricPlot3D[f[t,u],{t,-1,1},{u,-1,1}, ViewPoint->{5*Sin[a/20*2\[Pi]], 5*Cos[a/20*2\[Pi]],1}, DisplayFunction -> Identity ,Axes -> False,SphericalRegion->True],{a,0, 19}]