ggplot2





ColorsAll Named Colors in R
Image Linetypes and ShapesLinetypes and Shape Types in R














 Labels and Look & Feel - title, axis, etc. 

ggplot(data, aes(x=Xvar, y=Yvar, colour=ColorVar) +
    geom_points() +
         x = "X-Axis Label",
         y = "Y-Axis Label",
         colour = "Color Legend Label") +
    xlim(0,1) +
    ylim(-1,1) +
    
    

Twist x-axis label 45 degrees

theme(axis.text.x=element_text(angle=45))



Title Text, Justify to far-left, make bold, size

theme(plot.title = element_text(face="bold", hjust=0
, size=15))



Set specific color to specific discrete values in a plot
Breaks and labels are straitforward (just make sure they correspond).
For values, you set setting colors to the "fill" values, by the order of the factor levels. To find this order, type View(table(DataSet$FillColumn)). Obviously, where "FillColumn" is the column used to designate fill color.



scale_fill_manual(values=c("#3399ff","#FFFF00","#ffffcc","#800000","#006600"),
        name="Trade Type: ",
        breaks=c("TF2","DOTA2", "Portal Series","Steam Game","Other"),
        labels=c(" TF2 ", " DOTA2 ", " Portal ", " Steam Game ", " Other "))


scale_colour_manual(values=c("gold2","gold4","indianred","indianred4"),
                    breaks = c("Keys Pre Update",
                               "Keys Post Update",
                               "Refined Metal Pre Update",
                               "Refined Metal Post Update"),
                    labels = c("Keys Pre Update",
                               "Keys Post Update",
                               "Refined Metal Pre Update ",
                               "Refined Metal Post Update"),
                    name="Item and Intervention Period: ")





Difference text in title of ggplot

With italics

ggtitle(
  expression(
     paste(
     "Sum of Weighted Betweenness of Top Ten Items",
     italic(" Daily"),
     collapse=""
   )
 )
)


One on top of the other!

ggtitle(
  expression(
    atop("Weighted Betweenness of Item Nodes",
    atop(italic("Top Money Items, Daily, Loess Smoother "),"")
   )
  )
)

















Added Commas to Axis Labls

+ scale_y_continuous(labels = comma_format(digits = 5), 
                     limits = c(0,450000)) 



With dates: e.g. Jan 2012 ... Apr 2013 ...
+  scale_x_date(labels = date_format("%b-%Y"), 
                limits = as.Date(c(as.Date("2011-01-01"),as.Date("2013-12-31"))))

Now, for Year on top of Month

scale_x_date(labels = date_format("%Y\n%B"))


How to remove those annoying grey lines bordering/outlining individual entries in the legend?
+ theme(
        legend.key = element_rect(colour = NA)
        )

Lots of control over the Legend (ggplot guide) http://docs.ggplot2.org/0.9.3.1/guide_legend.html


Set specific minor and major breaks when axis is scaled by date

library(scales)
scale_x_date(labels = date_format("%b-%Y"),

#            limits = as.Date(c(as.Date("2011-3-01"),as.Date("2013-12-31"))),
             breaks = "6 month",
             minor_breaks = "1 month")


 
         Date format conversion specification ("%b-%Y" etc



Stacked Area Plot

ggplot(AppIDTradeCount, 
       aes(x = as.Date(Date), y = Variable, group = Game, fill = Game, size = 0)) +
  geom_area(aes(position = 'stack')) +
  ggtitle(paste(" ")) + 
  theme_bw() +
  CurtisGGplotTheme + 
  ylab("Percent") + 
  xlab("Date   ") +
  scale_y_continuous(labels = percent) +
  scale_size_area(guide = FALSE) + 
  scale_fill_discrete(name = "Legend") + 
theme(
    legend.position="right") +
  scale_x_date(labels = date_format("%Y\n%B"), 
               #               limits = as.Date(c(as.Date("2011-6-1"),as.Date("2013-6-1"))), 
  )


Names your Legend
It depends on what scale you want to name. that could be fill discrete or fill continuous, or any number of other scales. 
http://www.cookbook-r.com/Graphs/Legends_(ggplot2)/









 Histogram









 Scatter









 Dot Plot









 ...












Comments