R - cbindリストの要約要素

Question

cbindの要素はのlistです。

私は別々に3つのグループのクラスタリングを実行しているとします。

私はこの目的のためにclusterライブラリからのruspiniデータを使用しています。

library(dplyr) 
library(cluster) 

# Let us create 3 groups 
ruspini$group = rep(1:3, 25) 

私は最初にPAMクラスタリングを適用しています。次に、silhouette関数を適用し、最後にsummaryを各リストに適用します。私が望む何

fpam = function(x) pam(x, 3) 
fsil = function(x) silhouette(x) 

ruspiniPAMsil = ruspini %>% 
    split(.$group) %>% 
    lapply(fpam) %>% 
    lapply(fsil) %>% 
    lapply(summary) 

は、各クラスタからこの

ruspiniPAMsil[[1]]$clus.avg.widths 

を盗んと一緒にそれをバインドすることです。

このようなリストの要素はどのようにしてcbindになりますか？ 出力が欲しかった

do.call('cbind', ruspiniPAMsil[[i]]) # ?? 

はそれは、彼らが同じコンポーネントを共有する場合、各要素をサブセットすることが可能です

Group 1 Group 2 Group 3 
1 0.6944263 0.6898372 0.5436701 
2 0.5286338 0.5129770 0.7421103 
3 0.8200596 0.7810391 0.6460008 

Answer 1

です。

sapply(ruspiniPAMsil, `[[`, 'clus.avg.widths') 
      1   2   3 
1 0.6944263 0.6898372 0.5436701 
2 0.5286338 0.5129770 0.7421103 
3 0.8200596 0.7810391 0.6460008