高山流水分享 http://blog.sciencenet.cn/u/friendpine 走在科学路上的一位无名侠客,只是静静的走着.........

博文

一个画bar图的R脚本

已有 2120 次阅读 2015-10-20 17:03 |个人分类:统计学与R语言学习|系统分类:科研笔记

数据如下:

label    one    two

l2k    12  5

s1k    23 53

s2k   21  13

s3h    25  13

s5h    37  33


要做出下面的图:





























需要的R脚本如下:

data <- read.table("test",header=TRUE)

tag <- colnames(data)

tag <- tag[2:3]

label <- as.character(data[,1])

x <- as.matrix(data[,2:3])

testFig <- barplot(t(x),beside=TRUE,col=c("blue","red"),legend.text=tag,names.arg=label,xlab="test",main="test",ylab="Number")

text(cex=0.8,x=testFig,y=t(x)+2,xpd=TRUE,lab=t(x))




http://blog.sciencenet.cn/blog-54276-929572.html

上一篇:如何在Endnote中修改已有的style得到自己想要的格式?
下一篇:怎样理解具有边际效应的SNP相互作用

0

该博文允许注册用户评论 请点击登录 评论 (0 个评论)

数据加载中...

Archiver|手机版|科学网 ( 京ICP备14006957 )

GMT+8, 2018-11-20 08:40

Powered by ScienceNet.cn

Copyright © 2007- 中国科学报社

返回顶部