Displaying 1 result from an estimated 1 matches for "nprocedure".
Did you mean:
procedure
2009 Jul 23
1
tweak a bit the legend wiht ggplot2
...raph:
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...