Animation 如何设置旋转三角形的动画，该三角形在旋转时（随机）更改颜色

所以我想创建一个固定在一个中心的等边三角形的动画，它的三个顶点在一个圆上，当它旋转时，颜色会以随机模式不断变化

到目前为止，我已经：

Animate[Graphics[{Hue[RandomReal[]], 
   Triangle[{{-1/2 - Cos[i], 0 - 1/2 Tan[i]}, {1/2 - Cos[i], 
      0 - 1/2 Tan[i]}, {0 - Cos[i], 3^(1/2)/2 - 1/2 Tan[i]}}]}], {i, 
  0, 2*Pi}]

当前输出（三角形执行除旋转以外的所有操作）

我希望的产出是：

---

我希望知道我做了哪些不正确的事情，以及如何修复代码以使其正常工作。

好的解决方案正在处理中。org

---

你可以创建动画，很容易放在网络上。

下面是如何使用

旋转

c = RegionCentroid[SSSTriangle[1, 1, 1]];
Animate[Graphics[{Hue[RandomReal[]], 
   Rotate[SSSTriangle[1, 1, 1], i, c]},
  PlotRange -> {{c[[1]] - 2/3, c[[1]] + 2/3}, {c[[2]] - 2/3, 
     c[[2]] + 2/3}}], {i, 0, 2 Pi}]

原始公式的问题在于你的公式完全错误。这很有效

Animate[Graphics[{Hue[RandomReal[]],
   Triangle[{{Sin[i], Cos[i]}, {Sin[i + 2 Pi/3], 
      Cos[i + 2 Pi/3]}, {Sin[i + 4 Pi/3], Cos[i + 4 Pi/3]}}]},
  PlotRange -> {{-3/2, 3/2}, {-3/2, 3/2}}], {i, 0, 2 Pi}]

---

这是否回答了这个问题？为什么不使用

Rotate

？