a,b,tをパラメータにしてグラフにしたいんですが,うまくいきません。
ｂのところを数字にすればできました。どうしたらいいでしょう？
sol = Table[NDSolve[{x''[t] == aCos[((b - a)) t^2] - bSin[((b - a))t^2],
　　　　　　　　　　　ｙ''[t] == aSin[((b - a) t^2] + bCos [((b - a)) t^2],
　　　　　　　　　x[0] == 0, y[0] == 0, x'[0] == 0, y'[0] == 0},
　　　　　　　　　{x, y}, {t, 0, 1}],
　　　　　　{a, (-1), 1, 0.2}, {b, (-1), 1, 0.2}];
ParametricPlot[Evaluate[{x[t], y[t]} /. sol], {t, 0, 1},
PlotRange -> {{0, 3}, {0, 3}}]です。