R2-34（R2-1-1&R2-1-2）

橡皮擦 2017-11-07 18:44:58 阅读: 900

R2-1-1

data1=read.csv("J:\\R\\1106\\R2-1-1.csv",header=TRUE)

library(ggplot2)

ggplot(data=data1, aes(x=A, y=B, color=SIZE))+

geom_point(shape=1,size=3)+xlab("A gene expression")+ylab("B gene expression")+ggtitle("R2-34")+scale_x_continuous(limits=c(-2,3))+

scale_y_continuous(limits=c(-1,3))

R2-1-2

data2=read.csv("J:\\R\\1106\\R2-1-2.csv",header=TRUE)

library(ggplot2)

ggplot(data=data2,aes(x=Time,y=value,color=SIZE,shape=SIZE))+

geom_point(size=3)+geom_line(color="red")+xlab("Time")+ylab("value")+ggtitle("R2-17")+

scale_x_continuous(limits=c(1,4))+scale_y_continuous(limits=c(1.25,2.50))

邀请讨论

{{f.title}} 大小 {{f.file_size}} 下载 {{f.count_download}} 金币 {{f.count_gold}}

切换到完整评论

受邀请回答

{{f.title}} 大小 {{f.file_size}} 下载 {{f.count_download}} 金币 {{f.count_gold}}

切换到完整回复

发送回复

赞({{item.count_zan}})

踩({{item.count_cai}})

删除

回复关闭