knitr::opts_chunk$set(echo = TRUE, message = FALSE, warning = FALSE)

Analysis Instructions

Import libraries

# string manipulation functions
library(stringr)
# standard analysis and plotting functions, includes dplyr, ggplot2 
library(tidyverse)
# loads lab default ggplot2 theme and provides color-blind friendly palette
library(rasilabRtemplates)

Import data

data <- read_csv("https://github.com/tidyverse/readr/raw/master/inst/extdata/mtcars.csv") %>% 
  print()

Transform data

processed_data <- data %>% 
  filter(am == 1) %>%
  select(mpg, qsec, carb)

processed_data %>% 
  knitr::kable()

Plot data

processed_data %>% 
  gather(statistic, value, -carb) %>% 
  ggplot(aes(x = carb, y = value, color = statistic)) +
  facet_wrap(~ statistic, ncol = 2) +
  geom_jitter(width = 0) +
  scale_color_manual(values = cbPalette)


rasilab/rasilabRtemplates documentation built on March 28, 2023, 8:05 p.m.