如何在摆动中验证对象的所有属性？

Question

我有一个swagger.json，它接受POST正文作为对象，并具有某些必需的数据类型属性。

我可以看到 ServeError（）在缺少任何一个属性或数据类型错误的情况下被调用。 它停止并给出第一个失败的验证。

有什么方法可以验证 ALL 属性，因此当 错误被调用，其中包含有关所有失败验证的详细信息？

我希望可以在swagger.json中放入一个标记，但无法在任何地方找到它。

set.seed(1337)
df = iris[,1:2]


dfCluster<-kmeans(df,centers=3, iter.max = 1)
  plot(df[,1], df[,2], col=dfCluster$cluster,pch=19,cex=2, main="iter 1")
  points(dfCluster$centers,col=1:5,pch=3,cex=3,lwd=3)

max_iter = 10

for (i in 2:max_iter){
  tryCatch({
    dfCluster <- kmeans(df,centers = dfCluster$centers, iter.max = 1)
    done <- TRUE
  }, 
  warning=function(w) {done <- FALSE})
  plot(df[,1], df[,2], col=dfCluster$cluster,pch=19,cex=2, main=paste("iter",i))
  points(dfCluster$centers,col=1:5,pch=3,cex=3,lwd=3)
  if(done) break
}