[R] help with ggplot legend specification

Ista Zahn istazahn at gmail.com
Fri Nov 1 12:28:30 CET 2013


You can override the legend aesthetics, e.g.,

ggplot(df,aes(x=Importance,y=Performance,fill=PBF,size=gapsize))+
    geom_point(shape=21,colour="black")+
    scale_size_area(max_size=pointsizefactor) +
    scale_fill_discrete(guide = guide_legend(override.aes = list(size = 4)))

Best,
Ista

On Thu, Oct 31, 2013 at 4:08 PM, Conklin, Mike (GfK)
<Mike.Conklin at gfk.com> wrote:
> I am creating a scatterplot with the following code.
>
>   pl<-ggplot(df,aes(x=Importance,y=Performance,fill=PBF,size=gapsize))+
>       geom_point(shape=21,colour="black")+scale_size_area(max_size=pointsizefactor)
>
> points are plotted where the size of the point is related to a metric variable gapsize and the fill color on the point is related to the variable PBF which is a 4 level factor.  This works exactly as I want with the points varying in size based on the metric and being color coded.  I get 2 legends on the side of the plot, one related to the size of the dot and the other showing the color coding. The problem is that the dots on the color coding legend are so small that it is impossible to discern what color they are. The dots in the plot are large, so it is clear what colors they are, but the legend is useless.  How can I increase the size of the points in the color legend.
>
> pointsizefactor<-5
>
> df
>
>         Importance Performance gapsize labels       PBF
> q50451   0.7079463  -0.7213622       2      a         W
> q50452   0.4489164  -0.5552116       1      b         G
> q50453   0.7714138  -0.6940144       5      c         F
> q50454   0.6284830  -0.6011352       3      d         S
> q50455   0.7131063  -0.6800826       4      e         G
> q50456   0.7038184  -0.6026832       6      f         S
> q50457   0.5201238  -0.3539732       8      g         G
> q50458   0.9195046  -0.8214654       2      h         F
> q50459   0.3797730  -0.4184727       1      i         W
> q504510  0.8065015  -0.6305470       7      j         G
> q504511  0.6062951  -0.4442724       6      k         S
> q504512  0.6253870  -0.4478844       8      l         G
> q504513  0.3813209  -0.4102167       2      m         W
> q504514  0.3813209  -0.3436533       3      n         F
> q504515  0.5185759  -0.4365325       5      o         G
> q504516  0.5872033  -0.4556244       6      p         S
> q504518  0.5397317  -1.0000000       1      q         S
> q504519  0.5882353  -0.4674923       9      r         S
> q504520  0.4205366  -0.4164087       4      s         W
> q504521  0.7616099  -0.3323013      10      t         F
> q504522  0.7213622  -0.6088751       7      u         G
> q504523  0.6780186  -0.6130031       8      v         G
> q504524  0.6904025  -0.3937049      10      w         W
> q504525  0.4143447  -0.4669763       4      x         W
> q504526  0.5779154  -0.2982456       9      y         F
> q504527  0.6718266  -0.3457172      10      z         G
>
>
> Thanks all
>
> //Mike
>
> W. Michael Conklin
> Executive Vice President | Marketing Science
> GfK Custom Research, LLC | 8401 Golden Valley Road | Minneapolis, MN, 55427
> T +1 763 417 4545 | M +1 612 567 8287
> www.gfk.com<http://www.gfk.com/>
>
>
>         [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.



More information about the R-help mailing list