From 8e84ad7d63203bd86df8b325cae8d553f1376adb Mon Sep 17 00:00:00 2001 From: Filipe Rodrigues Date: Sat, 17 Jun 2023 14:54:18 +0100 Subject: [PATCH] Updated 3 --- 3/script.R | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/3/script.R b/3/script.R index f47ff9d..7a61c1b 100755 --- a/3/script.R +++ b/3/script.R @@ -27,6 +27,8 @@ df$AGE[df$AGE == "5564"] <- "55-64" # Then plot them and save the output plot <- ggplot(df, aes(x = AGE, y = Value)) + - geom_col() + geom_col() + + xlab("Grupo etário") + + ylab("EMP1") ggsave(plot = plot, "output.png")