1

跟进热图问题为 R 中的年度数据创建热图/排序列

热图

热图2

  1. 行名发生了变化,但我的数据并没有因此而改变,我可以就如何让每一行数据随其名称移动而寻求帮助吗?

  2. 有没有一种更简单的方法可以使图形/ png 更宽,因为我一直在搞乱边距,而我似乎所做的就是让它变窄。

  3. 我附上了第二张图片,以显示当我突出显示特定单元格时,例如一月的皮肤病,与 .csv 文件中的值不同,对吗?(看到颜色匹配,我应该只用它运行吗?)

    库(heatmaply)x <-read.csv(“Heatmap.csv”,check.names = FALSE)

    rownames(x) <- c('All Others', 'Circulatory Diseases', 'Digestive Diseases', 'Ear Diseases', 'Endocrine/Metabolic','Eye Diseases', 'Genitourinary Diseases', 'Ill-defined Condition', 'Infectious & Parasitic', 'Injury/ Poisoning', 'Mental & Behavioural', 'Musculoskeletal', 'Neoplasms', 'Nervous System', 'Pregnancy/Childbirth', 'Respiratory', 'Skin Diseases')
    
    x <- x[,2:13, drop=FALSE]
    x <- as.matrix(scale(x))
    
    heatmaply(x,colors = heat.colors(200), k_col =1, k_row = 2, dendrogram = FALSE, margins = c(100, 160), 
          scale_fill_gradient_fun = ggplot2::scale_fill_gradient2(low = "blue", high = "red", midpoint = 50, limits = c(0, 100)))
    
4

0 回答 0