r - R:用于热图的 read.table
问题描述
我有以下矩阵:
row genome1 genome2 genome3
genome1 100 99.99 98.88
genome2 99.99 100 NA
genome3 98.88 NA 100
我想将其绘制为热图。
使用下面发布的代码,我在读取文件时遇到问题 - 没有保留行名和标题。另外,我希望这些值%
在热图或NA
.
ani <-read.table(file="matrix", header=T, sep="\t", dec=".", row.names=1)
anim<-as.matrix(as.data.frame(lapply(ani, as.numeric)))
library(gplots)
my_palette <- colorRampPalette(c("red", "yellow", "green"))(n = 299)
heatmap.2(anim, notecol="black", density.info="none", trace="none", col=my_palette, cellnote=anim)
解决方案
尝试这个:
ani <- read.table(text='
row genome1 genome2 genome3
genome1 100 99.99 98.88
genome2 99.99 100 NA
genome3 98.88 NA 100
', header=T, row.names=1, quote="")
anim <- as.matrix(ani)
library(gplots)
my_palette <- colorRampPalette(c("red", "yellow", "green"))(n = 299)
heatmap.2(anim, notecol="black", density.info="none", trace="none",
col=my_palette, cellnote=anim, margins=c(10,10))
推荐阅读
- linux - bash 查找带整数的行,直到下一个字符串
- tfs - TFS 2017 WebLayout - 将字段添加到附件选项卡
- c# - 获取托管类型的指针或通过句柄释放事件
- heroku - 用非 Ruby 语言开发 Heroku 插件
- python - 这个时间戳值是什么意思?如何使用 Python 在几秒钟内转换它?
- r - 在标准差中获得 NA
- opencv - 使用 PyArray_SimpleNewFromData 将 mat 转换为 numpyarray 时出现分段错误
- oracle - ADF Validation-Salary 不应高于 ADF 中经理的薪水
- objective-c - 使用 NSPredicate 按索引过滤
- selenium - Selenium::WebDriver::Error::UnknownError: newSession