...
 
Commits (2)
This diff is collapsed.
This diff is collapsed.
......@@ -46,6 +46,26 @@ vut.municipio %>% head(25) %>%
size=3,color="#888888", hjust=0)
dev.off()
png(filename="images/vut/vut-municipios-top50-comunidad-valenciana-201903.png",width = 600,height = 1000)
vut.municipio %>% head(50) %>%
ggplot(aes(x = reorder(Municipio,n), y = n)) +
scale_y_continuous(labels=function(x) format(x, big.mark = ".", scientific = FALSE)) +
geom_col() + coord_flip() +
theme_minimal(base_family = "Roboto Condensed", base_size = 14) +
theme(
panel.grid.minor.y = element_blank(), panel.grid.major.y = element_blank(),
legend.position = "bottom"
) +
labs(title = "Viviendas turísticas en registro oficial por municipo: top 50",
subtitle = "Comunidad Valenciana. Marzo 2019.",
y = "Número de VUT",
x = "",
caption = "Datos: Generalitat Valenciana. Gráfico: lab.montera34.com/airbnb") +
geom_text(aes(label = format(n, big.mark = ".", scientific = FALSE), x=reorder(Municipio,n), y = n+50),
position = "dodge",
size=3,color="#888888", hjust=0)
dev.off()
# analisis Valencia -----------------
# por teléfono --------------
......@@ -64,7 +84,7 @@ theme_minimal(base_family = "Roboto Condensed", base_size = 14) +
subtitle = "Valencia. Marzo 2019.",
y = "nº anuncios",
x = "",
caption = "Datos: Comunidad Valenciana. Gráfico: lab.montera34.com/airbnb") +
caption = "Datos: Generalitat Valenciana. Gráfico: lab.montera34.com/airbnb") +
geom_text(aes(label = format(n, big.mark = ".", scientific = FALSE), x=reorder(Teléfono,n), y = n+2),
position = "dodge",
size=3,color="#888888", hjust=0)
......@@ -165,7 +185,7 @@ ggplot(aes(x = reorder(distrito,n), y = n)) +
subtitle = "Valencia. Marzo 2019.",
y = "nº anuncios",
x = "",
caption = "Datos: Comunidad Valenciana. Gráfico: lab.montera34.com/airbnb")
caption = "Datos: Generalitat Valenciana. Gráfico: lab.montera34.com/airbnb")
dev.off()
# por barrio -----------------------------
......@@ -190,5 +210,5 @@ vut.barrio %>% filter(!barrio == "POR CLASIFICAR") %>%
subtitle = "Valencia. Marzo 2019. (1.202 por clasificar).",
y = "nº anuncios",
x = "",
caption = "Datos: Comunidad Valenciana. Gráfico: lab.montera34.com/airbnb")
caption = "Datos: Generalitat Valenciana. Gráfico: lab.montera34.com/airbnb")
dev.off()