From beedddda019cc2cd4bfb6672d2ec99c1626d19b2 Mon Sep 17 00:00:00 2001 From: Jens Sauer Date: Sun, 17 Jan 2021 11:35:12 +0100 Subject: [PATCH] visualize/sma_jitt_dx_year: Adjust output Adjust labels and remove legend. --- visualize.R | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/visualize.R b/visualize.R index 2b78a73..ca7ab38 100644 --- a/visualize.R +++ b/visualize.R @@ -68,7 +68,10 @@ sma_freq_dx_year <- function() { sma_jitt_dx_year <- function() { data <- i_dx_year_data() ggplot(data, aes(x = asct_year, y = dx, colour = dx, fill = dx)) + - geom_jitter(width = 0.4, height = 0.2) + geom_jitter(width = 0.4, height = 0.2) + + labs(x = "Year", y = "Diagnosis") + + theme(legend.position = "none") + + xlim(1990, 2020) } sma_plot_file_hist <- function() {