I have a question here regarding how to derive multiple output from OutputResponse or in general. Here is a screenshot of the codes
As seen, I have only one quantity plotted. Tried google but didn't manage to find a solution.
Thanks in advance!
The codes are here:
\[Omega]ω = 2. Pi*50; Mag = 1; \[Theta]θ = 0.;
T\[Alpha]\[Beta]2dqInv22Tαβ2dqInv22 = {{Cos[\[Omega]Cos[ω t], -Sin[\[Omega]Sin[ω t]}, \
{Sin[\[Omega]Sin[ω t], Cos[\[Omega]Cos[ω t]}};
T\[Alpha]\[Beta]2dq22Tαβ2dq22 = {{Cos[\[Omega]Cos[ω t],
Sin[\[Omega]Sin[ω t]}, {-Sin[\[Omega]Sin[ω t], Cos[\[Omega]Cos[ω t]}};
Input\[Alpha]\[Beta]22Inputαβ22 = {Mag Cos[\[Omega]Cos[ω t + \[Theta]]θ],
Mag Cos[\[Omega]Cos[ω t + \[Theta]]θ]};
(*Input\[Alpha]\[Beta]22=*Inputαβ22={Mag ,Mag};*)
Out\[Alpha]\[Beta]2dq22Outαβ2dq22 =
FullSimplify[T\[Alpha]\[Beta]2dq22FullSimplify[Tαβ2dq22.Input\[Alpha]\[Beta]22]Inputαβ22] //
TrigReduce;
g[t_] = OutputResponse[
TransferFunctionModel[(0.67/(0.0025 s + 1) + 1)/(0.0025 s), s],
Out\[Alpha]\[Beta]2dq22[[1]]Outαβ2dq22[[1]], t];
f[t_] = OutputResponse[
TransferFunctionModel[(0.67/(0.0025 s + 1) + 1)/(0.0025 s), s],
Out\[Alpha]\[Beta]2dq22[[2]]Outαβ2dq22[[2]], t];
Plot[{g[t], f[t]}, {t, 0, 0.2}, PlotRange -> Automatic]