This question is a follow-up to [my previous question][1].

The code I use to plot is the following:

    Data = NIntegrate[myrotorz1[x, y, t], {x, -5, 5}, {y, -5, 5}];
    Table[Plot[Re[Data], {t, 0, 6, 0.1}], PlotRange -> All]

I would like to know whether to use the `NIntegrate` within the `NDSolve` domain.

  [1]: http://mathematica.stackexchange.com/questions/96419/how-to-do-vectorplot