clValid同时绘制所有数字

Question

我目前正在开发一个Shiny应用程序，其中clValid用于验证聚类算法。在使用intern <- clValid(...)获得结果后，我可以通过点击＆lt; Enter＆gt;来打印控制台中的三个数字。按钮。但是，对于闪亮的应用程序，我如何同时绘制所有三个数字？

====更多细节

以下是获取验证结果的典型代码

data(mouse)

## internal validation
express <- mouse[1:25,c("M1","M2","M3","NC1","NC2","NC3")]
rownames(express) <- mouse$ID[1:25]
intern <- clValid(express, 2:6, clMethods=c("hierarchical","kmeans","pam"),
validation="internal")
## view results
plot(intern)

但是，数字不会自动绘制，您必须点击＆lt; Enter＆gt;查看以下所有数据：

> plot(intern)
Hit <Return> to see next plot: 
Hit <Return> to see next plot: 
Hit <Return> to see next plot: 

我的问题是，如果使用Shiny，则plotOutput位于ui.R as：

mainPanel(
    plotOutput("clust_valid_plot")  
)

如何将所有三个图表打印到clust_valid_plot？

Answer 1

行。我通过查看R中的S4类解决了这个问题。更具体地说，您可以使用S4列出slotNames(intern)类中的所有solt名称。然后你可以绘制每一行。