r - R 函数 set.seed() 或 kmeans 在 Power BI R 脚本中不起作用

Question

我需要在 Power BI 桌面中从 R 计算和可视化集群分析。我使用set.seed()函数来防止集群（使用函数创建随kmeans时间变化。我首先在 Power BI Desktop 中运行此代码，下次我发布它并在 Power BI 服务中运行它。这就是问题所在，因为在 Power BI Desktop 中它然后在 Power BI 服务中创建不同（不同顺序）的集群。

R代码的一部分是：

set.seed(123)
km.res <- kmeans(scale(costs_noout_of), 4, nstart = 25)

dd <- cbind(costs_noout_all
            , cluster = km.res$cluster)

grid.table(ddply(dd, .(cluster), nrow))

结果是一个表，其中只有集群的数量和该集群中的观察计数，我在以下计算中需要这些。

任何人都可以帮助我吗？