From 74a51dbd91e53b80dda58fe039946e95cf42cebe Mon Sep 17 00:00:00 2001 From: Will Bradley Date: Wed, 5 Jul 2017 16:08:23 -0400 Subject: [PATCH] another tweak to global --- fcs_reestimates/global.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/fcs_reestimates/global.R b/fcs_reestimates/global.R index 6769dba..8e98685 100644 --- a/fcs_reestimates/global.R +++ b/fcs_reestimates/global.R @@ -95,9 +95,9 @@ get_plot_df <- function(view_type, agency_df, program_df) { } -get_caption <- function(plot_data, input_type) { +get_caption <- function(plot_data, what_input) { - if (input_type == 'Agency') { + if (what_input == 'Agency') { caption <- plot_data[['h1']][1] %>% as.character()