Oi, gente!
Estou tentando ajustar a escala de algumas variáveis do eixo x do gráfico abaixo. Eu apenas consigo ajustar a escala do eixo x para todas as variáveis x com o scale_x_continuous(), no entanto, gostaria de apenas alterar a escala das variáveis monetárias.
Nesse gráfico utilizo usando a tradicional base do IMDb disponibilizada no material do curso R para Ciência dos Dados I:
library(ggplot2)
library(dplyr)
library(scales)
library(ggthemes)
nomes <- as_labeller(
c(`lucro` = "Lucro", `ano` = "Ano",`duracao` = "Duração", `likes_facebook` = "Likes",`nota_imdb` = "Nota IMDb", `orcamento` = "Orçamento", `receita` = "Receita"))
f<-imdb %>%
mutate(lucro = receita - orcamento) %>%
select(where(is.numeric)) %>%
pivot_longer(
cols = -lucro,
names_to = "variavel",
values_to = "valor"
) %>%
ggplot(aes(x = valor, y = lucro))
g<-f+ geom_point() +
facet_wrap(~variavel, scales = "free", labeller = nomes)+
scale_y_continuous(labels = label_dollar())+
scale_x_continuous(n.breaks=3)+
theme_economist()
g
Alguém teria alguma solução para eu conseguir ajustar essa escala no eixo x desse gráfico com facets apenas nas variáveis monetárias?
Desde já agradeço.