Fatal编程技术网
  • wolfram-mathematica/
  • Wolfram mathematica 使用Mathematica（图像）创建以下圆的参数化绘图

Wolfram mathematica 使用Mathematica（图像）创建以下圆的参数化绘图

wolfram-mathematica

Wolfram mathematica 使用Mathematica（图像）创建以下圆的参数化绘图,wolfram-mathematica,calculus,Wolfram Mathematica,Calculus,要让您开始 x = Sqrt[2^2 + 2^2]/2; Show[ ParametricPlot[{ {x Cos[t], x Sin[t] + 2}, {x Cos[t] + 2, x Sin[t]}, {x Cos[t], x Sin[t] - 2}, {x Cos[t] - 2, x Sin[t]}}, {t, 0, 2 Pi}], Graphics[Line[{{2, 0}, {0, 2}}]]] 要让您开始 x = Sqrt[2^2 + 2^2]/2;

要让您开始

x = Sqrt[2^2 + 2^2]/2;
Show[
 ParametricPlot[{
   {x Cos[t], x Sin[t] + 2},
   {x Cos[t] + 2, x Sin[t]},
   {x Cos[t], x Sin[t] - 2},
   {x Cos[t] - 2, x Sin[t]}}, {t, 0, 2 Pi}],
 Graphics[Line[{{2, 0}, {0, 2}}]]]

要让您开始

x = Sqrt[2^2 + 2^2]/2;
Show[
 ParametricPlot[{
   {x Cos[t], x Sin[t] + 2},
   {x Cos[t] + 2, x Sin[t]},
   {x Cos[t], x Sin[t] - 2},
   {x Cos[t] - 2, x Sin[t]}}, {t, 0, 2 Pi}],
 Graphics[Line[{{2, 0}, {0, 2}}]]]

您需要更好地解释您遇到的问题。@agentp抱歉，这是我第一次来这里。我很难计算出圆的方程，不包括我已经知道的红色方程。我想这是家庭作业，你需要使用
参数图吗？我会使用图形圆圈，然后你只需要知道圆心和半径，我希望你能很容易地用手计算出来。你需要更好地解释你遇到的问题。@agentp抱歉，这是我第一次在这里。我很难计算出圆的方程，不包括我已经知道的红色方程。我想这是家庭作业，你需要使用
参数图吗？我只需要使用图形圆，然后你只需要知道圆心和半径，我希望你能很容易地用手计算出来。你是如何得到x=1.4的？@MuhminA圆的半径是
Sqrt[2^2+2^2]/2=Sqrt[2]=1.41421
非常感谢，我相信我能从这里自己算出其余的。你是怎么得到x=1.4的？@MuhminA圆的半径是
Sqrt[2^2+2^2]/2=Sqrt[2]=1.41421
非常感谢你，我相信我能从这里自己算出其余的。