My x-axis is formated as Dates using the Lubridate package.
I have tried different options with the xlim and breaks but can't seem to get "2020" to fit within the figure.
interest_exp_line <- ggplot(interest_exp_df, aes(x = year,
y = value,
colour = country_name,
group = country_name)
)
interest_exp_line2 <- interest_exp_line +
geom_line() +
geom_hline(yintercept = 0)
interest_exp_line3 <- interest_exp_line2 +
bbc_style() +
scale_x_date(date_labels = "%Y") +
theme(axis.title.x = element_text(size = 12),
axis.title.y = element_text(size = 12)
) +
labs(title = "Is Ghana the next Zambia?",
subtitle = "Ghana isn't getting any better...",
x = "Year",
y = "Interest payments\n(% of expenses)")
finalise_plot(plot_name = interest_exp_line3,
source = "Source: World Bank",
save_filepath = "c:/workspace/repos/world_bank_data/outputs/figures/ghana_zambia_interest_line.png",
width_pixels = 640,
height_pixels = 450
)
My plot looks like this: