Ciruelas
library(readr)
#Vinos_Mosto <- read_delim("/media/rpalma/OS/AAA_Datos/2020/BID/Estadisticas/Matriz Origen Destino/CSV/Ciruela.csv",
# ";", escape_double = FALSE, trim_ws = TRUE)
Vinos_Mosto <- read_delim("Ciruela.csv", ";", escape_double = FALSE, trim_ws = TRUE)
## Warning: Missing column names filled in: 'X1' [1]
##
## ── Column specification ────────────────────────────────────────────────────────
## cols(
## .default = col_double()
## )
## ℹ Use `spec()` for the full column specifications.
Vinos_Mosto <- as.matrix(Vinos_Mosto)
Vinos_Mosto <- Vinos_Mosto/1000000
Zonas <- read_delim("Zonas.csv",";", escape_double = FALSE, trim_ws = TRUE)
##
## ── Column specification ────────────────────────────────────────────────────────
## cols(
## ID = col_double(),
## `CODIGO ZONA` = col_character(),
## PROVINCIA = col_character(),
## CENTROIDE = col_character()
## )
rownames(Vinos_Mosto) <- Zonas$CENTROIDE
Vinos_Mosto <- Vinos_Mosto[ , -1]
colnames(Vinos_Mosto) <- Zonas$CENTROIDE
Origen y Destino por Zonas Centroides
library(circlize)
## ========================================
## circlize version 0.4.13
## CRAN page: https://cran.r-project.org/package=circlize
## Github page: https://github.com/jokergoo/circlize
## Documentation: https://jokergoo.github.io/circlize_book/book/
##
## If you use it in published research, please cite:
## Gu, Z. circlize implements and enhances circular visualization
## in R. Bioinformatics 2014.
##
## This message can be suppressed by:
## suppressPackageStartupMessages(library(circlize))
## ========================================
chordDiagram(Vinos_Mosto, transparency = 0.5, big.gap = 10 )
# circos.dendrogram(Vinos_Mosto, facing = "inside")
Archivos de Datos:
Matriz Origen Destino Centros Urbanos Nodos Fuente del Proyecto
This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see http://rmarkdown.rstudio.com.
When you click the Knit button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:
summary(cars)
## speed dist
## Min. : 4.0 Min. : 2.00
## 1st Qu.:12.0 1st Qu.: 26.00
## Median :15.0 Median : 36.00
## Mean :15.4 Mean : 42.98
## 3rd Qu.:19.0 3rd Qu.: 56.00
## Max. :25.0 Max. :120.00
You can also embed plots, for example:
Note that the echo = FALSE
parameter was added to the code chunk to prevent printing of the R code that generated the plot.