多边形的面积和质心：实用

Question

我正在使用R包实践来计算具有3到5个顶点的多边形的面积和质心。 我知道手册解释了该区域为负数的情况，对此我不太了解。 此外，在这些情况下的质心不是我希望得到的。

我遇到的问题是我的程序可能会生成具有正确排序的顶点的多边形，但是会产生负区域：

library(pracma)
xs<-c(0,1,1)
ys<-c(0,1,0)
poly_center(xs,ys)
polyarea(xs,ys)

xs<-c(1,1,0)
ys<-c(0,1,0)
poly_center(xs,ys)
polyarea(xs,ys)

xs<-c(1,0,1)
ys<-c(0,0,1)
poly_center(xs,ys)
polyarea(xs,ys)

有人可以建议一种通用的方法（即任意数量的顶点）来对顶点进行排序，以便我总是得到一个正面积和期望的质心吗？