ggplot_basics.r

IanMacPro — Nov 17, 2013, 7:26 PM

library("ggplot2")
library("gcookbook")
data()#data loaded
data(package = .packages(all.available = TRUE)) #all available

Warning: datasets have been moved from package 'base' to package 'datasets'
Warning: datasets have been moved from package 'stats' to package 'datasets'

simpledat_long

  Aval Bval value
1   A1   B1    10
2   A1   B2     9
3   A2   B1     7
4   A2   B2    11
5   A3   B1    12
6   A3   B2     6

ggplot(simpledat_long, aes(x=Aval, y=value, fill=Bval)) +
  geom_bar(stat="identity", position="dodge")

ggplot(simpledat_long, aes(x=Bval, y=value, fill=Aval)) +
  geom_bar(stat="identity", position="dodge")

ggplot(simpledat_long, aes(x=Aval, y=value, colour=Bval, group=Bval)) +
  geom_line()

dat <- data.frame(xval=1:4, yval=c(3,5,6,9), group=c("A", "B", "A", "B"))
dat

  xval yval group
1    1    3     A
2    2    5     B
3    3    6     A
4    4    9     B

ggplot(dat, aes(x=xval,y=yval)) + geom_point()

p <- ggplot(dat, aes(x=xval,y=yval))
p + geom_point()

p + geom_point(aes(colour=group))

p + geom_point(colour="blue")

p + geom_point(colour="red") + scale_x_continuous(limits=c(0,8))

p + geom_point(aes(colour=group)) +
  scale_colour_manual(values=c("orange","forestgreen"))