вручную создать дендрограмму г - PullRequest
Новая
       18

вручную создать дендрограмму г

1 голос
/ 18 апреля 2019

Я пытаюсь создать дендрограмму из оценок сходства, которые я получил не через hclust или любым другим способом. У меня есть две ветви, и я просто хочу нарисовать их в соответствии с тем, насколько они похожи, а затем сделать так, чтобы они ответвлялись.

A и B равны 0,5 А 0,2 уникален B 0,3 уникально

Таким образом, общая высота A составляет 0,7, а общая высота B составляет 0,8, где 0,5 их ветви являются общими.

Следующее просто делает две ветви без длинной ветви, соединяющей два листа. этот похожий вопрос , но это не совсем помогает! 

x <- list(1, 2)
## attach "leaf" and "label" attributes to leaf nodes
attr(x[[1]], "leaf") <- TRUE
attr(x[[2]], "leaf") <- TRUE
attr(x[[1]], "label") <- "A"
attr(x[[2]], "label") <- "B"

## set "height" attributes for all nodes
attr(x, "height") <- 1
attr(x[[1]], "height") <- (1-0.7)
attr(x[[2]], "height") <- (1-0.8)

## set "midpoints" attributes for all nodes
attr(x, "midpoint") <- 1
attr(x[[1]], "midpoint") <- 0.5
attr(x[[2]], "midpoint") <- 0.5

## set "members" attributes for all nodes
attr(x, "members") <- 2
attr(x[[1]], "members") <- 1
attr(x[[2]], "members") <- 1

## set class as "dendrogram" 
class(x) <- "dendrogram"
x
plot(x)
...