0

我正在尝试使用 ggplot2（更具体地说ggdendro::ggdendrogram）在 R 中生成正确的树状图，因为我想与我的合作者共享它，目前我认为 api 不可能用 plotly 生成树状图。

当我旋转树状图时，我主要遇到“轴”标签的问题：

require(ggplot2)
require(ggdendro)
hc<-hclust(dist(iris[,1:4]),method="ward.D2")
ggd<-ggdendrogram(hc,rotate=TRUE)
ggd+scale_y_reverse()

这将导致以下绘图，其中刻度标签位于错误的一侧： 在错误的一侧使用刻度标签进行聚类

我想在执行时获得与 R 基本图形类似的结果plot(as.dendrogram(hc),horiz=TRUE) 正确的标签基础图

作为奖励，我希望能够单独为叶子（刻度）标签着色以及绘制类似rect.hclust框，但这并不是绝对必要的。我确实对 ggplot2 语法有一点了解，因此无需详细解释每种可能的解决方案。

如果相关，请在sessionInfo()下面找到我的，我在 Ubuntu 12.04 LTS 服务器上通过 Rstudio 服务器使用 R：

sessionInfo()
 R version 3.1.0 (2014-04-10)
 Platform: x86_64-pc-linux-gnu (64-bit)

 locale:
 [1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C         LC_TIME=C                LC_COLLATE=C         LC_MONETARY=C        LC_MESSAGES=C        LC_PAPER=C          
 [8] LC_NAME=C            LC_ADDRESS=C         LC_TELEPHONE=C       LC_MEASUREMENT=C     LC_IDENTIFICATION=C 

 attached base packages:
 [1] stats     graphics  grDevices utils     datasets  methods   base     

 other attached packages:
 [1] ggdendro_0.1-14       cluster_1.15.2        plotly_0.4            RJSONIO_1.2-0.2       RCurl_1.95-4.1        bitops_1.0-6          devtools_1.5         
 [8] extrafont_0.16        RColorBrewer_1.0-5    scales_0.2.4          vegan_2.0-10          lattice_0.20-29       permute_0.8-3         splitstackshape_1.2.0
 [15] data.table_1.9.2      BurStMisc_1.00        reshape2_1.4          xlsx_0.5.5            xlsxjars_0.6.0        rJava_0.9-6           ggplot2_0.9.3.1      
 [22] plyr_1.8.1           

 loaded via a namespace (and not attached):
 [1] MASS_7.3-32      Rcpp_0.11.1      Rttf2pt1_1.3     colorspace_1.2-4 digest_0.6.4     evaluate_0.5.5   extrafontdb_1.0  formatR_0.10     grid_3.1.0      
 [10] gtable_0.1.2     httr_0.3         knitr_1.6        labeling_0.2     memoise_0.2.1    munsell_0.4.2    parallel_3.1.0   proto_0.3-10     stringr_0.6.2   
 [19] tools_3.1.0      whisker_0.3-2
4

0 回答 0