library(readr)
arbolado<-readr::read_csv("/home/harpo/Dropbox/ongoing-work/git-repos/am2017/hackaton/data/arbolado-mza-dataset.csv")
Rows: 31912 Columns: 12
── Column specification ───────────────────────────────────────────────────────────────────────────────────────────────────────
Delimiter: ","
chr (5): especie, ultima_modificacion, altura, diametro_tronco, nombre_seccion
dbl (7): id, circ_tronco_cm, long, lat, seccion, area_seccion, inclinacion_peligrosa
ℹ Use `spec()` to retrieve the full column specification for this data.
ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
hist(arbolado$circ_tronco_cm/pi,xlab = "diametro", breaks = 5)
`
hist(arbolado$circ_tronco_cm,breaks = 100)
library(dplyr)
library(ggplot2)
arbolado %>%
ggplot()+
geom_histogram(aes(x=circ_tronco_cm),binwidth = 1,bins =10 )+
theme_bw()