structure图一页多图

library(ggplot2)
library(grid)
library(cowplot)
## 我这里是9个文件，要画9张图，画到一页上，且是9行1列的这种
ta1 = read.table("fout.2.meanQ")
ta2 = read.table("fout.3.meanQ")
ta3 = read.table("fout.4.meanQ")
ta4 = read.table("fout.5.meanQ")
ta5 = read.table("fout.6.meanQ")
ta6 = read.table("fout.7.meanQ")
ta7 = read.table("fout.8.meanQ")
ta8 = read.table("fout.9.meanQ")
ta9 = read.table("fout.10.meanQ")
tiff(filename = "faststructure_flint.tif", width = 100, height = 50, units = "cm", compression = "lzw",res = 600)
par(mfrow=c(9,1))
par(mar=c(2,4,5,4))
barplot(t(as.matrix(ta1)),col = rainbow(2),# xlab = "Individual",# ylab = "Ancestry",# main = "alldata",# cex.names = 5,border = NA)
mtext("flint",side = 3,line= 0,cex = 5)
par(mar=c(2,4,2,4))
barplot(t(as.matrix(ta2)),col = rainbow(3),# xlab = "Individual",# ylab = "Ancestry",border = NA)
par(mar=c(2,4,2,4))
barplot(t(as.matrix(ta3)),col = rainbow(4),# xlab = "Individual",# ylab = "Ancestry",border = NA)
par(mar=c(2,4,2,4))
barplot(t(as.matrix(ta4)),col = rainbow(5),# xlab = "Individual",# ylab = "Ancestry",border = NA)
par(mar=c(2,4,2,4))
barplot(t(as.matrix(ta5)),col = rainbow(6),# xlab = "Individual",# ylab = "Ancestry",border = NA)
par(mar=c(2,4,2,4))
barplot(t(as.matrix(ta6)),col = rainbow(7),# xlab = "Individual",# ylab = "Ancestry",border = NA)
par(mar=c(2,4,2,4))
barplot(t(as.matrix(ta7)),col = rainbow(8),# xlab = "Individual",# ylab = "Ancestry",border = NA)
par(mar=c(5,4,2,4))
barplot(t(as.matrix(ta8)),col = rainbow(9),# xlab = "Individual",# cex.axis = 5,# ylab = "Ancestry",border = NA)
mtext("Individual",side = 1,line = 4,cex = 5)
dev.off()

结果如下：

R语言画图——structure图一页多图相关推荐

R语言绘图组合布局一页多图
01 - 图形组合布局 par(mfrow=c(2,2)) par(mfrow=c(2,2)),可以理解将绘图区域分割为2x2的矩阵区域,另可参照<R语言实战>3.5图形的组合 ### ...
R语言画图/绘图/作图2
R语言画图/绘图/作图2 动画气泡图可以使用该gganimate包实现动画气泡图.它与气泡图相同,但是,您必须显示值如何在第五维(通常是时间)上变化. 要做的关键是将设置为aes(frame)要在 ...
数据可视化——R语言ggplot2包绘制精美的小提琴图(并箱线图或误差条图组合)
数据可视化--R语言ggplot2包绘制精美的小提琴图(并箱线图或误差条图组合) 概述:R语言使用ggplot2工具包绘制小提琴图.为了使数据表达更加丰富,同时将小提琴图与箱线图和误差条图相结合.另外 ...
R语言画图——添加数学表达式和R2（Ⅱ）
R语言画图--添加数学表达式和R2(Ⅱ) 前言胸卡没有想到随手写的博客竟然得到了那么多的关注! 一天的访问量直接破千,而且还得到了大神的鼓励!(激动) 估计大家是被这个标题吸引.(哈哈) 果然,天下 ...
linux r语言画图,R语言︱画图
笔者寄语:不论画啥,你先plot准没错. plot 二维坐标绘图 dotchart 点图 barplot 条形图 hist 直方图 pie 饼图 points 添加点 lines 添加线 text 添 ...
R语言plotly可视化：plotly可视化箱图、相同数据集对比使用不同分位数算法的可视化差异（quartilemethod参数、linear、inclusive、exclusive）
R语言plotly可视化:plotly可视化箱图.相同数据集对比使用不同分位数算法的可视化差异(quartilemethod参数.linear.inclusive.exclusive) 目录
R语言plotly可视化：plotly可视化箱图、基于预先计算好的分位数、均值、中位数等统计指标可视化箱图、箱图中添加缺口、可视化均值和标准差（With Precomputed Quartiles)
R语言plotly可视化:plotly可视化箱图.基于预先计算好的分位数.均值.中位数等统计指标可视化箱图.箱图中添加缺口.可视化均值和标准差(Box Plot With Precomputed Qu ...
R语言ggplot2可视化：可视化人口金字塔图、人口金字塔显示不同性别不同年龄段的人口数，是了解人口组成的最优可视化方法、人口金字塔图可以用来表示按体积排序的群体的分布、形成漏斗结构
R语言ggplot2可视化:可视化人口金字塔图.人口金字塔显示不同性别不同年龄段的人口数,是了解人口组成的最优可视化方法.人口金字塔图可以用来表示按体积排序的群体的分布.形成漏斗结构(Populati ...
R语言可视化散点图（scatter plot）图、为图中的部分数据点添加标签、ggrepel包来帮忙
R语言可视化散点图(scatter plot)图.为图中的部分数据点添加标签.ggrepel包来帮忙目录

R语言画图——structure图一页多图

structure图一页多图

R语言画图——structure图一页多图相关推荐

最新文章

热门文章