tweak a bit the legend wiht ggplot2

Hi all,

I've this ggplot2 graph
(http://www.4shared.com/file/120101043/f3e9350/isotherm.html).

I'd like to tweak the legend for the adsorbent part. I'd like to have full
square of the colors instead of the full circles.
I guess that I've to work on the scale_color_hue or fill somewhere but I
haven't found my way yet.

Here is my code to get the graph:

pdf("isotherm.pdf",width=7,height=6)

#windows(width=7,height=6)
ads.graph<-ggplot(Adsorp.DATA,aes(relative.p,ads.vol,shape=type
? ,color=adsorbent))+

?geom_point(size=I(3)) +

?labs(x=expression(p/p[0]),y=N[2]~adsorbed~volume~(cc/g)) +

?scale_shape(name="Adsorption\nProcedure"
?,solid=F
?,breaks=c("A","D")
?,labels=c("Adsorp.","Desorp.")
?) +

?scale_colour_hue(name="Adsorbent") +

?scale_x_continuous(limits=c(0,1),minor_breaks = seq(0,1,0.1)) +
?scale_y_continuous(limits=c(0,1000)) +

?opts(panel.grid.minor = theme_line(colour = "grey94"))

print(ads.graph)
dev.off()



Regards/Cordialement

-------------
Benoit Boulinguiez
Ph.D student
Ecole de Chimie de Rennes (ENSCR) Bureau 1.20
Equipe CIP UMR CNRS 6226 "Sciences Chimiques de Rennes"
Avenue du G?n?ral Leclerc
CS 50837
35708 Rennes CEDEX 7
Tel 33 (0)2 23 23 80 83
Fax 33 (0)2 23 23 81 20
?<http://www.ensc-rennes.fr/> http://www.ensc-rennes.fr/



? ? ? ?[[alternative HTML version deleted]]