结果 实验4(极坐标图形)心形线、三叶玫瑰线。 程序: rlt ] =1-Cos[t] ParametricPlot[r[ Cos[t], r[tSin[t,t, 0, 2P1) AspectRatio->Automatic] 结果: 程序: rt]: =2Cos 3t ParametricPlot[r[t]Cos[t], r[tSin[t]i, t,0, 2Pi]结果： 实验4（极坐标图形）心形线、三叶玫瑰线。 程序： r[t_]:=1-Cos[t]; ParametricPlot[{r[t]Cos[t],r[t]Sin[t]},{t,0,2Pi}, AspectRatio->Automatic]; 结果： 程序： r[t_]:=2Cos[3t]; ParametricPlot[{r[t]Cos[t],r[t]Sin[t]},{t,0,2Pi}