dt<- fread("Book2.txt")
names(dt)
Book2.txt <- data.frame(table('d$sample','d$expression', 'd$SD'))
names(dt) <- c("sample","expression", "SD")
ticks <- c('wt','clone16','clone14','clone20')
SD <-c(0.001793815,0.000869683,0.000106077,6.04489E-05)
gg <- ggplot(data=dt, aes(x=sample, y=expression)) + geom_bar(stat="identity")
gg <- gg + scale_x_discrete(limits=ticks, labels = ticks) +
geom_errorbar(aes(ymin=expression-SD, ymax=expression+SD), color= "grey", width=.1)
请,任何人都可以帮助我解决这个问题。图表A是使用同一组值的Excel获得的,而图表B是使用ggplot2获得的。 geom_bar图中的SD偏差不是实际的,并根据图的高度分配给图。
我的情节: