Skip to content

reproduce this graph in ggplot2 (code and data included)

2 messages · Juliet Hannah, Hadley Wickham

#
How can I reproduce this graph in ggplot2 (regression lines and data
point superimposed). Thanks, Juliet

filename="http://personality-project.org/r/datasets/heating.txt"
heating=read.table(filename,header=TRUE)
symb=c(19,25,3,23)
colors=c("black","red","green","blue")
plot(degreedays,therms,pch=symb[Location],col=colors[Location],bg=colors[Location],cex=1.0)
by(heating,Location,function(x) abline(lm(therms~degreedays,data=x)))
#
Here's one way:

qplot(degreedays, therms, data=heating, colour = Location, shape = Location) +
 geom_smooth(method = "lm", fullrange = T, se = F)

Hadley
On Fri, Sep 19, 2008 at 12:45 PM, Juliet Hannah <juliet.hannah at gmail.com> wrote: