In bcgov/drake-example: Compendium and drake example

Package

library(drake)
library(dplyr)
library(ggplot2)

Model Performance

readd(model_performance)

Test Results

loadd(test_results)

test_summary <- test_results %>% 
  group_by(name) %>% 
  summarize(mean_y = mean(y))

A plot

test_summary %>% 
  ggplot(aes(x = name, y = mean_y)) +
  geom_col() +
  coord_flip()

bcgov/drake-example documentation built on April 3, 2021, 7 a.m.