服务热线
178 0020 3020
ibrary(ggplot2)
data<- read.csv(file.choose())
ggplot(data,aes(x=A,y=B,color=SIZE))+geom_point(shape=2)+xlab("A gene expression")+ylab("B gene expression")+labs(title="R2-01")+xlim(xmin=-2,xmax=3)+ylim(ymin=-1,ymax=3)
library(ggplot2)
data<- read.csv(file.choose())
ggplot(data,aes(x=Time,y=value,group=SIZE))+geom_line(aes(shape=SIZE))+geom_point(size=3,aes(shape=SIZE,colour=SIZE))+xlab("Time")+ylab("Value")+labs(title="R2-01")
附件