update reprex figure

avallecam · Oct 4, 2020 · 7530992 · 7530992
1 parent bd107bc
commit 7530992
Show file tree

Hide file tree

Showing 3 changed files with 22 additions and 20 deletions.
diff --git a/docs/articles/howto-reprex.html b/docs/articles/howto-reprex.html
diff --git a/docs/articles/howto-reprex_files/figure-html/unnamed-chunk-12-1.png b/docs/articles/howto-reprex_files/figure-html/unnamed-chunk-12-1.png
diff --git a/vignettes/howto-reprex.Rmd b/vignettes/howto-reprex.Rmd
@@ -443,15 +443,16 @@ outcome_01_adj_tbl %>%
 
 ```{r}
 outcome_01_adj_tbl %>%
+  filter(str_detect(numerator,"outcome")) %>% 
   ggplot_prevalence_ii(
     denominator_level = denominator_level,
     numerator = numerator,
     proportion = prop,
     proportion_upp = prop_upp,
     proportion_low = prop_low) +
   theme(axis.text.x = element_text(angle = 0, vjust = 0, hjust=0)) +
-  coord_flip() +
-  facet_wrap(denominator~.,scales = "free_y") +
+  # coord_flip() +
+  facet_wrap(denominator~.,scales = "free") +
   # facet_grid(denominator~.,scales = "free_y") +
   colorspace::scale_color_discrete_qualitative() +
   labs(title = "Prevalence of numerators across denominators",