legend

When running this code (go ahead, try it): library(ggplot2) (myDat <- data.frame(cbind(VarX=10:1, VarY=runif(10)), Descrip=sample(LETTERS[1:3], 10, replace=TRUE))) ggplot(myDat,aes(VarX,VarY,shape=Descrip,size=3)) + geom_point() ... the "size=3" statement does correctly set the point size. However it causes the legend to give birth to a little legend beneath it, entitled "3" and containing nothing but a big dot and the number 3. This does the same ggplot(myDat,aes(VarX,VarY,shape=Descrip)) + geom_point(aes(size=3)) Yes, it is funny. It would have driven me insane a couple hours ago if it weren

Another ggplot legend question! I have a dataset of the form test <- data.frame( cond = factor(rep(c("A", "B"), each=200)), value = c(rnorm(200), rnorm(200, mean=0.8)) ) So two groups and some values and I want to plot the density. I also want to add a line indicating the mean for each group to the plot so I: test.cdf <- ddply(test, .(cond), summarise, value.mean=mean(value)) Then in ggplot call: ggplot(test, aes(value, fill=cond)) + geom_density(alpha=0.5) + labs(x='Energy', y='Density', fill='Group') + opts( panel.background=theme_blank(), panel.grid.major=theme_blank(), panel.grid.minor

I'm creating plots using Matplotlib that I save as SVG, export to .pdf + .pdf_tex using Inkscape, and include the .pdf_tex-file in a LaTeX document. This means that I can input LaTeX-commands in titles, legends etc., giving an image like this which renders like this when I use it in my LaTeX document. Notice that the font for the numbers on the axes change, and the LaTeX-code in the legend is compiled: Code for the plot (how to export to SVG not shown here, but can be shown on request): import numpy as np x = np.linspace(0,1,100) y = x**2 import matplotlib.pyplot as plt plt.plot(x, y, label =

Following works, (copy & paste into R) a=123 plot(1,1) legend('bottomleft',legend=bquote(theta == .(a))) I want to have multiple items in the legend. All with greek letters. As a simple example, if I repeat the item twice the code does not work anymore a=123 plot(1,1) legend('bottomleft',legend=c(bquote(theta == .(a)),bquote(theta == .(a)))) I have tried many more complicated expressions but they all did not work. Any help will be appreciated. In this case, plotmath is not able to coerce the list of calls to expressions. > cs <- c(bquote(theta == .(a)),bquote(theta == .(a))) > cs [[1]] theta =