###Para mayor precisión seleccionamos bases de datos actualizadas, estas corresponden al año 2019. ### De acuerdo a las bases seleccionadas, relacionamos los datos para obtener una estimación de dónde ubicar el próximo hospital público. ### Las bases poseen suficientes datos y variables para plasmar la realidad reciente de la ubicación de los hospitales en Chile
library(data.table)
library(dplyr)
##
## Attaching package: 'dplyr'
## The following objects are masked from 'package:data.table':
##
## between, first, last
## The following objects are masked from 'package:stats':
##
## filter, lag
## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, union
library(ggplot2)
library(haven)
library(readxl)
library(treemap)
library(lubridate)
##
## Attaching package: 'lubridate'
## The following objects are masked from 'package:data.table':
##
## hour, isoweek, mday, minute, month, quarter, second, wday, week,
## yday, year
## The following objects are masked from 'package:base':
##
## date, intersect, setdiff, union
library(caret)
## Loading required package: lattice
library(psych)
##
## Attaching package: 'psych'
## The following objects are masked from 'package:ggplot2':
##
## %+%, alpha
library(psychTools)
require(sjPlot)
## Loading required package: sjPlot
## Install package "strengejacke" from GitHub (`devtools::install_github("strengejacke/strengejacke")`) to load all sj-packages at once!
require(survey)
## Loading required package: survey
## Loading required package: grid
## Loading required package: Matrix
## Loading required package: survival
##
## Attaching package: 'survival'
## The following object is masked from 'package:caret':
##
## cluster
##
## Attaching package: 'survey'
## The following object is masked from 'package:graphics':
##
## dotchart
library(rgdal)
## Loading required package: sp
## rgdal: version: 1.5-18, (SVN revision 1082)
## Geospatial Data Abstraction Library extensions to R successfully loaded
## Loaded GDAL runtime: GDAL 3.0.4, released 2020/01/28
## Path to GDAL shared files: C:/Users/jose/Documents/R/win-library/4.0/rgdal/gdal
## GDAL binary built with GEOS: TRUE
## Loaded PROJ runtime: Rel. 6.3.1, February 10th, 2020, [PJ_VERSION: 631]
## Path to PROJ shared files: C:/Users/jose/Documents/R/win-library/4.0/rgdal/proj
## Linking to sp version:1.4-4
## To mute warnings of possible GDAL/OSR exportToProj4() degradation,
## use options("rgdal_show_exportToProj4_warnings"="none") before loading rgdal.
library(leaflet)
library(deldir)
## deldir 0.2-2 Nickname: "Stack Smashing Detected"
##
## Note 1: As of version 0.2-1, error handling in this
## package was amended to conform to the usual R protocol.
## The deldir() function now actually throws an error
## when one occurs, rather than displaying an error number
## and returning a NULL.
##
## Note 2: As of version 0.1-29 the arguments "col"
## and "lty" of plot.deldir() had their names changed to
## "cmpnt_col" and "cmpnt_lty" respectively basically
## to allow "col" and and "lty" to be passed as "..."
## arguments.
##
## Note 3: As of version 0.1-29 the "plotit" argument
## of deldir() was changed to (simply) "plot".
##
## See the help for deldir() and plot.deldir().
library(sp)
library(RColorBrewer)
library(KernSmooth)
## KernSmooth 2.23 loaded
## Copyright M. P. Wand 1997-2009
Esperas<-fread("C:/Users/jose/Desktop/R/Data Science/The Big Work/Bases/LEQ_H_data.csv", encoding="UTF-8")
Hospitales<-readOGR("C:/Users/jose/Desktop/R/Data Science/The Big Work/Bases/HOSPITALES_SNSS_20190926.shp", encoding="UTF-8")
## OGR data source with driver: ESRI Shapefile
## Source: "C:\Users\jose\Desktop\R\Data Science\The Big Work\Bases\HOSPITALES_SNSS_20190926.shp", layer: "HOSPITALES_SNSS_20190926"
## with 195 features
## It has 25 fields
summary(Esperas)
## Clase Ranking Tasa I/O Fecha Entrada C
## Length:1573618 Min. :0.0000 Min. :0 Min. :1993
## Class :character 1st Qu.:0.0000 1st Qu.:0 1st Qu.:2016
## Mode :character Median :1.0000 Median :0 Median :2017
## Mean :0.6397 Mean :0 Mean :2017
## 3rd Qu.:1.0000 3rd Qu.:0 3rd Qu.:2018
## Max. :1.0000 Max. :0 Max. :2019
##
## Salida Fecha Salida C Causal s Demanda
## Min. :2012 Length:1573618 Length:1573618 Min. :0.0000
## 1st Qu.:2017 Class :character Class :character 1st Qu.:0.0000
## Median :2018 Mode :character Mode :character Median :1.0000
## Mean :2018 Mean :0.6397
## 3rd Qu.:2019 3rd Qu.:1.0000
## Max. :2019 Max. :1.0000
## NA's :260795
## ESPECIALIDAD (group) Especialidad Estab Dest Nombre Acumulado
## Length:1573618 Length:1573618 Length:1573618 Min. :0.0000
## Class :character Class :character Class :character 1st Qu.:0.0000
## Mode :character Mode :character Mode :character Median :0.0000
## Mean :0.3603
## 3rd Qu.:1.0000
## Max. :1.0000
##
## Egresado En Espera (copy) En Espera Año Salida
## Min. :0.0000 Min. :0.000 Min. :0.000 Min. :2012
## 1st Qu.:0.0000 1st Qu.:0.000 1st Qu.:0.000 1st Qu.:2017
## Median :0.0000 Median :0.000 Median :0.000 Median :2018
## Mean :0.4727 Mean :0.167 Mean :0.167 Mean :2018
## 3rd Qu.:1.0000 3rd Qu.:0.000 3rd Qu.:0.000 3rd Qu.:2019
## Max. :1.0000 Max. :1.000 Max. :1.000 Max. :2019
## NA's :260795
## Fecha_Digitacion Fecha Entrada Fecha Salida Fecha
## Length:1573618 Length:1573618 Length:1573618 Length:1573618
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##
##
## MesesEsperaLE Número de registros Produccion Region
## Min. : 4.0 Min. :1 Min. :0.0000 Length:1573618
## 1st Qu.: 122.0 1st Qu.:1 1st Qu.:0.0000 Class :character
## Median : 276.0 Median :1 Median :0.0000 Mode :character
## Mean : 330.4 Mean :1 Mean :0.3603
## 3rd Qu.: 474.0 3rd Qu.:1 3rd Qu.:1.0000
## Max. :3842.0 Max. :1 Max. :1.0000
## NA's :1312823
## Serv Salud Dest Nombre range tpo
## Length:1573618 Length:1573618
## Class :character Class :character
## Mode :character Mode :character
##
##
##
##
table(Esperas$`Estab Dest Nombre`)
##
## Actividades gestionadas por la Dirección del Servicio para apoyo de la Red (S.S Araucanía Sur)
## 48
## Centro Asistencial Norte
## 591
## Centro Comunitario de Salud Familiar Achupallas ""Sergio Donoso""
## 38
## Centro Comunitario de Salud Familiar Alemania
## 2
## Centro Comunitario de Salud Familiar Antiquina
## 32
## Centro Comunitario de Salud Familiar Cerro La Cruz
## 16
## Centro Comunitario de Salud Familiar Irene Frei Montalva
## 2
## Centro Comunitario de Salud Familiar Lambert
## 4
## Centro Comunitario de Salud Familiar Las Palmas
## 26
## Centro Comunitario de Salud Familiar Neltume
## 268
## Centro Comunitario de Salud Familiar Oasis
## 13
## Centro Comunitario de Salud Familiar Pantanosa
## 49
## Centro Comunitario de Salud Familiar Santa Julia
## 57
## Centro Comunitario de Salud Familiar Villa el Indio
## 1
## Centro Comunitario de Salud Familiar Villa Hermosa
## 13
## Centro de Referencia de Salud de Maipú
## 5301
## Centro de Referencia de Salud El Pino
## 2
## Centro de Referencia de Salud Hospital Provincia Cordillera
## 4512
## Centro de Referencia de Salud Miraflores
## 646
## Centro de Referencia de Salud Salvador Allende
## 5708
## Centro de Salud Docente Asistencial Monseñor Sergio Valech
## 1
## Centro de Salud Familia Nº 1 Puerto Varas
## 628
## Centro de Salud Familiar Abel Zapata (N° 3)
## 1878
## Centro de Salud Familiar Adriana Madrid De Costabal
## 495
## Centro de Salud Familiar Alcalde Iván Manríquez
## 503
## Centro de Salud Familiar Alcalde Leocán Portus
## 32
## Centro de Salud Familiar Alerce
## 144
## Centro de Salud Familiar Alto Jahuel
## 2
## Centro de Salud Familiar Amador Neghme
## 95
## Centro de Salud Familiar Amanda Benavente
## 612
## Centro de Salud Familiar Amanecer
## 32
## Centro de Salud Familiar Andes
## 627
## Centro de Salud Familiar Angachilla
## 1
## Centro de Salud Familiar Angelmó
## 202
## Centro de Salud Familiar Aníbal Ariztía
## 999
## Centro de Salud Familiar Antonio Varas
## 417
## Centro de Salud Familiar Arauco
## 1027
## Centro de Salud Familiar Armando Williams
## 22
## Centro de Salud Familiar Arrau Méndez
## 947
## Centro de Salud Familiar Artificio
## 66
## Centro de Salud Familiar Arturo Baeza Goñi
## 48
## Centro de Salud Familiar Baquedano
## 26
## Centro de Salud Familiar Barros Luco
## 141
## Centro de Salud Familiar Bellavista
## 134
## Centro de Salud Familiar Bicentenario
## 1090
## Centro de Salud Familiar Boca Sur
## 3136
## Centro de Salud Familiar Brígida Zavala
## 40
## Centro de Salud Familiar Calbuco
## 1
## Centro de Salud Familiar Calera de Tango
## 30
## Centro de Salud Familiar Canteras Villa Mercedes
## 22
## Centro de Salud Familiar Cardenal Caro
## 298
## Centro de Salud Familiar Cardenal Raúl Silva Henríquez de La Serena
## 251
## Centro de Salud Familiar Cardenal Raúl Silva Henríquez de Pudahuel
## 385
## Centro de Salud Familiar Cardenal Silva Henríquez
## 2129
## Centro de Salud Familiar Carlos Pinto Fierro
## 26
## Centro de Salud Familiar Carmela Carvajal
## 202
## Centro de Salud Familiar Carol Urzúa de San Bernardo
## 710
## Centro de Salud Familiar Centenario
## 38
## Centro de Salud Familiar Centro Sur de Antofagasta
## 2185
## Centro de Salud Familiar Cerrillos de Tamaya
## 13
## Centro de Salud Familiar Cerro Alto
## 642
## Centro de Salud Familiar Cerro Navia
## 6
## Centro de Salud Familiar Chacabuco
## 107
## Centro de Salud Familiar Chépica
## 1
## Centro de Salud Familiar Chiguayante
## 1410
## Centro de Salud Familiar Chincolco
## 237
## Centro de Salud Familiar Chonchi
## 217
## Centro de Salud Familiar Cienfuegos
## 69
## Centro de Salud Familiar Cirujano Aguirre
## 686
## Centro de Salud Familiar Cobquecura
## 352
## Centro de Salud Familiar Codegua
## 2
## Centro de Salud Familiar Coihueco
## 737
## Centro de Salud Familiar Concón
## 60
## Centro de Salud Familiar Cóndores de Chile
## 233
## Centro de Salud Familiar Confraternidad
## 88
## Centro de Salud Familiar Cordillera Andina (Urbano 2)
## 586
## Centro de Salud Familiar Cunaco
## 10
## Centro de Salud Familiar Curaco de Vélez
## 69
## Centro de Salud Familiar Curicó
## 254
## Centro de Salud Familiar Dalcahue
## 272
## Centro de Salud Familiar de Cajón
## 35
## Centro de Salud Familiar Diputado Manuel Bustos Huerta de San Antonio
## 204
## Centro de Salud Familiar Doñihue
## 7
## Centro de Salud Familiar Dr. Adalberto Steeger
## 768
## Centro de Salud Familiar Dr. Alberto Allende Jones
## 1341
## Centro de Salud Familiar Dr. Alberto Reyes
## 145
## Centro de Salud Familiar Dr. Alfredo Gantz Mann
## 1479
## Centro de Salud Familiar Dr. Amador Neghme de Arica
## 123
## Centro de Salud Familiar Dr. Arturo Albertz
## 1410
## Centro de Salud Familiar Dr. Avendaño
## 2538
## Centro de Salud Familiar Dr. Carlos Echeverría Véjar
## 13
## Centro de Salud Familiar Dr. David Benavente de Ninhue
## 385
## Centro de Salud Familiar Dr. Edelberto Elgueta
## 1703
## Centro de Salud Familiar Dr. Federico Puga
## 362
## Centro de Salud Familiar Dr. Fernando Monckeberg
## 942
## Centro de Salud Familiar Dr. Gustavo Molina
## 916
## Centro de Salud Familiar Dr. Hernán Alessandri
## 312
## Centro de Salud Familiar Dr. Hernán Urzúa Merino
## 96
## Centro de Salud Familiar Dr. José Eduardo Ahués Salame
## 519
## Centro de Salud Familiar Dr. Juan Carlos Baeza
## 72
## Centro de Salud Familiar Dr. Juan Cartes Arias
## 956
## Centro de Salud Familiar Dr. Luis Ferrada
## 568
## Centro de Salud Familiar Dr. Manuel Ferreira de Ancud
## 434
## Centro de Salud Familiar Dr. Mario Salcedo
## 85
## Centro de Salud Familiar Dr. Mateo Bencur
## 406
## Centro de Salud Familiar Dr. Miguel Ángel Solar (ex CESFAM Paine)
## 538
## Centro de Salud Familiar Dr. Norman Voulliéme
## 100
## Centro de Salud Familiar Dr. Osvaldo Ruz Orrego
## 526
## Centro de Salud Familiar Dr. Pedro Rivas Pinochet
## 166
## Centro de Salud Familiar Dr. Raúl Moya
## 8
## Centro de Salud Familiar Dr. Raúl Yazigi
## 448
## Centro de Salud Familiar Dr. René Tapia Salgado
## 61
## Centro de Salud Familiar Dr. Salvador Allende Gossens
## 406
## Centro de Salud Familiar Dr. Sergio Aguilar Delgado
## 49
## Centro de Salud Familiar Dr. Sergio Lagos Olave (ex Nº 4 Lota Bajo)
## 908
## Centro de Salud Familiar Dra. Ana María Juricic
## 408
## Centro de Salud Familiar Dra. Haydeé López Casoou
## 30
## Centro de Salud Familiar Dra. Maria Cristina Rojas Neumann
## 636
## Centro de Salud Familiar Dra. Michelle Bachelet
## 727
## Centro de Salud Familiar E. U. Iris Véliz Hume (Ex Oriente)
## 284
## Centro de Salud Familiar Edgardo Enríquez
## 534
## Centro de Salud Familiar Eduardo Frei Montalva
## 40
## Centro de Salud Familiar Eduardo Geyter (N° 2)
## 26
## Centro de Salud Familiar El Manzano
## 64
## Centro de Salud Familiar El Monte
## 691
## Centro de Salud Familiar El Quisco
## 350
## Centro de Salud Familiar El Sauce
## 47
## Centro de Salud Familiar El Tabo
## 115
## Centro de Salud Familiar Eleuterio Ramírez
## 86
## Centro de Salud Familiar Enfermera Sofía Pincheira
## 467
## Centro de Salud Familiar Enrique Dintrans (N° 1)
## 8
## Centro de Salud Familiar Entre Ríos
## 25
## Centro de Salud Familiar Estación
## 22
## Centro de Salud Familiar Eugenio Petruccelli Astudillo (ex Punta Norte)
## 200
## Centro de Salud Familiar Faustino González
## 516
## Centro de Salud Familiar Félix de Amesti
## 145
## Centro de Salud Familiar Freire
## 31
## Centro de Salud Familiar Frutillar Alto
## 560
## Centro de Salud Familiar Garín
## 1218
## Centro de Salud Familiar Gómez Carreño
## 98
## Centro de Salud Familiar Gultro
## 12
## Centro de Salud Familiar Héctor García
## 899
## Centro de Salud Familiar Hermanos Carrera
## 2
## Centro de Salud Familiar Hualpencillo
## 8
## Centro de Salud Familiar Hualpín
## 1
## Centro de Salud Familiar Hualqui
## 1065
## Centro de Salud Familiar Huamachuco
## 242
## Centro de Salud Familiar Ignacio Domeyko
## 3106
## Centro de Salud Familiar Isabel Jiménez
## 3
## Centro de Salud Familiar Isabel Riquelme
## 1254
## Centro de Salud Familiar Isla de Maipo
## 1334
## Centro de Salud Familiar Jean y Marie Thierry
## 6
## Centro de Salud Familiar Joan Alsina
## 583
## Centro de Salud Familiar Joan Crawford Astudillo
## 222
## Centro de Salud Familiar Jorge Jordán Domic
## 8
## Centro de Salud Familiar Juan Bautista Bravo Vega
## 275
## Centro de Salud Familiar Juan Chiorrini (N° 5)
## 13
## Centro de Salud Familiar Juan Pablo II
## 322
## Centro de Salud Familiar Juan Pablo II de Antofagasta
## 212
## Centro de Salud Familiar Juan Pablo II de Padre Hurtado
## 1880
## Centro de Salud Familiar Juan Soto Fernández
## 44
## Centro de Salud Familiar La Floresta
## 121
## Centro de Salud Familiar La Islita
## 736
## Centro de Salud Familiar La Leonera
## 487
## Centro de Salud Familiar La Palma
## 286
## Centro de Salud Familiar La Reina
## 847
## Centro de Salud Familiar Lagunillas
## 2637
## Centro de Salud Familiar Las Américas
## 3320
## Centro de Salud Familiar Las Cabras
## 189
## Centro de Salud Familiar Las Colinas
## 1
## Centro de Salud Familiar Las Mercedes
## 156
## Centro de Salud Familiar Las Torres
## 92
## Centro de Salud Familiar Lautaro
## 4
## Centro de Salud Familiar Lebu Norte
## 23
## Centro de Salud Familiar Lican Ray
## 15
## Centro de Salud Familiar Lirquén
## 89
## Centro de Salud Familiar Lo Amor
## 8
## Centro de Salud Familiar Lo Barnechea
## 745
## Centro de Salud Familiar Lo Franco
## 750
## Centro de Salud Familiar Lo Miranda
## 1
## Centro de Salud Familiar Lo Valledor Norte
## 251
## Centro de Salud Familiar Lorenzo Arenas
## 929
## Centro de Salud Familiar Los Álamos
## 171
## Centro de Salud Familiar Los Castaños
## 410
## Centro de Salud Familiar Los Cerros
## 638
## Centro de Salud Familiar Los Muermos
## 37
## Centro de Salud Familiar Los Volcanes
## 1284
## Centro de Salud Familiar Luis Montecinos
## 19
## Centro de Salud Familiar Luis Navarrete Carvacho
## 17
## Centro de Salud Familiar Lusitania
## 76
## Centro de Salud Familiar Maipú
## 592
## Centro de Salud Familiar Manuel Lucero
## 1172
## Centro de Salud Familiar Marco Maldonado
## 109
## Centro de Salud Familiar María Latiffe (N° 4)
## 8
## Centro de Salud Familiar Marta Estévez
## 180
## Centro de Salud Familiar Metodista (Organizaciones sin fines de lucro y ONG)
## 9
## Centro de Salud Familiar Miraflores (Temuco)
## 115
## Centro de Salud Familiar Miraflores (Viña del Mar)
## 75
## Centro de Salud Familiar N° 1 Dr. Ramón Corbalán Melgarejo
## 1124
## Centro de Salud Familiar N° 6
## 827
## Centro de Salud Familiar Natales
## 140
## Centro de Salud Familiar Niebla
## 69
## Centro de Salud Familiar Nº 5
## 254
## Centro de Salud Familiar Nogales
## 58
## Centro de Salud Familiar Nororiente de Los Ángeles
## 85
## Centro de Salud Familiar Norponiente
## 36
## Centro de Salud Familiar Norte de Los Ángeles
## 13
## Centro de Salud Familiar Nueva Aurora
## 159
## Centro de Salud Familiar Nueva Imperial
## 1
## Centro de Salud Familiar Ñipas
## 375
## Centro de Salud Familiar O'Higgins
## 2857
## Centro de Salud Familiar Olivar Alto
## 495
## Centro de Salud Familiar Oscar Bonilla
## 33
## Centro de Salud Familiar Ovejería
## 81
## Centro de Salud Familiar Pablo Neruda
## 12
## Centro de Salud Familiar Padre Alberto Hurtado
## 125
## Centro de Salud Familiar Padre Damián Molokai
## 1584
## Centro de Salud Familiar Padre Hurtado
## 116
## Centro de Salud Familiar Padre Pierre Dubois
## 164
## Centro de Salud Familiar Padre Vicente Irarrázabal
## 141
## Centro de Salud Familiar Paillihue
## 137
## Centro de Salud Familiar Pampa Alegre
## 26
## Centro de Salud Familiar Panguipulli
## 1413
## Centro de Salud Familiar Panimávida
## 516
## Centro de Salud Familiar Papudo
## 30
## Centro de Salud Familiar Paulina Avendaño Pereda
## 1
## Centro de Salud Familiar Pedro Aguirre Cerda
## 904
## Centro de Salud Familiar Pedro de Valdivia (Concepción)
## 424
## Centro de Salud Familiar Pedro Pulgar Melgarejo
## 2
## Centro de Salud Familiar Pemuco
## 281
## Centro de Salud Familiar Penco
## 188
## Centro de Salud Familiar Peñaflor
## 1364
## Centro de Salud Familiar Piedra de Águila
## 20
## Centro de Salud Familiar Pinares
## 598
## Centro de Salud Familiar Pinto
## 400
## Centro de Salud Familiar Portezuelo
## 236
## Centro de Salud Familiar Pozo Almonte
## 4
## Centro de Salud Familiar Presidenta Michelle Bachelet
## 2
## Centro de Salud Familiar Pudahuel Estrella
## 2259
## Centro de Salud Familiar Pudeto Bajo
## 68
## Centro de Salud Familiar Pueblo Nuevo
## 8
## Centro de Salud Familiar Quellón
## 143
## Centro de Salud Familiar Quemchi
## 88
## Centro de Salud Familiar Quepe
## 46
## Centro de Salud Familiar Quilleco
## 12
## Centro de Salud Familiar Quillón
## 691
## Centro de Salud Familiar Quinchamalí
## 13
## Centro de Salud Familiar Quiriquina
## 860
## Centro de Salud Familiar Ralco
## 67
## Centro de Salud Familiar Rauco
## 124
## Centro de Salud Familiar Raúl Brañes F.
## 361
## Centro de Salud Familiar Raúl Cuevas (Ex-San Bernardo)
## 172
## Centro de Salud Familiar Raúl Sánchez Bañados
## 216
## Centro de Salud Familiar Remigio Sapunar
## 285
## Centro de Salud Familiar Renaico
## 9
## Centro de Salud Familiar Renca
## 394
## Centro de Salud Familiar Rengo
## 3
## Centro de Salud Familiar Reñaca Alto Dr. Jorge Kaplan
## 86
## Centro de Salud Familiar Requínoa
## 5
## Centro de Salud Familiar Río Negro Hornopirén
## 4
## Centro de Salud Familiar Romeral
## 16
## Centro de Salud Familiar Rosario
## 1
## Centro de Salud Familiar Rosario-Palomar
## 1405
## Centro de Salud Familiar Rosario Corvalán
## 583
## Centro de Salud Familiar Rosita Renard
## 466
## Centro de Salud Familiar Sagrada Familia
## 146
## Centro de Salud Familiar Salvador Bustos
## 688
## Centro de Salud Familiar San Fabián
## 757
## Centro de Salud Familiar San Felipe ""El Real""
## 128
## Centro de Salud Familiar San Francisco Mostazal
## 1185
## Centro de Salud Familiar San Gregorio
## 642
## Centro de Salud Familiar San Ignacio
## 5
## Centro de Salud Familiar San Joaquín
## 64
## Centro de Salud Familiar San José de Chuchunco
## 160
## Centro de Salud Familiar San Juan Dios de Linares
## 749
## Centro de Salud Familiar San Manuel
## 2
## Centro de Salud Familiar San Nicolás
## 839
## Centro de Salud Familiar San Pablo Mirasol (ONG)
## 2
## Centro de Salud Familiar San Pedro
## 131
## Centro de Salud Familiar San Pedro de La Paz
## 2434
## Centro de Salud Familiar San Ramón Nonato
## 1367
## Centro de Salud Familiar San Vicente
## 118
## Centro de Salud Familiar San Vicente de Tagua Tagua
## 643
## Centro de Salud Familiar Santa Anita
## 176
## Centro de Salud Familiar Santa Anselma
## 332
## Centro de Salud Familiar Santa Cecilia
## 232
## Centro de Salud Familiar Santa Clara
## 456
## Centro de Salud Familiar Santa Cruz
## 1600
## Centro de Salud Familiar Santa Julia
## 1518
## Centro de Salud Familiar Santa Laura
## 280
## Centro de Salud Familiar Santa Rosa
## 1
## Centro de Salud Familiar Santa Sabina
## 596
## Centro de Salud Familiar Santa Teresa de Los Andes
## 961
## Centro de Salud Familiar Santiago de Nueva Extremadura
## 313
## Centro de Salud Familiar Sol de Oriente
## 470
## Centro de Salud Familiar Sotaquí
## 5
## Centro de Salud Familiar Talcahuano Sur
## 899
## Centro de Salud Familiar Techo para todos (ONG)
## 24
## Centro de Salud Familiar Teresa Baldechi
## 1207
## Centro de Salud Familiar Tierras Blancas
## 205
## Centro de Salud Familiar Tucapel
## 2577
## Centro de Salud Familiar Ultraestación
## 625
## Centro de Salud Familiar Valle de Los Libertadores
## 440
## Centro de Salud Familiar Víctor Bertín Soto
## 186
## Centro de Salud Familiar Víctor Manuel Fernández
## 908
## Centro de Salud Familiar Victoria
## 120
## Centro de Salud Familiar Villa Alegre
## 280
## Centro de Salud Familiar Villa Alhué
## 313
## Centro de Salud Familiar Villa Nonguén (Organizaciones sin fines de lucro y ONG)
## 730
## Centro de Salud Familiar Villarrica
## 184
## Centro de Salud Familiar Violeta Parra
## 1336
## Centro de Salud Familiar Yanequén
## 53
## Centro de Salud Familiar Yobilo
## 1417
## Centro de Salud Familiar Yumbel Estación
## 3
## Centro de Salud FamiliarBelarmina Paredes
## 172
## Centro de Salud FamiliarCartagena
## 106
## Centro de Salud FamiliarChoshuenco
## 145
## Centro de Salud FamiliarCoñaripe
## 255
## Centro de Salud FamiliarExterno Valdivia
## 528
## Centro de Salud FamiliarJuan Santa María Bonet
## 442
## Centro de Salud FamiliarLos Lagos
## 1529
## Centro de Salud FamiliarMáfil
## 12
## Centro de Salud FamiliarRío Bueno
## 1135
## Centro de Salud FamiliarSan José la Mariquina
## 936
## Centro de Salud Integral Dr. Alfonso Leng
## 424
## Centro de Salud Rural Alfarera Rosa Reyes Vilches
## 113
## Centro de Salud Rural Pitrufquén
## 8
## Complejo Asistencial Dr. Víctor Ríos Ruiz (Los Ángeles)
## 47444
## Complejo Hospitalario Dr. Sótero del Río (Santiago, Puente Alto)
## 54998
## Complejo Hospitalario San José (Santiago, Independencia)
## 30654
## Consultorio Alemania de Calama
## 372
## Consultorio Central de Calama
## 7
## Consultorio Corvallis
## 24
## Consultorio Eduardo Frei Montalva (Villa Alemana)
## 137
## Consultorio Emilio Schaffhauser
## 356
## Consultorio Ercilla
## 45
## Consultorio General Rural de Pueblo Seco
## 117
## Consultorio General Rural Tucapel
## 63
## Consultorio Los Sauces
## 1
## Consultorio Lumaco
## 50
## Consultorio Paillaco
## 202
## Consultorio Pudahuel Poniente
## 143
## Consultorio San Ramón
## 28
## Consultorio Tubul
## 35
## Consultorio Villa Alemana
## 1848
## COSAM Peñaflor
## 2
## Hospital 21 de Mayo (Taltal)
## 26
## Hospital Adalberto Steeger (Talagante)
## 3541
## Hospital Adriana Cousiño (Quintero)
## 1
## Hospital Barros Luco Trudeau (Santiago, San Miguel)
## 30150
## Hospital Base San José de Osorno
## 27599
## Hospital Carlos Van Buren (Valparaíso)
## 25964
## Hospital Claudio Vicuña ( San Antonio)
## 9599
## Hospital Clínico de la Universidad Mayor
## 8
## Hospital Clínico de Magallanes Dr. Lautaro Navarro Avaria
## 18463
## Hospital Clínico de Niños Dr. Roberto del Río (Santiago, Independencia)
## 15137
## Hospital Clínico Herminda Martín (Chillán)
## 38879
## Hospital Clínico Metropolitano El Carmen Doctor Luis Valentín Ferrada
## 24865
## Hospital Clínico Metropolitano La Florida Dra. Eloisa Díaz Inzunza
## 31426
## Hospital Clínico Regional (Valdivia)
## 39726
## Hospital Clínico Regional Dr. Guillermo Grant Benavente (Concepción)
## 50346
## Hospital Clínico San Borja-Arriarán (Santiago, Santiago)
## 30784
## Hospital Clorinda Avello (Santa Juana)
## 382
## Hospital Comunitario de Achao
## 18
## Hospital Comunitario de Laja
## 166
## Hospital Comunitario de Mulchén
## 128
## Hospital Comunitario de Nacimiento
## 116
## Hospital Comunitario de Salud Familiar de Bulnes
## 900
## Hospital Comunitario de Salud Familiar de El Carmen
## 531
## Hospital Comunitario de Salud Familiar de Quirihue
## 381
## Hospital Comunitario de Salud Familiar Dr. Eduardo Contreras Trabucco de Coelemu
## 1291
## Hospital Comunitario de Salud Familiar Pedro Morales Campos (Yungay)
## 200
## Hospital Comunitario de Santa Bárbara
## 27
## Hospital Comunitario de Yumbel
## 34
## Hospital Comunitario Dr. Roberto Muñoz Urrutia de Huépil
## 130
## Hospital de Ancud
## 4384
## Hospital de Campaña (Curanilahue)
## 2
## Hospital de Carahue
## 16
## Hospital de Castro
## 12676
## Hospital de Chaitén
## 1
## Hospital de Coínco
## 942
## Hospital de Collipulli
## 2
## Hospital de Constitución
## 1995
## Hospital de Contulmo
## 32
## Hospital de Corral
## 1
## Hospital de Curacaví
## 1158
## Hospital de Curepto
## 33
## Hospital de Fresia
## 11
## Hospital de Frutillar
## 15
## Hospital de Galvarino
## 7
## Hospital de Gorbea
## 49
## Hospital de Lanco
## 143
## Hospital de Lebu
## 138
## Hospital de Lolol
## 136
## Hospital de Loncoche
## 5
## Hospital de Lonquimay
## 2
## Hospital de Lota
## 11423
## Hospital de Marchigüe
## 58
## Hospital de Mejillones
## 61
## Hospital de Nancagua
## 3359
## Hospital de Niños Dr. Luis Calvo Mackenna (Santiago, Providencia)
## 11617
## Hospital de Peñaflor
## 913
## Hospital de Pichidegua
## 1058
## Hospital de Pichilemu
## 563
## Hospital de Pitrufquén
## 9869
## Hospital de Puerto Aysén
## 1278
## Hospital de Puerto Montt
## 33276
## Hospital de Puerto Octay
## 3
## Hospital de Purranque
## 12
## Hospital de Quellón
## 1389
## Hospital de Quilpué
## 9013
## Hospital de Río Bueno
## 2429
## Hospital de Salamanca
## 5
## Hospital de San Camilo (San Felipe)
## 30518
## Hospital de San Carlos
## 17885
## Hospital de Santa Cruz
## 11878
## Hospital de Toltén
## 315
## Hospital de Tomé
## 7334
## Hospital de Vilcún
## 427
## Hospital de Villarrica
## 7362
## Hospital del Perpetuo Socorro de Quilacahuín
## 1
## Hospital Del Salvador (Peumo)
## 220
## Hospital Del Salvador (Santiago, Providencia)
## 38665
## Hospital Dr. Abel Fuentealba Lagos de San Javier
## 2807
## Hospital Dr. Abraham Godoy (Lautaro)
## 12779
## Hospital Dr. Antonio Tirado Lanas (Ovalle)
## 11752
## Hospital Dr. Arturo Hillerns Larrañaga (Saavedra)
## 510
## Hospital Dr. Augusto Essmann Burgos ( Natales)
## 1167
## Hospital Dr. Carlos Cisternas (Calama)
## 5319
## Hospital Dr. César Garavagno Burotto (Talca)
## 51949
## Hospital Dr. Eduardo González Galeno (Cunco)
## 513
## Hospital Dr. Eduardo Pereira Ramírez (Valparaíso)
## 12991
## Hospital Dr. Ernesto Torres Galdames (Iquique)
## 17484
## Hospital Dr. Exequiel González Cortés (Santiago, San Miguel)
## 12310
## Hospital Dr. Félix Bulnes Cerda (Santiago, Quinta Normal)
## 13330
## Hospital Dr. Florencio Vargas (Diego de Almagro)
## 70
## Hospital Dr. Gustavo Fricke (Viña del Mar)
## 35743
## Hospital Dr. Hernán Henríquez Aravena (Temuco)
## 65497
## Hospital Dr. Humberto Elorza Cortés (Illapel)
## 3938
## Hospital Dr. Jerónimo Méndez Arancibia (Chañaral)
## 189
## Hospital Dr. José Arraño (Andacollo)
## 179
## Hospital Dr. Juan Noé Crevanni (Arica)
## 23039
## Hospital Dr. Leonardo Guzmán (Antofagasta)
## 28294
## Hospital Dr. Leopoldo Ortega R. (Chile Chico)
## 14
## Hospital Dr. Luis Tisné B. (Santiago, Peñalolén)
## 10983
## Hospital Dr. Manuel Magalhaes Medling (Huasco)
## 616
## Hospital Dr. Marco Antonio Chamorro ( Porvenir)
## 192
## Hospital Dr. Marcos Macuada (Tocopilla)
## 32
## Hospital Dr. Mario Sánchez Vergara (La Calera)
## 101
## Hospital Dr. Mauricio Heyermann (Angol)
## 9468
## Hospital Dr. Ricardo Valenzuela Sáez (Rengo)
## 10164
## Hospital El Pino (Santiago, San Bernardo)
## 12888
## Hospital Intercultural de Nueva Imperial
## 12584
## Hospital Intercultural Kallvu Llanka (Cañete)
## 4248
## Hospital Juan Morey (La Unión)
## 4571
## Hospital Las Higueras (Talcahuano)
## 23046
## Hospital Mercedes (Chimbarongo)
## 1
## Hospital Padre Alberto Hurtado (San Ramón)
## 18699
## Hospital Parroquial (San Bernardo) (D)
## 1368
## Hospital Penco - Lirquén
## 5478
## Hospital Presidente Carlos Ibáñez del Campo (Linares)
## 18099
## Hospital Provincial del Huasco Monseñor Fernando Ariztía Ruiz (Vallenar)
## 7298
## Hospital Provincial Dr. Rafael Avaría (Curanilahue)
## 6536
## Hospital Regional (Coihaique)
## 9475
## Hospital Regional de Rancagua
## 33319
## Hospital San Agustín (La Ligua)
## 501
## Hospital San Agustín de Florida
## 1022
## Hospital San Francisco (Pucón) (D)
## 2080
## Hospital San José (Coronel)
## 4628
## Hospital San José (Melipilla)
## 8779
## Hospital San José (Parral)
## 3923
## Hospital San José de Victoria
## 10413
## Hospital San José del Carmen (Copiapó)
## 12727
## Hospital San Juan de Dios (Cauquenes)
## 3029
## Hospital San Juan de Dios (Combarbalá)
## 107
## Hospital San Juan de Dios (Curicó)
## 28970
## Hospital San Juan de Dios (La Serena)
## 9579
## Hospital San Juan de Dios (Los Andes)
## 18707
## Hospital San Juan de Dios (San Fernando)
## 13056
## Hospital San Juan de Dios (Santiago, Santiago)
## 18164
## Hospital San Luis (Buin)
## 4215
## Hospital San Martín (Quillota)
## 15021
## Hospital San Pablo (Coquimbo)
## 18987
## Hospital San Pedro (Los Vilos)
## 360
## Hospital San Vicente (Arauco)
## 5536
## Hospital San Vicente de Tagua-Tagua
## 6354
## Hospital Santa Filomena (Graneros)
## 308
## Hospital Santo Tomás (Limache)
## 4
## Hospital Traumatológico (Concepción)
## 9873
## Instituto de Neurocirugía Dr. Alfonso Asenjo
## 5556
## Instituto Nacional de Enfermedades Respiratorias y Cirugía Torácica
## 1614
## Instituto Nacional del Cáncer Dr. Caupolicán Pardo Correa (Santiago, Recoleta)
## 3134
## Instituto Traumatológico Dr. Teodoro Gebauer
## 12096
## Posta de Salud Rural Algarrobito
## 9
## Posta de Salud Rural Aliro Cárcarmo (Lonquén)
## 1
## Posta de Salud Rural Amargo
## 1
## Posta de Salud Rural Apalta
## 5
## Posta de Salud Rural Caburga
## 74
## Posta de Salud Rural Choroico (Nacimiento)
## 18
## Posta de Salud Rural Codegua
## 1
## Posta de Salud Rural Dichato
## 33
## Posta de Salud Rural El Carmen ( Las Cabras)
## 1
## Posta de Salud Rural El Romero
## 1
## Posta de Salud Rural El Temo
## 54
## Posta de Salud Rural Granerillos
## 1
## Posta de Salud Rural Isla de Yáquil
## 15
## Posta de Salud Rural La Colonia
## 32
## Posta de Salud Rural Lambert
## 1
## Posta de Salud Rural Larmahue
## 2
## Posta de Salud Rural Las Rojas
## 3
## Posta de Salud Rural Lastarria
## 2
## Posta de Salud Rural Llico (Arauco)
## 3
## Posta de Salud Rural Loncura
## 72
## Posta de Salud Rural Los Boldos
## 28
## Posta de Salud Rural Olivar Bajo
## 1
## Posta de Salud Rural Quinahue
## 5
## Posta de Salud Rural San José de Marchigue
## 4
## Posta de Salud Rural San Juan de La Sierra
## 1
## Posta de Salud Rural San Pedro de Alcántara
## 1
## Posta de Salud Rural Zúñiga
## 1
## PRAIS (S.S Del Libertador Bernardo O'Higgins)
## 1
table(Esperas$`Serv Salud Dest Nombre`)
##
## Servicio de Salud Aconcagua
## 50797
## Servicio de Salud Aisén
## 10767
## Servicio de Salud Antofagasta
## 37810
## Servicio de Salud Araucanía Norte
## 20131
## Servicio de Salud Araucanía Sur
## 113337
## Servicio de Salud Arauco
## 16845
## Servicio de Salud Arica
## 24133
## Servicio de Salud Atacama
## 23566
## Servicio de Salud Biobío
## 48616
## Servicio de Salud Chiloé
## 19819
## Servicio de Salud Concepción
## 101814
## Servicio de Salud Coquimbo
## 47124
## Servicio de Salud Del Libertador B.O'Higgins
## 89001
## Servicio de Salud Del Maule
## 119345
## Servicio de Salud Del Reloncaví
## 35912
## Servicio de Salud Iquique
## 18176
## Servicio de Salud Magallanes
## 20368
## Servicio de Salud Metropolitano Central
## 69825
## Servicio de Salud Metropolitano Norte
## 48925
## Servicio de Salud Metropolitano Occidente
## 88820
## Servicio de Salud Metropolitano Oriente
## 76833
## Servicio de Salud Metropolitano Sur
## 67507
## Servicio de Salud Metropolitano Sur Oriente
## 110386
## Servicio de Salud Ñuble
## 75046
## Servicio de Salud Osorno
## 27722
## Servicio de Salud Talcahuano
## 38264
## Servicio de Salud Valdivia
## 55456
## Servicio de Salud Valparaíso San Antonio
## 50919
## Servicio de Salud Viña del Mar Quillota
## 66354
table(Esperas$Especialidad)
##
## Cirugía Cardiovascular Cirugía de Cabeza y Cuello
## 85356 43077
## Cirugía Digestiva Dermatología
## 292703 210349
## Ginecología y Obstetricia Neurocirugía
## 151801 59446
## Odontología Oftalmología
## 45278 123532
## Otorrinolaringología Plástica y Reparadora
## 154691 31000
## Traumatología Urología y Nefrología
## 232329 144056
table(Esperas$Region)
##
## REGIÓN AISÉN DEL GRAL. CARLOS IBÁÑEZ DEL CAMPO
## 10767
## REGIÓN DE ANTOFAGASTA
## 37810
## REGIÓN DE ARICA Y PARINACOTA
## 24133
## REGIÓN DE ATACAMA
## 23566
## REGIÓN DE COQUIMBO
## 47124
## REGIÓN DE LA ARAUCANIA
## 133468
## REGIÓN DE LOS LAGOS
## 83453
## REGIÓN DE LOS RÍOS
## 55456
## REGIÓN DE MAGALLANES Y DE LA ANTÁRTICA CHILENA
## 20368
## REGIÓN DE TARAPACÁ
## 18176
## REGIÓN DE VALPARAÍSO
## 168070
## REGIÓN DEL BIOBÍO
## 280585
## REGIÓN DEL LIBERTADOR GRAL. BERNARDO O'HIGGINS
## 89001
## REGIÓN DEL MAULE
## 119345
## REGIÓN METROPOLITANA DE SANTIAGO
## 462296
Esperas<-Esperas[,.(Region,MesesEsperaLE,`Serv Salud Dest Nombre`,`Estab Dest Nombre`, Especialidad)]
table(Esperas$Region)
##
## REGIÓN AISÉN DEL GRAL. CARLOS IBÁÑEZ DEL CAMPO
## 10767
## REGIÓN DE ANTOFAGASTA
## 37810
## REGIÓN DE ARICA Y PARINACOTA
## 24133
## REGIÓN DE ATACAMA
## 23566
## REGIÓN DE COQUIMBO
## 47124
## REGIÓN DE LA ARAUCANIA
## 133468
## REGIÓN DE LOS LAGOS
## 83453
## REGIÓN DE LOS RÍOS
## 55456
## REGIÓN DE MAGALLANES Y DE LA ANTÁRTICA CHILENA
## 20368
## REGIÓN DE TARAPACÁ
## 18176
## REGIÓN DE VALPARAÍSO
## 168070
## REGIÓN DEL BIOBÍO
## 280585
## REGIÓN DEL LIBERTADOR GRAL. BERNARDO O'HIGGINS
## 89001
## REGIÓN DEL MAULE
## 119345
## REGIÓN METROPOLITANA DE SANTIAGO
## 462296
Esperas[is.na(Esperas)]<-0
Esperas<- Esperas[Region=="REGIÓN DEL BIOBÍO"]
table(Esperas$MesesEsperaLE)
##
## 0 4 5 6 7 8 9 10 11 12 13
## 236504 2 38 63 43 2 2 31 62 61 94
## 14 17 18 19 20 21 22 23 24 25 26
## 108 66 1 168 136 89 1 8 110 159 115
## 27 28 30 31 32 33 34 35 37 38 39
## 239 208 3 133 231 208 271 228 11 137 207
## 40 41 42 43 44 45 46 47 49 50 51
## 208 206 157 1 8 133 207 171 125 1 7
## 52 53 54 55 56 57 58 59 60 61 62
## 142 223 199 223 219 2 19 142 247 194 191
## 63 66 67 68 69 70 72 73 74 75 76
## 180 112 188 163 198 155 2 101 188 165 234
## 77 78 79 80 81 82 83 84 86 87 88
## 166 3 24 128 174 184 177 159 4 111 136
## 89 90 91 93 94 95 96 97 98 99 100
## 182 202 151 9 108 188 184 211 140 1 4
## 101 102 103 104 105 106 107 108 109 110 111
## 104 189 171 1 138 1 3 111 117 133 167
## 112 113 114 115 116 117 118 119 121 122 123
## 141 1 5 84 159 143 183 147 4 109 157
## 124 125 126 128 129 130 131 132 133 134 137
## 5 152 141 12 102 172 145 183 123 1 144
## 138 139 140 141 143 144 145 146 147 149 150
## 137 163 139 1 116 135 142 170 169 8 91
## 151 152 153 154 156 157 158 159 160 161 163
## 151 111 159 138 9 95 123 130 135 129 6
## 164 165 166 167 168 170 171 172 173 174 175
## 96 109 142 135 153 2 116 165 167 174 126
## 177 178 179 180 181 182 184 185 186 187 188
## 6 91 213 111 132 135 13 86 113 132 168
## 189 190 191 192 193 194 195 196 198 199 200
## 116 1 2 87 109 113 124 104 3 55 90
## 201 202 203 204 205 206 207 208 209 210 212
## 75 115 101 1 4 97 101 102 92 104 6
## 213 214 215 216 217 218 219 220 221 222 223
## 65 92 107 146 95 1 5 81 110 110 128
## 224 225 226 227 228 229 230 231 233 234 235
## 122 1 3 108 126 126 130 115 4 87 121
## 236 237 238 241 242 243 244 245 247 248 249
## 119 126 97 78 107 94 2 21 4 39 81
## 250 252 254 255 256 257 258 259 261 262 263
## 56 25 1 83 87 72 74 109 3 59 91
## 264 265 266 268 269 270 271 272 273 274 275
## 93 111 82 1 69 118 90 109 94 1 1
## 276 277 278 279 280 283 284 285 286 287 288
## 56 113 110 116 90 77 127 102 112 116 2
## 289 290 291 292 293 294 295 296 297 298 299
## 44 45 86 88 102 98 1 1 68 106 79
## 300 301 303 306 307 308 309 310 311 312 313
## 113 103 2 113 97 103 4 9 85 83 100
## 314 315 317 318 319 320 321 322 324 325 326
## 106 87 4 84 105 110 102 2 2 74 106
## 327 328 329 331 332 333 334 335 336 337 338
## 109 91 96 1 30 90 95 85 70 2 5
## 339 340 341 342 343 345 346 347 349 351 353
## 60 104 86 119 67 3 46 45 1 3 61
## 354 355 356 357 360 361 362 363 364 365 366
## 75 111 133 75 71 92 115 108 92 1 2
## 367 368 369 370 371 372 373 374 375 376 377
## 60 126 104 111 91 1 1 61 92 110 90
## 378 379 381 382 384 385 387 388 389 390 391
## 73 1 66 70 73 77 3 65 105 100 111
## 392 393 394 395 396 397 398 399 401 402 403
## 81 1 4 50 92 89 75 93 3 52 80
## 404 405 406 409 410 411 412 413 415 416 417
## 82 70 63 44 62 89 79 6 1 55 86
## 418 419 420 422 423 424 425 426 427 429 430
## 63 71 61 9 48 96 70 81 2 5 41
## 431 432 433 434 436 437 438 439 440 441 442
## 87 79 71 64 11 73 79 74 103 66 2
## 443 444 445 446 447 448 450 451 452 453 454
## 4 49 88 83 85 63 4 44 80 69 68
## 455 457 458 459 460 461 462 464 465 466 467
## 53 11 54 81 73 95 76 2 56 68 77
## 468 470 471 472 473 474 475 476 478 479 480
## 89 1 4 62 84 81 90 54 4 46 84
## 481 482 483 484 485 486 487 488 489 490 491
## 76 70 68 1 2 68 87 69 1 49 1
## 492 493 494 495 496 497 499 500 501 502 503
## 2 53 79 92 76 71 1 35 67 95 61
## 504 507 508 509 510 511 514 515 516 517 518
## 87 32 76 67 58 69 32 67 62 49 55
## 522 523 524 525 527 528 529 530 531 532 534
## 64 53 61 50 2 38 42 79 90 61 9
## 535 536 537 538 539 540 541 542 543 544 545
## 22 69 54 82 55 1 2 49 81 58 82
## 546 548 549 550 551 552 553 555 556 557 558
## 69 1 24 54 82 77 39 1 28 42 23
## 559 560 562 563 564 565 566 567 568 570 571
## 30 41 1 28 37 79 60 49 1 27 33
## 572 573 574 576 577 578 579 580 581 583 584
## 46 50 42 5 39 51 48 66 52 2 38
## 585 586 587 588 590 591 592 593 594 595 597
## 42 54 61 63 2 28 59 53 77 58 1
## 598 599 600 601 602 604 605 606 607 608 609
## 36 50 55 62 40 2 26 50 32 31 1
## 612 613 614 615 619 620 621 622 623 625 626
## 7 20 9 24 7 28 34 28 20 43 7
## 627 628 629 630 632 634 635 636 637 639 640
## 23 24 14 31 7 27 29 30 23 4 10
## 641 642 643 644 646 647 648 649 650 651 653
## 48 25 23 16 2 14 19 22 18 19 6
## 654 655 656 657 658 660 661 662 663 664 665
## 13 14 18 19 22 4 10 30 16 24 22
## 667 668 669 671 672 676 677 678 679 681 682
## 4 11 14 24 14 22 30 22 21 3 7
## 683 684 685 686 688 689 690 691 692 696 697
## 15 29 20 22 3 5 27 24 18 8 14
## 698 699 700 701 702 703 704 705 706 707 709
## 18 21 14 1 1 10 17 12 21 20 2
## 710 711 712 717 718 719 720 721 723 724 725
## 12 16 10 19 15 14 20 22 1 7 13
## 726 727 728 730 731 732 733 734 735 737 738
## 14 16 16 1 10 16 11 13 22 3 10
## 739 740 741 742 744 745 746 747 749 750 751
## 15 12 21 23 1 9 19 10 19 1 2
## 752 753 754 755 756 759 760 761 762 763 765
## 6 19 21 24 20 7 20 17 34 14 1
## 766 767 768 769 770 772 773 774 775 776 777
## 5 11 16 16 5 1 10 11 9 10 10
## 779 780 781 782 783 784 787 788 789 790 791
## 2 3 5 13 10 2 3 12 7 12 9
## 793 794 795 796 797 801 802 803 804 805 807
## 2 7 8 16 15 3 13 6 9 16 1
## 808 809 810 811 812 815 816 817 818 819 822
## 10 16 18 12 4 2 8 10 17 8 4
## 823 824 825 826 828 829 830 831 832 833 836
## 7 9 12 8 1 7 5 2 8 6 6
## 837 838 839 840 843 844 845 846 847 849 850
## 9 3 2 4 3 7 6 6 5 1 1
## 851 852 853 856 857 858 859 860 861 864 865
## 5 9 1 2 3 4 4 3 4 1 5
## 867 868 871 872 873 874 875 878 879 880 881
## 5 1 1 5 3 4 3 3 4 7 7
## 882 885 886 887 888 889 892 893 894 895 896
## 2 4 4 5 5 6 2 4 7 4 7
## 899 900 901 902 904 906 907 908 910 913 914
## 2 8 4 3 1 3 3 6 3 4 3
## 915 916 917 921 922 923 924 926 927 928 929
## 4 4 1 3 4 7 4 1 2 1 2
## 934 935 936 937 938 939 941 942 943 944 948
## 3 3 2 2 1 1 3 2 2 2 6
## 949 950 951 952 955 956 957 958 959 962 963
## 1 1 3 8 2 5 2 2 1 3 2
## 964 965 966 967 969 970 971 972 979 984 985
## 6 6 5 1 1 3 1 1 1 1 1
## 987 990 997 1005 1011 1033 1034 1042 1048 1068 1074
## 1 1 1 1 1 1 1 3 1 1 1
## 1076 1077 1084 1090 1096 1097 1098 1104 1105 1122 1126
## 1 1 1 1 2 1 1 2 1 1 1
## 1127 1131 1132 1154 1175 1184 1195 1200 1209 1263 1264
## 1 1 1 1 1 1 1 1 2 1 2
## 1272 1309 1348 1349 1362 1382 1406 1407 1519 1545 1559
## 1 1 1 1 1 1 2 1 1 1 1
## 1582 1619 1703 1786 1802 1867 1995 2036 2037 2043 2052
## 1 1 1 1 1 1 1 1 1 1 1
## 2064 2148 2164 2169 2292 2296 2343 2344 2363 2399 2412
## 1 1 1 1 1 1 2 1 1 1 1
## 2419 2441 2446 2467 2511 2522 2530 2581 2698 2723
## 1 1 1 1 1 1 1 2 1 1
table(Esperas$Especialidad)
##
## Cirugía Cardiovascular Cirugía de Cabeza y Cuello
## 13099 8925
## Cirugía Digestiva Dermatología
## 34917 55191
## Ginecología y Obstetricia Neurocirugía
## 32850 9490
## Odontología Oftalmología
## 10692 24379
## Otorrinolaringología Plástica y Reparadora
## 31828 4393
## Traumatología Urología y Nefrología
## 33566 21255
table(Esperas$`Estab Dest Nombre`)
##
## Centro Comunitario de Salud Familiar Antiquina
## 32
## Centro de Salud Familiar Alcalde Leocán Portus
## 32
## Centro de Salud Familiar Bellavista
## 134
## Centro de Salud Familiar Boca Sur
## 3136
## Centro de Salud Familiar Canteras Villa Mercedes
## 22
## Centro de Salud Familiar Carlos Pinto Fierro
## 26
## Centro de Salud Familiar Chiguayante
## 1410
## Centro de Salud Familiar Cobquecura
## 352
## Centro de Salud Familiar Coihueco
## 737
## Centro de Salud Familiar Dr. Alberto Reyes
## 145
## Centro de Salud Familiar Dr. Carlos Echeverría Véjar
## 13
## Centro de Salud Familiar Dr. David Benavente de Ninhue
## 385
## Centro de Salud Familiar Dr. Federico Puga
## 362
## Centro de Salud Familiar Dr. Juan Cartes Arias
## 956
## Centro de Salud Familiar Dr. Sergio Lagos Olave (ex Nº 4 Lota Bajo)
## 908
## Centro de Salud Familiar Dra. Michelle Bachelet
## 727
## Centro de Salud Familiar Eleuterio Ramírez
## 86
## Centro de Salud Familiar Entre Ríos
## 25
## Centro de Salud Familiar Hualpencillo
## 8
## Centro de Salud Familiar Hualqui
## 1065
## Centro de Salud Familiar Isabel Jiménez
## 3
## Centro de Salud Familiar Isabel Riquelme
## 1254
## Centro de Salud Familiar Juan Soto Fernández
## 44
## Centro de Salud Familiar La Floresta
## 121
## Centro de Salud Familiar La Leonera
## 487
## Centro de Salud Familiar Lagunillas
## 2637
## Centro de Salud Familiar Lebu Norte
## 23
## Centro de Salud Familiar Lirquén
## 89
## Centro de Salud Familiar Lorenzo Arenas
## 929
## Centro de Salud Familiar Los Álamos
## 171
## Centro de Salud Familiar Los Cerros
## 638
## Centro de Salud Familiar Los Volcanes
## 1061
## Centro de Salud Familiar Luis Montecinos
## 19
## Centro de Salud Familiar Nororiente de Los Ángeles
## 85
## Centro de Salud Familiar Norte de Los Ángeles
## 13
## Centro de Salud Familiar Ñipas
## 375
## Centro de Salud Familiar O'Higgins
## 2857
## Centro de Salud Familiar Paillihue
## 137
## Centro de Salud Familiar Paulina Avendaño Pereda
## 1
## Centro de Salud Familiar Pedro de Valdivia (Concepción)
## 424
## Centro de Salud Familiar Pemuco
## 281
## Centro de Salud Familiar Penco
## 188
## Centro de Salud Familiar Pinares
## 598
## Centro de Salud Familiar Pinto
## 400
## Centro de Salud Familiar Portezuelo
## 236
## Centro de Salud Familiar Quilleco
## 12
## Centro de Salud Familiar Quillón
## 691
## Centro de Salud Familiar Quinchamalí
## 13
## Centro de Salud Familiar Quiriquina
## 860
## Centro de Salud Familiar Ralco
## 67
## Centro de Salud Familiar San Fabián
## 757
## Centro de Salud Familiar San Gregorio
## 642
## Centro de Salud Familiar San Ignacio
## 5
## Centro de Salud Familiar San Nicolás
## 839
## Centro de Salud Familiar San Pedro de La Paz
## 2434
## Centro de Salud Familiar San Ramón Nonato
## 1367
## Centro de Salud Familiar San Vicente
## 118
## Centro de Salud Familiar Santa Clara
## 456
## Centro de Salud Familiar Santa Sabina
## 596
## Centro de Salud Familiar Sol de Oriente
## 470
## Centro de Salud Familiar Talcahuano Sur
## 899
## Centro de Salud Familiar Teresa Baldechi
## 1207
## Centro de Salud Familiar Tucapel
## 2577
## Centro de Salud Familiar Ultraestación
## 625
## Centro de Salud Familiar Víctor Manuel Fernández
## 908
## Centro de Salud Familiar Villa Nonguén (Organizaciones sin fines de lucro y ONG)
## 730
## Centro de Salud Familiar Violeta Parra
## 741
## Centro de Salud Familiar Yanequén
## 53
## Centro de Salud Familiar Yobilo
## 1417
## Centro de Salud Familiar Yumbel Estación
## 3
## Complejo Asistencial Dr. Víctor Ríos Ruiz (Los Ángeles)
## 47444
## Consultorio General Rural de Pueblo Seco
## 117
## Consultorio General Rural Tucapel
## 63
## Consultorio Tubul
## 35
## Hospital Clínico Herminda Martín (Chillán)
## 38879
## Hospital Clínico Regional Dr. Guillermo Grant Benavente (Concepción)
## 50346
## Hospital Clorinda Avello (Santa Juana)
## 382
## Hospital Comunitario de Laja
## 166
## Hospital Comunitario de Mulchén
## 128
## Hospital Comunitario de Nacimiento
## 116
## Hospital Comunitario de Salud Familiar de Bulnes
## 900
## Hospital Comunitario de Salud Familiar de El Carmen
## 531
## Hospital Comunitario de Salud Familiar de Quirihue
## 381
## Hospital Comunitario de Salud Familiar Dr. Eduardo Contreras Trabucco de Coelemu
## 1291
## Hospital Comunitario de Salud Familiar Pedro Morales Campos (Yungay)
## 200
## Hospital Comunitario de Santa Bárbara
## 27
## Hospital Comunitario de Yumbel
## 34
## Hospital Comunitario Dr. Roberto Muñoz Urrutia de Huépil
## 130
## Hospital de Campaña (Curanilahue)
## 2
## Hospital de Contulmo
## 32
## Hospital de Lebu
## 138
## Hospital de Lota
## 11423
## Hospital de San Carlos
## 17885
## Hospital de Tomé
## 7334
## Hospital Intercultural Kallvu Llanka (Cañete)
## 4248
## Hospital Las Higueras (Talcahuano)
## 23046
## Hospital Penco - Lirquén
## 5478
## Hospital Provincial Dr. Rafael Avaría (Curanilahue)
## 6536
## Hospital San Agustín de Florida
## 1022
## Hospital San José (Coronel)
## 4628
## Hospital San Vicente (Arauco)
## 5536
## Hospital Traumatológico (Concepción)
## 9873
## Posta de Salud Rural Choroico (Nacimiento)
## 18
## Posta de Salud Rural Dichato
## 33
## Posta de Salud Rural Granerillos
## 1
## Posta de Salud Rural La Colonia
## 32
## Posta de Salud Rural Llico (Arauco)
## 3
## Posta de Salud Rural Los Boldos
## 28
### Los establecimientos más demandados de la región son: Complejo Asistencial Dr. Víctor Ríos Ruiz (Los Ángeles)(47mil casos) y el Hospital Clínico Regional Dr. Guillermo Grant Benavente (Concepción)(50 mil casos). A partir de estos, la ubicación de un nuevo hospital debería estar orientado cercano o en relativa distancia con el último, pues tiene la mayor concentración de casos.
Hospitales@proj4string
## CRS arguments:
## +proj=longlat +ellps=GRS80 +towgs84=0,0,0,0,0,0,0 +no_defs
proj4string(Hospitales)
## [1] "+proj=longlat +ellps=GRS80 +towgs84=0,0,0,0,0,0,0 +no_defs"
Hospitales@coords
## coords.x1 coords.x2
## [1,] -67.60039 -54.93521
## [2,] -70.31311 -18.48285
## [3,] -70.13822 -20.21446
## [4,] -70.38649 -23.61661
## [5,] -68.91826 -22.44520
## [6,] -70.19324 -22.08838
## [7,] -70.48121 -25.40817
## [8,] -70.44633 -23.10267
## [9,] -70.32213 -27.37335
## [10,] -70.61731 -26.34715
## [11,] -70.05233 -26.39246
## [12,] -70.78235 -28.57438
## [13,] -71.21651 -28.46352
## [14,] -71.24973 -29.90819
## [15,] -71.33702 -29.96849
## [16,] -71.20003 -30.59961
## [17,] -71.17367 -31.63473
## [18,] -70.96296 -31.77638
## [19,] -71.00793 -31.17549
## [20,] -71.08549 -30.22757
## [21,] -70.71249 -30.02935
## [22,] -71.51269 -31.91524
## [23,] -71.61110 -33.05026
## [24,] -71.58962 -33.05679
## [25,] -71.60862 -33.58881
## [26,] -71.64251 -33.02128
## [27,] -71.40790 -33.31920
## [28,] -71.54172 -33.02940
## [29,] -71.25720 -32.87924
## [30,] -71.43393 -33.05196
## [31,] -71.20454 -32.79260
## [32,] -71.26864 -32.99894
## [33,] -71.23797 -32.45048
## [34,] -71.06779 -32.42829
## [35,] -70.92884 -32.25196
## [36,] -71.53116 -32.77924
## [37,] -71.35683 -33.03779
## [38,] -71.27724 -32.98786
## [39,] -70.70899 -32.74977
## [40,] -70.59643 -32.82966
## [41,] -70.95495 -32.84277
## [42,] -70.71785 -32.62206
## [43,] -70.68861 -32.61902
## [44,] -70.65332 -33.41659
## [45,] -70.65509 -33.41534
## [46,] -70.65079 -33.42234
## [47,] -70.65211 -33.41813
## [48,] -70.92462 -33.08689
## [49,] -70.67919 -33.44239
## [50,] -70.65824 -33.43489
## [51,] -70.69610 -33.41506
## [52,] -70.92006 -33.66770
## [53,] -70.90413 -33.61001
## [54,] -71.21467 -33.69526
## [55,] -71.14566 -33.40950
## [56,] -70.64232 -33.46050
## [57,] -70.77425 -33.50821
## [58,] -70.63796 -33.44400
## [59,] -70.62449 -33.43664
## [60,] -70.57941 -33.50133
## [61,] -70.61585 -33.43059
## [62,] -70.62241 -33.43807
## [63,] -70.62270 -33.43681
## [64,] -70.56989 -33.46045
## [65,] -70.62223 -33.43483
## [66,] -109.42101 -27.15024
## [67,] -70.64444 -33.48515
## [68,] -70.64813 -33.48476
## [69,] -70.73955 -33.73426
## [70,] -70.64517 -33.48534
## [71,] -70.55142 -33.57923
## [72,] -70.67679 -33.58435
## [73,] -70.69739 -33.59284
## [74,] -70.58106 -33.57712
## [75,] -70.35230 -33.64126
## [76,] -70.63502 -33.55250
## [77,] -70.60486 -33.41868
## [78,] -70.59915 -33.51416
## [79,] -70.55442 -33.56938
## [80,] -70.74194 -34.16449
## [81,] -70.73086 -34.06706
## [82,] -70.95392 -34.26859
## [83,] -71.17305 -34.38959
## [84,] -70.85326 -34.41132
## [85,] -71.08062 -34.44110
## [86,] -71.28325 -34.35925
## [87,] -70.99256 -34.57591
## [88,] -71.03664 -34.70251
## [89,] -71.20487 -34.64978
## [90,] -71.35723 -34.63442
## [91,] -71.61712 -34.39882
## [92,] -72.01323 -34.38651
## [93,] -71.64666 -34.72822
## [94,] -71.72906 -34.11563
## [95,] -71.23577 -34.98979
## [96,] -71.16378 -34.87095
## [97,] -71.29579 -35.10776
## [98,] -71.80556 -34.97638
## [99,] -71.99066 -34.98272
## [100,] -71.64637 -35.42690
## [101,] -72.02099 -35.09320
## [102,] -72.40270 -35.33943
## [103,] -71.59099 -35.84428
## [104,] -71.73744 -35.59072
## [105,] -71.81403 -36.14198
## [106,] -72.32527 -35.96310
## [107,] -72.53145 -35.73956
## [108,] -72.09267 -36.60883
## [109,] -71.95983 -36.42993
## [110,] -72.29642 -36.73971
## [111,] -72.02385 -37.12182
## [112,] -72.54754 -36.28644
## [113,] -72.03487 -36.89802
## [114,] -72.70531 -36.49027
## [115,] -73.03795 -36.82511
## [116,] -73.03781 -36.82411
## [117,] -73.13586 -37.02824
## [118,] -73.15553 -37.09019
## [119,] -72.94617 -37.16831
## [120,] -72.64912 -36.82258
## [121,] -73.10889 -36.74073
## [122,] -72.95455 -36.61332
## [123,] -72.97545 -36.71957
## [124,] -72.34690 -37.47365
## [125,] -72.24066 -37.72000
## [126,] -72.67633 -37.50751
## [127,] -72.55766 -37.09636
## [128,] -72.70924 -37.26429
## [129,] -72.01668 -37.66815
## [130,] -71.94230 -37.24032
## [131,] -72.59924 -38.73653
## [132,] -72.41838 -38.53708
## [133,] -72.78526 -38.41026
## [134,] -72.22757 -38.66638
## [135,] -72.03761 -38.93094
## [136,] -72.95831 -38.74033
## [137,] -73.16013 -38.71207
## [138,] -73.39262 -38.79929
## [139,] -72.64350 -38.98994
## [140,] -73.16415 -39.17686
## [141,] -72.66828 -39.10588
## [142,] -72.62623 -39.37103
## [143,] -72.22661 -39.27745
## [144,] -71.97429 -39.27883
## [145,] -72.69389 -38.83156
## [146,] -73.24014 -39.83181
## [147,] -73.43610 -39.86252
## [148,] -72.80999 -39.86306
## [149,] -72.76842 -39.45210
## [150,] -73.07601 -40.28456
## [151,] -72.95047 -40.33484
## [152,] -72.86648 -40.07176
## [153,] -72.96573 -39.54126
## [154,] -72.34238 -39.64068
## [155,] -73.12779 -40.58830
## [156,] -73.15388 -40.91364
## [157,] -73.21653 -40.80243
## [158,] -72.88318 -40.97256
## [159,] -73.40504 -40.48795
## [160,] -73.26151 -40.36766
## [161,] -72.95734 -41.44855
## [162,] -73.01059 -41.25647
## [163,] -73.03151 -41.13808
## [164,] -73.42297 -41.15532
## [165,] -73.59847 -41.61685
## [166,] -73.13302 -41.77007
## [167,] -71.80807 -43.61790
## [168,] -71.86907 -43.18339
## [169,] -72.71026 -42.91861
## [170,] -72.07342 -45.56840
## [171,] -72.68381 -45.40852
## [172,] -71.72474 -46.54153
## [173,] -72.57073 -47.25557
## [174,] -72.68078 -44.72603
## [175,] -70.89623 -53.12215
## [176,] -72.50646 -51.73044
## [177,] -70.35838 -53.29816
## [178,] -67.60890 -54.93437
## [179,] -73.34824 -37.47368
## [180,] -73.65973 -37.61034
## [181,] -73.38627 -37.78220
## [182,] -73.23226 -38.02018
## [183,] -73.31763 -37.25072
## [184,] -72.70531 -37.79436
## [185,] -73.07499 -38.03873
## [186,] -72.43598 -37.96008
## [187,] -72.67164 -38.24285
## [188,] -72.34016 -38.23394
## [189,] -71.89135 -38.43933
## [190,] -71.36917 -38.45503
## [191,] -73.76933 -42.47704
## [192,] -73.82383 -41.86523
## [193,] -73.49460 -42.46956
## [194,] -73.61706 -43.11509
## [195,] -73.47314 -42.89024
coordinates(Hospitales)
## coords.x1 coords.x2
## [1,] -67.60039 -54.93521
## [2,] -70.31311 -18.48285
## [3,] -70.13822 -20.21446
## [4,] -70.38649 -23.61661
## [5,] -68.91826 -22.44520
## [6,] -70.19324 -22.08838
## [7,] -70.48121 -25.40817
## [8,] -70.44633 -23.10267
## [9,] -70.32213 -27.37335
## [10,] -70.61731 -26.34715
## [11,] -70.05233 -26.39246
## [12,] -70.78235 -28.57438
## [13,] -71.21651 -28.46352
## [14,] -71.24973 -29.90819
## [15,] -71.33702 -29.96849
## [16,] -71.20003 -30.59961
## [17,] -71.17367 -31.63473
## [18,] -70.96296 -31.77638
## [19,] -71.00793 -31.17549
## [20,] -71.08549 -30.22757
## [21,] -70.71249 -30.02935
## [22,] -71.51269 -31.91524
## [23,] -71.61110 -33.05026
## [24,] -71.58962 -33.05679
## [25,] -71.60862 -33.58881
## [26,] -71.64251 -33.02128
## [27,] -71.40790 -33.31920
## [28,] -71.54172 -33.02940
## [29,] -71.25720 -32.87924
## [30,] -71.43393 -33.05196
## [31,] -71.20454 -32.79260
## [32,] -71.26864 -32.99894
## [33,] -71.23797 -32.45048
## [34,] -71.06779 -32.42829
## [35,] -70.92884 -32.25196
## [36,] -71.53116 -32.77924
## [37,] -71.35683 -33.03779
## [38,] -71.27724 -32.98786
## [39,] -70.70899 -32.74977
## [40,] -70.59643 -32.82966
## [41,] -70.95495 -32.84277
## [42,] -70.71785 -32.62206
## [43,] -70.68861 -32.61902
## [44,] -70.65332 -33.41659
## [45,] -70.65509 -33.41534
## [46,] -70.65079 -33.42234
## [47,] -70.65211 -33.41813
## [48,] -70.92462 -33.08689
## [49,] -70.67919 -33.44239
## [50,] -70.65824 -33.43489
## [51,] -70.69610 -33.41506
## [52,] -70.92006 -33.66770
## [53,] -70.90413 -33.61001
## [54,] -71.21467 -33.69526
## [55,] -71.14566 -33.40950
## [56,] -70.64232 -33.46050
## [57,] -70.77425 -33.50821
## [58,] -70.63796 -33.44400
## [59,] -70.62449 -33.43664
## [60,] -70.57941 -33.50133
## [61,] -70.61585 -33.43059
## [62,] -70.62241 -33.43807
## [63,] -70.62270 -33.43681
## [64,] -70.56989 -33.46045
## [65,] -70.62223 -33.43483
## [66,] -109.42101 -27.15024
## [67,] -70.64444 -33.48515
## [68,] -70.64813 -33.48476
## [69,] -70.73955 -33.73426
## [70,] -70.64517 -33.48534
## [71,] -70.55142 -33.57923
## [72,] -70.67679 -33.58435
## [73,] -70.69739 -33.59284
## [74,] -70.58106 -33.57712
## [75,] -70.35230 -33.64126
## [76,] -70.63502 -33.55250
## [77,] -70.60486 -33.41868
## [78,] -70.59915 -33.51416
## [79,] -70.55442 -33.56938
## [80,] -70.74194 -34.16449
## [81,] -70.73086 -34.06706
## [82,] -70.95392 -34.26859
## [83,] -71.17305 -34.38959
## [84,] -70.85326 -34.41132
## [85,] -71.08062 -34.44110
## [86,] -71.28325 -34.35925
## [87,] -70.99256 -34.57591
## [88,] -71.03664 -34.70251
## [89,] -71.20487 -34.64978
## [90,] -71.35723 -34.63442
## [91,] -71.61712 -34.39882
## [92,] -72.01323 -34.38651
## [93,] -71.64666 -34.72822
## [94,] -71.72906 -34.11563
## [95,] -71.23577 -34.98979
## [96,] -71.16378 -34.87095
## [97,] -71.29579 -35.10776
## [98,] -71.80556 -34.97638
## [99,] -71.99066 -34.98272
## [100,] -71.64637 -35.42690
## [101,] -72.02099 -35.09320
## [102,] -72.40270 -35.33943
## [103,] -71.59099 -35.84428
## [104,] -71.73744 -35.59072
## [105,] -71.81403 -36.14198
## [106,] -72.32527 -35.96310
## [107,] -72.53145 -35.73956
## [108,] -72.09267 -36.60883
## [109,] -71.95983 -36.42993
## [110,] -72.29642 -36.73971
## [111,] -72.02385 -37.12182
## [112,] -72.54754 -36.28644
## [113,] -72.03487 -36.89802
## [114,] -72.70531 -36.49027
## [115,] -73.03795 -36.82511
## [116,] -73.03781 -36.82411
## [117,] -73.13586 -37.02824
## [118,] -73.15553 -37.09019
## [119,] -72.94617 -37.16831
## [120,] -72.64912 -36.82258
## [121,] -73.10889 -36.74073
## [122,] -72.95455 -36.61332
## [123,] -72.97545 -36.71957
## [124,] -72.34690 -37.47365
## [125,] -72.24066 -37.72000
## [126,] -72.67633 -37.50751
## [127,] -72.55766 -37.09636
## [128,] -72.70924 -37.26429
## [129,] -72.01668 -37.66815
## [130,] -71.94230 -37.24032
## [131,] -72.59924 -38.73653
## [132,] -72.41838 -38.53708
## [133,] -72.78526 -38.41026
## [134,] -72.22757 -38.66638
## [135,] -72.03761 -38.93094
## [136,] -72.95831 -38.74033
## [137,] -73.16013 -38.71207
## [138,] -73.39262 -38.79929
## [139,] -72.64350 -38.98994
## [140,] -73.16415 -39.17686
## [141,] -72.66828 -39.10588
## [142,] -72.62623 -39.37103
## [143,] -72.22661 -39.27745
## [144,] -71.97429 -39.27883
## [145,] -72.69389 -38.83156
## [146,] -73.24014 -39.83181
## [147,] -73.43610 -39.86252
## [148,] -72.80999 -39.86306
## [149,] -72.76842 -39.45210
## [150,] -73.07601 -40.28456
## [151,] -72.95047 -40.33484
## [152,] -72.86648 -40.07176
## [153,] -72.96573 -39.54126
## [154,] -72.34238 -39.64068
## [155,] -73.12779 -40.58830
## [156,] -73.15388 -40.91364
## [157,] -73.21653 -40.80243
## [158,] -72.88318 -40.97256
## [159,] -73.40504 -40.48795
## [160,] -73.26151 -40.36766
## [161,] -72.95734 -41.44855
## [162,] -73.01059 -41.25647
## [163,] -73.03151 -41.13808
## [164,] -73.42297 -41.15532
## [165,] -73.59847 -41.61685
## [166,] -73.13302 -41.77007
## [167,] -71.80807 -43.61790
## [168,] -71.86907 -43.18339
## [169,] -72.71026 -42.91861
## [170,] -72.07342 -45.56840
## [171,] -72.68381 -45.40852
## [172,] -71.72474 -46.54153
## [173,] -72.57073 -47.25557
## [174,] -72.68078 -44.72603
## [175,] -70.89623 -53.12215
## [176,] -72.50646 -51.73044
## [177,] -70.35838 -53.29816
## [178,] -67.60890 -54.93437
## [179,] -73.34824 -37.47368
## [180,] -73.65973 -37.61034
## [181,] -73.38627 -37.78220
## [182,] -73.23226 -38.02018
## [183,] -73.31763 -37.25072
## [184,] -72.70531 -37.79436
## [185,] -73.07499 -38.03873
## [186,] -72.43598 -37.96008
## [187,] -72.67164 -38.24285
## [188,] -72.34016 -38.23394
## [189,] -71.89135 -38.43933
## [190,] -71.36917 -38.45503
## [191,] -73.76933 -42.47704
## [192,] -73.82383 -41.86523
## [193,] -73.49460 -42.46956
## [194,] -73.61706 -43.11509
## [195,] -73.47314 -42.89024
View(Hospitales@data)
RegionBio<-readOGR("C:/Users/jose/Desktop/R/Data Science/The Big Work/Bases/R08/REGION_C17.shp",encoding="UTF-8" )
## OGR data source with driver: ESRI Shapefile
## Source: "C:\Users\jose\Desktop\R\Data Science\The Big Work\Bases\R08\REGION_C17.shp", layer: "REGION_C17"
## with 1 features
## It has 4 fields
RegionMetro<-readOGR("C:/Users/jose/Desktop/R/Data Science/The Big Work/Bases2/R13/REGION_C17.shp",encoding="UTF-8" )
## OGR data source with driver: ESRI Shapefile
## Source: "C:\Users\jose\Desktop\R\Data Science\The Big Work\Bases2\R13\REGION_C17.shp", layer: "REGION_C17"
## with 1 features
## It has 4 fields
RegionValp<-readOGR("C:/Users/jose/Desktop/R/Data Science/The Big Work/Bases2/R05/REGION_C17.shp",encoding="UTF-8" )
## OGR data source with driver: ESRI Shapefile
## Source: "C:\Users\jose\Desktop\R\Data Science\The Big Work\Bases2\R05\REGION_C17.shp", layer: "REGION_C17"
## with 1 features
## It has 4 fields
RegionBio@proj4string
## CRS arguments:
## +proj=longlat +ellps=GRS80 +towgs84=0,0,0,0,0,0,0 +no_defs
RegionBio<-spTransform(RegionBio,CRSobj = proj4string(Hospitales))
RegionBio@proj4string
## CRS arguments: +proj=longlat +ellps=GRS80 +no_defs
RegionMetro@proj4string
## CRS arguments:
## +proj=longlat +ellps=GRS80 +towgs84=0,0,0,0,0,0,0 +no_defs
RegionMetro<-spTransform(RegionMetro,CRSobj = proj4string(Hospitales))
RegionValp@proj4string
## CRS arguments:
## +proj=longlat +ellps=GRS80 +towgs84=0,0,0,0,0,0,0 +no_defs
RegionValp<-spTransform(RegionValp,CRSobj = proj4string(Hospitales))
plot(Hospitales)
plot(RegionBio)
### Marcadores de las ubicaciones hospitales en Chile, en general.
leaflet(Hospitales)%>%
addTiles()%>%
addMarkers()
### Alternativa con círculos.
leaflet(Hospitales)%>%
addTiles()%>%
addCircles()
### Demarcación de la región de BioBío en el mapa chileno.
leaflet(RegionBio)%>%
addTiles()%>%
addPolygons()
### Demarcación de la región Metropolitana
leaflet(RegionMetro)%>%
addTiles()%>%
addPolygons()
### Demarcación de la región de Valparaíso
leaflet(RegionValp)%>%
addTiles()%>%
addPolygons()
### Combinación localización de los hopsitales en el mapa chileno con la región demarcada
### La región de BioBío cuenta con 20 hospitales
leaflet(RegionBio)%>%
addTiles()%>%
addPolygons()%>%
addMarkers(Hospitales,lng = Hospitales@coords[,1],lat = Hospitales@coords[,2])
### En la región Metropolitana hay 34 hospitales.
leaflet(RegionMetro)%>%
addTiles()%>%
addPolygons()%>%
addMarkers(Hospitales,lng = Hospitales@coords[,1],lat = Hospitales@coords[,2])
### En la región de Valparaíso hay 23 hospitales.
leaflet(RegionValp)%>%
addTiles()%>%
addPolygons()%>%
addMarkers(Hospitales,lng = Hospitales@coords[,1],lat = Hospitales@coords[,2])
### Mapa de calor sobre la concentración de hospitales en el mapa chileno.
kde2d <- bkde2D(Hospitales@coords,
bandwidth=c(.00225, .00225))
CL <- contourLines(kde2d$x1 , kde2d$x2 , kde2d$fhat)
LEVS <- as.factor(sapply(CL, `[[`, "level"))
NLEV <- length(levels(LEVS))
pgons <- lapply(1:length(CL), function(i)
Polygons(list(Polygon(cbind(CL[[i]]$x, CL[[i]]$y))), ID=i))
spgons <- SpatialPolygons(pgons)
leaflet(spgons) %>% addTiles() %>%
addPolygons(color = heat.colors(NLEV, NULL)[LEVS])