我试图在x轴上并排显示5个基因(SHP ...... PHB)的qRT-PCR值的条形图(使用ggplot),比较y轴上的归一化倍数诱导(例如,大多数诱导基因是SHP,归一化倍数诱导~30,然后是NGA1等。 我已经挣扎了很多,不能在R中形成这个数字。有谁能请帮我一个忙吗?非常感谢。
Rep | SHP | NGA1 | PAN | TUB | PHB
Rep1 | 29.77 | 4.55 | 3.23 | 1.28 | 0.06 |
Rep2 | 30.37 | 3.43 | 2.07 | 0.81 | 4.93
答案 0 :(得分:2)
嗯,我认为这就是你想要的:
library(ggplot2) #load library
genes<-factor(c('SHP', 'NGA1', 'PAN', 'TUB', 'PHB'))
values1<-c(29.77,4.55,3.23,1.28,0.06)
values2<-c(30.37,3.43,2.07,0.81,4.93)
df<- data.frame(genes,values1,values2) #put your data in dataframe
ggplot(data=df,aes(x=genes,y=values1)) + geom_bar(stat='identity') + #plot with ggplot2
scale_x_discrete(limits=df$genes[order(levels(df$genes))]) #order your data descending
我绘制了名称在x轴上,值为1在y轴上的数据。如果需要,可以使用上面的代码作为值。