r - 階層を維持しながら pvclust から重要なサブツリー/クラスターを抽出する

Question

次の R コードは、ボストン データセットでマルチスケール ブートストラップ リサンプリングを介して階層クラスターを生成します。

library(pvclust)
library(MASS)
data(Boston)
boston.pv <- pvclust(Boston)
boston.pp <- pvrect(boston.pv)
clusters <- pvpick(boston.pv)

最後に、clusters$clusters重要なクラスターの要素を一覧表示します。

$clusters[[1]]
[1] "crim" "indus" "nox" "age" "rad" "tax"    
[7] "ptratio" "lstat"  

$clusters[[2]]
[1] "zn" "rm" "dis" "black" "medv" 

階層を破棄せずにこれらの同じアイテムを抽出する方法はありますか? たとえば、次のようにエッジの順序を維持します。

 $clusters[[1]]
[1] "rad" "tax" "indux" "nox" "age" "lstat"    
[7] "crim" "pratio"  

$clusters[[2]]
[1] "rm" "medv" "zn" "dis" "black" 

それとも似たようなもの？前もって感謝します。