如何在此点击窗格代码中使动态对象自动更改？

Question

下面是我一直在研究的Mathematica的以下代码。

CharField

除了在质心处显示三角形的面积外，我还尝试从用户单击的三个点创建一个三角形；但是，在我单击3次之前，总会有错误。 Mathematica显示以下内容：

DynamicModule[{pts = {}, text = {}, triangle},
 ClickPane[
  Framed@Graphics[{White, EdgeForm[{Red}], Triangle[Dynamic[pts]], 
     Black, PointSize[0.02], Point[Dynamic[pts]], Black, 
     Dynamic[Text[Area[Triangle[pts]], 
       Dynamic[RegionCentroid[Triangle[pts]]]]]},
    PlotRange -> 10, ImageSize -> 200],
  (If[Length[pts] < 3, AppendTo[pts, #], pts = {}] &)]]

这是什么意思，我该如何解决该错误？

（此外，如何更改代码，这样我不必单击额外的时间即可重置屏幕以开始一个新的三角形？我只需要单击三次即可获得我的三角形，而不是现在需要四个。）