# SET SOME DEFAULT BEHAVIORS FOR CODE CHUNKS: # These defaults suppress the printing of code, function messages, and error warnings knitr::opts_chunk$set( echo = FALSE, message = FALSE, warning = FALSE ) # Knology colors Knology.Systems.Widget <- Knology.Navy.Widget <- Knology.Blue <- TrustedBlue_647C <- "#236192" Knology.Blue.Highlight <- HorizonBlue_652 <- "#7D9BC1" Knology.Wellness.Widget <- Knology.Yellow.Widget <- OptimisticCitrine_611C <- "#D7C826" Knology.Media.Widget <- Knology.Orange.Widget <- RadiantCoral_1645 <- "#FF6A39" Knology.Biosphere.Widget <- Knology.Green.Widget <- NewLeaf_2292 <- "#93C90E" Knology.Behaviors.Widget <- Knology.Blue.Widget <- Ocean_7467 <- "#00A3AD" Knology.Culture.Widget <- Knology.Purple.Widget <- Passion_7656 <- "#8E3A80" Knology.Blue.Text <- DarkBlue_294C <- "#002F6C" Knology.Black <- Black_6C <- "#101820" axis.col = grey(0.8) Knology.bar.col <- c(Knology.Blue.Widget, Knology.Orange.Widget, Knology.Purple.Widget, Knology.Yellow.Widget, Knology.Green.Widget, Knology.Blue) Knology.Behaviours.Face <- Knology.Blue.Face <- rsvg::rsvg("~/Dropbox (Knology)/NKO Core/Z NKO Brand Tools//Logos & Icons/Other Brand Assets/Face Buttons/KNOLOGY Button Ocean/Knology-Behaviours.svg") Knology.Media.Face <- Knology.Orange.Face <- rsvg::rsvg("~/Dropbox (Knology)/NKO Core/Z NKO Brand Tools//Logos & Icons/Other Brand Assets/Face Buttons/KNOLOGY Button-Coral/Knology-Media.svg") Knology.Culture.Face <- Knology.Purple.Face <- rsvg::rsvg("~/Dropbox (Knology)/NKO Core/Z NKO Brand Tools//Logos & Icons/Other Brand Assets/Face Buttons/KNOLOGY Button-Passion/Knology-Culture.svg") Knology.Wellness.Face <- Knology.Yellow.Face <- rsvg::rsvg("~/Dropbox (Knology)/NKO Core/Z NKO Brand Tools//Logos & Icons/Other Brand Assets/Face Buttons/KNOLOGY Button-Citrine/Knology-Wellness.svg") KKnology.Biosphere.Face <- nology.Green.Face <- rsvg::rsvg("~/Dropbox (Knology)/NKO Core/Z NKO Brand Tools//Logos & Icons/Other Brand Assets/Face Buttons/KNOLOGY Button-NewLeaf/Knology-Biosphere.svg") Knology.Systems.Face <- Knology.Navy.Face <- rsvg::rsvg("~/Dropbox (Knology)/NKO Core/Z NKO Brand Tools//Logos & Icons/Other Brand Assets/Face Buttons/KNOLOGY Button- Systems/Knology-Systems.svg") # Load Knology Fonts sysfonts::font_add_google("Ubuntu") sysfonts::font_add_google("Open Sans")
This is a customised R Markdown document for integrating writing and analysis for presentation slides. For more details on using R Markdown see http://rmarkdown.rstudio.com, or refer to our local resources available here:
"~/Dropbox (NewKnowledge.org)/NKO Core/Admin/Professional Development/R Training/"
When you click the Knit button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this (notice that the output for this chunk includes the R code):
summary(cars)
You can also embed plots, for example (notice that the output for this chunk does not include the R code):
plot(pressure)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.