pdf('test',onefile=T)
g <- ggplot(test,aes(x=timepoints,y= mean,ymax = mean + sde, ymin = mean - sde,colour=Experiment)) +
geom_errorbar(width=2) +
geom_point() +
geom_line() +
xlab('Time (min)') +
ylab('Fold Induction') +
opts(title = '5 min v 6 hr KCl treatment')
print(g)
dev.off()
这是它打印的内容。
如何将默认颜色更改为红色和黑色?所以'5分钟'是红色,'6小时'是黑色的?
答案 0 :(得分:3)
使用scale_manual手动定义比例:
g + scale_colour_manual(values = c("red", "black"))