figura 1 (receita por classe)

philsf-biostat · Oct 16, 2021 · bf5c471 · bf5c471
1 parent 638e525
commit bf5c471
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 2 deletions.
diff --git a/figures/receita_total.png b/figures/receita_total.png
diff --git a/scripts/plots-save.R b/scripts/plots-save.R
@@ -14,3 +14,4 @@ units <- "cm"
 # save plots --------------------------------------------------------------
 
 ggsave(filename = "figures/receitas.png", plot = gg.receitas, height = 16.5, width = 16.5, units = units)
+ggsave(filename = "figures/receita_total.png", plot = gg.rec_total, height = height, width = width, units = units)
diff --git a/scripts/plots.R b/scripts/plots.R
@@ -45,6 +45,8 @@ data.raw %>%
 #   scale_color_brewer(palette = ff.pal) +
 #   scale_fill_brewer(palette = ff.pal)
 
-gg +
-  geom_histogram(aes(total_receita), binwidth = .5) +
+gg.rec_total <- gg +
+  geom_histogram(aes(total_receita), binwidth = .5, fill = ff.col) +
+  xlab(attr(analytical$total_receita, "label")) +
+  ylab("") +
   facet_wrap(~ evangelico)
Original file line number	Diff line number	Diff line change
Expand Up		@@ -14,3 +14,4 @@ units <- "cm"
		# save plots --------------------------------------------------------------

		ggsave(filename = "figures/receitas.png", plot = gg.receitas, height = 16.5, width = 16.5, units = units)
		ggsave(filename = "figures/receita_total.png", plot = gg.rec_total, height = height, width = width, units = units)