ggplot2: Making changes to symbols in the legend

Question

I\'m having a problem making the symbols in the legend of my plot match those in the plot itself.

Suppose the data has four columns like this

data         


        

Answer 1

Now that I'm sure it's what you want:

library(scales)
ggplot(data, aes(x = x, y = y)) +
          geom_point(aes(size = Rank, shape = Quantified)) +
          scale_shape_manual("Quantified", labels = c("Yes", "No"), values = c(1, 4)) + 
          guides(size = guide_legend(override.aes = list(shape = 1)))