jsauer/secmalasct
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

visualize/sma_jitt_dx_year: Adjust output

Browse Source 
Adjust labels and remove legend.
This commit is contained in:
Jens Sauer 2021-01-17 11:35:12 +01:00
parent 3e263bb400
commit beedddda01
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
visualize.R
View File

@ -68,7 +68,10 @@ sma_freq_dx_year <- function() {
sma_jitt_dx_year <- function() { sma_jitt_dx_year <- function() {
data <- i_dx_year_data() data <- i_dx_year_data()
ggplot(data, aes(x = asct_year, y = dx, colour = dx, fill = dx)) + 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() { sma_plot_file_hist <- function() {