You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
5 lines
197 B
5 lines
197 B
clustsort<-function(x){
|
|
xorder<-pull(x, 1)[hclust(dist(x %>% select(-1)))$order]
|
|
yorder<-colnames(x)[2:ncol(x)][hclust(dist(t(x %>% select(-1))))$order]
|
|
return(list("x"=xorder,"y"=yorder))
|
|
}
|