ggplot2 barplot

data

Type mapping_rate

GSE 97.93504477

GPL 56.69988926

GDS 99.96324881

GSM 97.95128376

IDF 96.93251534

ADF 12.13235294

SDRF 96.92645445

code

library(reshape2)

library(ggplot2)

g = read.table("mr.txt", header=TRUE,sep='\t')

p = ggplot(g,aes(x=Type,y=mapping.rate ,fill=Type))+geom_bar()

p = p + xlab("Mapping Rate(%)") + ylab("Type of datas")

p = p + opts(title = "Mapping rateof each data format ", legend.title=theme_blank())

p