Skip to content

Instantly share code, notes, and snippets.

@bhive01
Created September 16, 2016 18:45
Show Gist options
  • Select an option

  • Save bhive01/30f588b1623f54aac11ba6d4a4a43538 to your computer and use it in GitHub Desktop.

Select an option

Save bhive01/30f588b1623f54aac11ba6d4a4a43538 to your computer and use it in GitHub Desktop.
---
output:
html_document:
mathjax: null
theme: null
highlight: null
pandoc_args: [
"+RTS", "-K64m",
"-RTS"
]
---
# Plot with big Facet Labels
``` {r matInv, eval = TRUE, echo=FALSE, warning = FALSE, message = FALSE, results='asis', out.width = 1000, out.height = 1000}
library(dplyr)
library(ggplot2)
library(plotly)
df <- structure(list(Year = c(2000, 2000, 2000, 2000, 2000, 2000, 2000,
2000, 2000, 2001, 2001, 2001, 2001, 2001, 2001, 2002, 2002, 2002,
2002, 2002, 2002, 2002, 2002, 2002, 2002, 2002, 2002, 2002, 2003,
2003, 2003, 2003, 2003, 2003, 2003, 2003, 2003, 2003, 2003, 2003,
2003, 2004, 2004, 2004, 2004, 2004, 2004, 2004, 2004, 2004, 2004,
2004, 2004, 2004, 2004, 2004, 2004, 2004, 2005, 2005, 2005, 2005,
2005, 2005, 2005, 2005, 2005, 2005, 2005, 2005, 2005, 2005, 2005,
2005, 2005, 2005, 2005, 2005, 2006, 2006, 2006, 2006, 2006, 2006,
2006, 2006, 2006, 2006, 2006, 2006, 2006, 2006, 2006, 2006, 2006,
2006, 2006, 2006, 2007, 2007, 2007, 2007, 2007, 2007, 2007, 2007,
2007, 2007, 2007, 2007, 2007, 2007, 2007, 2007, 2007, 2007, 2007,
2007, 2007, 2007, 2007, 2007, 2007, 2007, 2007, 2008, 2008, 2008,
2008, 2008, 2008, 2008, 2008, 2008, 2008, 2008, 2008, 2008, 2008,
2008, 2008, 2008, 2008, 2008, 2008, 2008, 2008, 2008, 2008, 2008,
2008, 2008, 2008, 2008, 2008, 2008, 2008, 2008, 2008, 2008, 2008,
2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009,
2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009,
2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009,
2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009, 2010,
2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010,
2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010,
2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010,
2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010,
2010, 2010, 2010, 2010, 2010, 2011, 2011, 2011, 2011, 2011, 2011,
2011, 2011, 2011, 2011, 2011, 2011, 2011, 2011, 2011, 2011, 2011,
2011, 2011, 2011, 2011, 2011, 2011, 2011, 2011, 2011, 2011, 2011,
2011, 2011, 2011, 2011, 2011, 2011, 2011, 2011, 2011, 2011, 2011,
2011, 2011, 2011, 2011, 2011, 2011, 2011, 2011, 2011, 2012, 2012,
2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012,
2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012,
2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012,
2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012,
2012, 2012, 2012, 2012, 2012, 2012, 2012, 2013, 2013, 2013, 2013,
2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013,
2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013,
2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013,
2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013,
2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013,
2013, 2013, 2013, 2013, 2013, 2013, 2013, 2014, 2014, 2014, 2014,
2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014,
2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014,
2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014,
2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2015, 2015,
2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015,
2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015,
2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015,
2015, 2015, 2015, 2016, 2016, 2016, 2016, 2016, 2016, 2016, 2016,
2016, 2016, 2016, 2016, 2016, 2016, NA, NA, NA, NA), `Material Store Code` = c("FRSA",
"HUOCB", "KRBUB", "KRKY", "THKK", "USNP1", "USWD1", "USWD1",
"USWD1", "FRSA", "KRBUB", "KRKY", "USWD1", "USWD1", "USWD1",
"BRAC", "FRSA", "HUOCB", "HUOCB", "KRBUB", "KRBUB", "KRKY", "UNK",
"USNP1", "USWD1", "USWD1", "USWD1", "USWDBS", "BRAC", "FRSA",
"HUOCB", "KRBUB", "KRBUB", "KRKY", "KRKY", "THKK", "USNP1", "USNP1",
"USWD1", "USWD1", "USWD1", "BRAC", "ESEEB", "FRSA", "FRSAB",
"HUOCB", "HUOCB", "KRKY", "KRKY", "THKK", "THKK", "UNK", "UNK",
"UNK", "USNP1", "USWD1", "USWD1", "USWD1", "BRAC", "CNSG", "CNSG",
"FRSA", "FRSA", "FRSAB", "HUOCB", "HUOCB", "KRKY", "KRKY", "NLENV",
"THKK", "THKK", "UNK", "USNP1", "USNP1", "USWD1", "USWD1", "USWD1",
"USWDT", "BRAC", "CNSG", "ESEEB", "ESEEB", "FRSA", "HUOCB", "KRKY",
"KRKY", "THKK", "THKK", "UNK", "UNK", "USNP1", "USNP1", "USWD1",
"USWD1", "USWD1", "USWDBS", "USWDT", "USWDT", "BRAC", "CNBJ",
"CNSG", "CNSG", "ESEEB", "ESTPB", "FRSA", "FRSA", "HUOCB", "KRBUB",
"KRKY", "KRKY", "NLENV", "THKK", "THKK", "TRAD", "UNK", "UNK",
"USNP1", "USNP1", "USNPT", "USNPT", "USWD1", "USWD1", "USWD1",
"USWD1", "USWDT", "ADVAN", "AUME", "BRAC", "CNBJ", "CNBJ", "CNSG",
"CNSG", "CNSG", "ESEEB", "ESEEB", "ESTPB", "FRSA", "FRSA", "FRSAB",
"GRAT", "HUOCB", "HUOCB", "HUOCB", "JOAM", "KRKY", "KRKY", "NLENV",
"NLENV", "THKK", "THKK", "TRAD", "UNK", "UNK", "UNK", "USNP1",
"USNP1", "USNPT", "USWD1", "USWD1", "USWD1", "USWD1", "ADVAN",
"ADVAN", "AUME", "BRAC", "CNBJ", "CNBJ", "CNSG", "CNSG", "ESEEB",
"ESEEB", "ESTPB", "FRSA", "FRSA", "FRSAB", "GRAT", "HUOCB", "HUOCB",
"HUOCB", "ITCM", "JOAM", "JOAMT", "KRKY", "KRKY", "MAAG", "NLENV",
"NLENV", "THKK", "THKK", "TRAD", "TRAD", "UNK", "UNK", "UNK",
"USNP1", "USNP1", "USWD1", "USWD1", "USWD1", "USWD1", "USWDBS",
"USWDBS", "USWDT", "USWDT", "ADVAN", "ADVAN", "BRAC", "BRAC",
"BRHB", "CNBJ", "CNBJ", "CNSG", "EGGI", "EGGI", "ESEEB", "ESEEB",
"ESTPB", "ESTPB", "FRSA", "FRSA", "FRSAB", "GRAT", "HUOCB", "HUOCB",
"ITCM", "JOAM", "JOAMT", "KRKY", "KRKY", "MAAG", "NLENV", "NLENV",
"RUKR", "SYNES", "SYNRO", "SYNRO", "THKK", "THKK", "TRAD", "TRANT",
"UAKI", "UAKI", "UNK", "UNK", "UNK", "USNP1", "USWD1", "USWD1",
"USWD1", "USWD1", "USWDBS", "USWDBS", "USWDT", "USWDT", "ADVAN",
"ADVAN", "BRAC", "BRAC", "BRHB", "CNBJ", "CNBJ", "CNSG", "CNSG",
"EGGI", "EGGI", "FRSA", "FRSA", "FRSAB", "GRAT", "HUOCB", "HUOCB",
"IDCK", "IDCK", "INSHB", "ITCM", "JOAM", "JOAMT", "KRBUB", "KRBUB",
"KRKY", "KRKY", "MAAG", "NLENV", "NLENV", "RUKR", "SYNRO", "THKK",
"THKK", "TRAD", "TRAD", "TRANT", "UNK", "UNK", "USNP1", "USWD1",
"USWD1", "USWD1", "USWD1", "USWDBS", "USWDBS", "USWDT", "USWDT",
"ADVAN", "ADVAN", "AUME", "BRAC", "BRHB", "CHBS", "CNBJ", "CNBJ",
"CNSG", "CNSG", "EGGI", "ESTPB", "FRSA", "FRSA", "FRSAB", "GRAT",
"HUBU", "HUOCB", "HUOCB", "IDCK", "IDCK", "INSHB", "ITCM", "JOAM",
"JOAMT", "KRBUB", "KRKY", "KRKY", "KRKY", "NLENV", "NLENV", "RUKR",
"SYNRO", "THKK", "THKK", "THKK", "TRAD", "TRAD", "TRANT", "UAKI",
"UNK", "UNK", "USNP1", "USNPT", "USWD1", "USWD1", "USWD1", "USWD1",
"USWDBS", "USWDBS", "USWDT", "USWDT", "USWDT", "ADV", "ADVAN",
"ADVAN", "AUME", "BRAC", "BRAC", "BRHB", "BRHM", "CHBS", "CNBJ",
"CNBJ", "CNSG", "CNSG", "EGGI", "EGGI", "ESEEB", "ESTPB", "FRSA",
"FRSA", "FRSA", "FRSAB", "GRAT", "GRATT", "HUBU", "HUBU", "HUOCB",
"HUOCB", "IDCK", "IDCK", "ILZGT", "INWA", "ITCM", "JOAM", "JOAMT",
"JOAMT", "JPTO", "KRBUB", "KRKY", "KRKY", "KRKY", "MAAG", "NLENV",
"NLENV", "RUKR", "SYNES", "SYNRO", "SYNRO", "THKK", "THKK", "TRAD",
"TRANT", "UAKI", "UAKI", "UNK", "UNK", "USNP1", "USNPT", "USNPT",
"USWD1", "USWD1", "USWD1", "USWD1", "USWDBS", "USWDBS", "USWDT",
"USWDT", "ADVAN", "ADVAN", "BRHM", "BRHM", "BRUB", "CNBJ", "CNBJ",
"CNSG", "ESEEB", "FRSA", "FRSAB", "GRAT", "HUBU", "HUOCB", "HUOCB",
"IDCK", "ILZGT", "INSHB", "INWA", "JOAMT", "JPTO", "KRKY", "KRKY",
"NLENV", "NLENV", "PKKA", "SYNRO", "THKK", "THKK", "THKK", "TRAD",
"TRANT", "UAKI", "UNK", "UNK", "USNPT", "USNPT", "USWD1", "USWD1",
"USWD1", "USWD1", "USWDBS", "USWDBS", "USWDT", "USWDT", "VNHC",
"ADVAN", "BRHM", "CNBJ", "CNBJ", "CNSG", "DEBS", "ESEEB", "ESTPB",
"FRSAB", "GRAT", "GRAT", "GRATT", "HUOCB", "HUOCB", "ILZGT",
"INSHB", "JOAMT", "KRKY", "KRKY", "NLENV", "PKKA", "THKK", "THKK",
"UAKI", "UNK", "UNK", "USNP1", "USNPT", "USNPT", "USNPT", "USWD1",
"USWD1", "USWD1", "USWD1", "USWDBS", "USWDT", "USWDT", "VNHC",
"CNBJ", "CNBJ", "ESEEB", "HUOCB", "HUOCB", "KRKY", "KRKY", "NLENV",
"THKK", "THKK", "USWD1", "USWD1", "USWD1", "USWDT", "FRSA", "KRBUB",
"KRKY", "USWD1"), Status = c("EXTS ", "TBC ", "EXTS ", "EXTS ",
"EXTS ", "TBC ", "DISC ", "EXTS ", "TBC ", "EXTS ", "EXTS ",
"EXTS ", "DISC ", "EXTS ", "TBC ", "EXTS ", "EXTS ", "EXTS ",
"TBC ", "EXTS ", "TBC ", "EXTS ", "TBC ", "TBC ", "DISC ",
"EXTS ", "TBC ", "TBC ", "EXTS ", "EXTS ", "EXTS ", "EXTS ",
"TBC ", "EXTS ", "TBC ", "EXTS ", "EXTS ", "TBC ", "DISC ",
"EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ", "EXTS ", "EXTS ",
"TBC ", "EXTS ", "TBC ", "EXTS ", "TBC ", "DISC ", "EXTS ",
"TBC ", "TBC ", "DISC ", "EXTS ", "TBC ", "EXTS ", "EXTS ",
"TBC ", "EXTS ", "TBC ", "EXTS ", "EXTS ", "TBC ", "EXTS ",
"TBC ", "TBC ", "EXTS ", "TBC ", "DISC ", "EXTS ", "TBC ",
"DISC ", "EXTS ", "TBC ", "EXTS ", "EXTS ", "TBC ", "EXTS ",
"TBC ", "EXTS ", "EXTS ", "EXTS ", "TBC ", "EXTS ", "TBC ",
"DISC ", "EXTS ", "EXTS ", "TBC ", "DISC ", "EXTS ", "TBC ",
"TBC ", "EXTS ", "TBC ", "EXTS ", "EXTS ", "EXTS ", "TBC ",
"TBC ", "EXTS ", "EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ",
"TBC ", "TBC ", "EXTS ", "TBC ", "TBC ", "DISC ", "EXTS ",
"EXTS ", "TBC ", "MDSC ", "TBC ", "DISC ", "EXTS ", "MDSC ",
"TBC ", "TBC ", "TBC ", "EXTS ", "EXTS ", "EXTS ", "TBC ",
"DISC ", "EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ", "EXTS ",
"TBC ", "EXTS ", "EXTS ", "DISC ", "EXTS ", "TBC ", "EXTS ",
"EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ", "TBC ", "TBC ",
"DISC ", "EXTS ", "TBC ", "EXTS ", "TBC ", "MDSC ", "DISC ",
"EXTS ", "MDSC ", "TBC ", "EXTS ", "TBC ", "EXTS ", "EXTS ",
"EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ", "TBC ", "TBC ",
"EXTS ", "TBC ", "EXTS ", "EXTS ", "DISC ", "EXTS ", "TBC ",
"EXTS ", "EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ", "EXTS ",
"TBC ", "EXTS ", "TBC ", "EXTS ", "TBC ", "DISC ", "EXTS ",
"TBC ", "EXTS ", "TBC ", "DISC ", "EXTS ", "MDSC ", "TBC ",
"EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ",
"TBC ", "EXTS ", "EXTS ", "TBC ", "EXTS ", "EXTS ", "TBC ",
"EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ",
"EXTS ", "EXTS ", "TBC ", "EXTS ", "EXTS ", "TBC ", "EXTS ",
"TBC ", "EXTS ", "EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ",
"TBC ", "EXTS ", "TBC ", "TBC ", "EXTS ", "EXTS ", "TBC ",
"DISC ", "EXTS ", "TBC ", "TBC ", "DISC ", "EXTS ", "MDSC ",
"TBC ", "EXTS ", "TBC ", "DISC ", "EXTS ", "EXTS ", "TBC ",
"EXTS ", "TBC ", "EXTS ", "EXTS ", "TBC ", "EXTS ", "TBC ",
"EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ", "EXTS ", "EXTS ",
"TBC ", "EXTS ", "TBC ", "TBC ", "EXTS ", "EXTS ", "TBC ",
"DISC ", "EXTS ", "EXTS ", "TBC ", "EXTS ", "EXTS ", "TBC ",
"EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ",
"EXTS ", "TBC ", "TBC ", "DISC ", "EXTS ", "MDSC ", "TBC ",
"EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ", "TBC ", "TBC ",
"EXTS ", "EXTS ", "EXTS ", "EXTS ", "TBC ", "EXTS ", "TBC ",
"TBC ", "EXTS ", "EXTS ", "TBC ", "EXTS ", "EXTS ", "EXTS ",
"EXTS ", "TBC ", "EXTS ", "TBC ", "TBC ", "EXTS ", "EXTS ",
"TBC ", "TBC ", "DISC ", "EXTS ", "TBC ", "EXTS ", "TBC ",
"EXTS ", "TBC ", "EXTS ", "MDSC ", "TBC ", "EXTS ", "TBC ",
"EXTS ", "EXTS ", "EXTS ", "TBC ", "TBC ", "MDSC ", "DISC ",
"EXTS ", "MDSC ", "TBC ", "EXTS ", "TBC ", "DISC ", "EXTS ",
"TBC ", "EXTS ", "EXTS ", "TBC ", "TBC ", "DISC ", "EXTS ",
"EXTS ", "EXTS ", "EXTS ", "EXTS ", "TBC ", "EXTS ", "TBC ",
"EXTS ", "TBC ", "TBC ", "TBC ", "DISC ", "EXTS ", "TBC ",
"EXTS ", "EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ", "TBC ",
"EXTS ", "TBC ", "TBC ", "EXTS ", "EXTS ", "EXTS ", "EXTS ",
"TBC ", "TBC ", "EXTS ", "DISC ", "EXTS ", "TBC ", "EXTS ",
"EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ",
"TBC ", "TBC ", "EXTS ", "EXTS ", "TBC ", "EXTS ", "TBC ",
"TBC ", "MDSC ", "TBC ", "DISC ", "EXTS ", "MDSC ", "TBC ",
"EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ",
"TBC ", "TBC ", "EXTS ", "TBC ", "TBC ", "TBC ", "TBC ",
"EXTS ", "EXTS ", "EXTS ", "EXTS ", "TBC ", "EXTS ", "TBC ",
"TBC ", "EXTS ", "EXTS ", "TBC ", "EXTS ", "TBC ", "EXTS ",
"TBC ", "TBC ", "EXTS ", "DISC ", "EXTS ", "TBC ", "TBC ",
"EXTS ", "TBC ", "EXTS ", "TBC ", "DISC ", "EXTS ", "DISC ",
"EXTS ", "MDSC ", "TBC ", "EXTS ", "TBC ", "EXTS ", "TBC ",
"TBC ", "EXTS ", "TBC ", "EXTS ", "TBC ", "TBC ", "TBC ",
"TBC ", "TBC ", "EXTS ", "EXTS ", "TBC ", "EXTS ", "EXTS ",
"TBC ", "TBC ", "TBC ", "EXTS ", "EXTS ", "TBC ", "TBC ",
"TBC ", "EXTS ", "TBC ", "TBC ", "EXTS ", "TBC ", "TBC ",
"DISC ", "EXTS ", "MDSC ", "DISC ", "EXTS ", "MDSC ", "TBC ",
"EXTS ", "EXTS ", "TBC ", "TBC ", "EXTS ", "TBC ", "TBC ",
"EXTS ", "TBC ", "EXTS ", "TBC ", "TBC ", "EXTS ", "TBC ",
"DISC ", "EXTS ", "TBC ", "TBC ", "EXTS ", "TBC ", "EXTS ",
"EXTS "), count = c(1, 1, 121, 9, 1, 2, 3, 4, 812, 11, 1250,
45, 1, 4, 1175, 1, 13, 3, 1, 217, 33, 320, 1, 597, 3, 7, 1526,
1, 2, 65, 1, 698, 140, 520, 82, 2, 1, 394, 5, 16, 2956, 5, 1,
168, 1, 13, 5, 534, 77, 5, 1, 2, 2, 3, 381, 25, 75, 5164, 1,
3, 166, 99, 1, 1, 15, 2, 847, 25, 1, 7, 2, 5, 3, 260, 1024, 692,
5807, 2, 4, 738, 2, 2, 131, 18, 856, 219, 9, 2, 6, 5, 347, 55,
477, 78, 9610, 1, 2, 1, 16, 135, 277, 743, 1, 1, 317, 2, 31,
2, 735, 152, 218, 46, 83, 1, 4, 2, 2, 3, 1, 1, 279, 3773, 1,
3638, 1, 2, 6, 169, 72, 11, 1, 1283, 354, 11, 1, 33, 610, 138,
3, 1, 2, 648, 5, 1, 698, 12, 2, 2, 56, 138, 1, 8, 79, 2, 7, 28,
1, 2032, 4437, 1, 52, 6, 1, 1, 927, 1851, 249, 418, 30, 12, 5,
2, 208, 7, 9, 4, 1, 1139, 21, 1, 2, 1, 754, 11, 1, 2, 6, 2688,
1518, 3, 5, 62, 27, 13, 2, 25, 2236, 4130, 13, 624, 3, 2, 3,
1, 19, 4, 1231, 541, 19, 2566, 38, 17, 1, 1, 1, 2, 2, 2, 379,
20, 4, 11, 1146, 44, 1, 10, 2, 788, 39, 2, 14, 4, 5, 2, 4, 2,
1014, 284, 9, 1, 3, 2, 9, 9, 13, 12, 976, 5534, 3, 290, 8, 2,
1, 20, 3, 10, 160, 55, 2, 1467, 29, 30, 7, 8, 4, 39, 11, 3, 15,
1248, 107, 5, 1, 1, 1, 15, 1, 75, 1, 787, 133, 1, 2, 1, 4, 1,
2996, 446, 31, 3, 2, 29, 22, 26, 2639, 5027, 28, 536, 3, 123,
11, 22, 44, 10, 2, 53, 1, 1, 1469, 10, 8, 16, 1, 19, 305, 47,
43, 39, 2, 1179, 88, 26, 5, 1, 2, 28, 1, 227, 66, 577, 276, 4,
3, 33, 10, 3996, 1, 693, 23, 31, 1, 18, 15, 9, 63, 10, 117, 2696,
4, 714, 11, 1, 1, 14, 44, 10, 49, 56, 2, 2, 14, 21, 6, 3, 1399,
8, 9, 27, 9, 1, 1, 8, 1, 378, 41, 272, 49, 2, 10, 1, 881, 41,
34, 35, 2, 4, 2, 37, 5, 27, 1, 1, 115, 470, 372, 22, 9, 10, 1,
9, 4, 2, 7898, 335, 51, 1, 8, 1, 24, 12, 37, 21, 1, 2, 3566,
4, 529, 166, 1, 25, 19, 58, 28, 31, 1, 3, 1682, 13, 22, 2, 2,
156, 18, 1, 1146, 29, 6, 2, 14, 19, 3, 1, 1034, 105, 11, 15,
4, 11, 20, 3199, 191, 1, 24, 7, 59, 15, 10, 1, 1266, 1553, 4,
405, 4, 1, 4, 24, 17, 1, 14, 1505, 22, 18, 1, 11, 21, 28, 7,
1, 1, 1653, 44, 3, 25, 1, 884, 108, 13, 6, 5581, 308, 20, 158,
774, 2, 2, 18, 1, 10, 3321, 1, 658, 116, 20, 20, 42, 163, 90,
2, 487, 23, 300, 4, 2, 3107, 5, 1, 645, 237, 5, 1, 1, 18, 1)), class = "data.frame", row.names = c(NA,
-523L), .Names = c("Year", "Material Store Code", "Status", "count"
))
ms <-
ggplot(df, aes(x=Year, y = count, fill = Status)) +
geom_area(position="stack", stat="identity") +
facet_wrap(~`Material Store Code`)
ggplotly(ms, tooltip = c("y", "colour"))
```
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment