- #1
roam
- 1,271
- 12
I want to generate the following plot in Mathematica in red color:
The above code creates the plot in default black color. So, I tried using this code to make it red:
Unfortunently it doesn't work and I get errors. Can anybody help with this?
Code:
x[t_] := 31 Cos[t] - 7 Cos[31 t/7];
y[t_] := 31 Sin[t] - 7 Sin[31 t/7];
ParametricPlot[{x[t], y[t]}, {t, 0, 19 \[Pi]}]
The above code creates the plot in default black color. So, I tried using this code to make it red:
Code:
x[t_] := 31 Cos[t] - 7 Cos[31 t/7];
y[t_] := 31 Sin[t] - 7 Sin[31 t/7];
ParametricPlot[[{x[t], y[t]}, {t, 0, 19 \[Pi]}],
PlotStyle -> {{RGBColor[1,0,0]}}]
Unfortunently it doesn't work and I get errors. Can anybody help with this?