library(openxlsx)
library(readxl)
library(tidyverse)
## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
## ✔ dplyr     1.1.4     ✔ readr     2.1.4
## ✔ forcats   1.0.0     ✔ stringr   1.5.0
## ✔ ggplot2   3.4.4     ✔ tibble    3.2.1
## ✔ lubridate 1.9.3     ✔ tidyr     1.3.0
## ✔ purrr     1.0.2     
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## ✖ dplyr::filter() masks stats::filter()
## ✖ dplyr::lag()    masks stats::lag()
## ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors
library(factoextra)
## Welcome! Want to learn more? See two factoextra-related books at https://goo.gl/ve3WBa
library(cowplot)
## 
## Attaching package: 'cowplot'
## 
## The following object is masked from 'package:lubridate':
## 
##     stamp
library(ggpubr)
## 
## Attaching package: 'ggpubr'
## 
## The following object is masked from 'package:cowplot':
## 
##     get_legend
library(cluster)
library(purrr)
library(dplyr)
library(readr)
Evidencia1 <- read_csv("Documents/Evidencia1.csv")
## Rows: 12510 Columns: 6
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## dbl (6): ent, mun, est, pea, ocupados, informales
## 
## ℹ 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.
summary(Evidencia1)
##       ent             mun             est         pea            ocupados      
##  Min.   : 0.00   Min.   :  0.0   Min.   :1   Min.   : 0.063   Min.   :  0.079  
##  1st Qu.:14.00   1st Qu.: 22.0   1st Qu.:2   1st Qu.: 4.609   1st Qu.:  5.902  
##  Median :20.00   Median : 55.0   Median :3   Median :51.062   Median : 88.867  
##  Mean   :19.17   Mean   :107.3   Mean   :3   Mean   :35.629   Mean   : 59.316  
##  3rd Qu.:24.00   3rd Qu.:125.0   3rd Qu.:4   3rd Qu.:58.165   3rd Qu.: 98.198  
##  Max.   :32.00   Max.   :570.0   Max.   :5   Max.   :83.504   Max.   :100.000  
##    informales    
##  Min.   :  0.04  
##  1st Qu.: 10.86  
##  Median : 56.72  
##  Mean   : 48.83  
##  3rd Qu.: 81.31  
##  Max.   :100.00
subset_df <-  subset(Evidencia1, pea >1000)
pea = scale(Evidencia1, center = TRUE, scale = TRUE)
summary(pea)
##       ent               mun               est               pea         
##  Min.   :-2.5882   Min.   :-0.8126   Min.   :-1.4142   Min.   :-1.3511  
##  1st Qu.:-0.6983   1st Qu.:-0.6459   1st Qu.:-0.7071   1st Qu.:-1.1784  
##  Median : 0.1116   Median :-0.3959   Median : 0.0000   Median : 0.5863  
##  Mean   : 0.0000   Mean   : 0.0000   Mean   : 0.0000   Mean   : 0.0000  
##  3rd Qu.: 0.6516   3rd Qu.: 0.1344   3rd Qu.: 0.7071   3rd Qu.: 0.8561  
##  Max.   : 1.7316   Max.   : 3.5057   Max.   : 1.4142   Max.   : 1.8187  
##     ocupados         informales     
##  Min.   :-1.3378   Min.   :-1.4112  
##  1st Qu.:-1.2063   1st Qu.:-1.0981  
##  Median : 0.6673   Median : 0.2283  
##  Mean   : 0.0000   Mean   : 0.0000  
##  3rd Qu.: 0.8781   3rd Qu.: 0.9394  
##  Max.   : 0.9188   Max.   : 1.4801
?kmeans
kmcluster = kmeans(pea,centers=4,nstart = 100)
kmcluster
## K-means clustering with 4 clusters of sizes 2502, 4266, 3240, 2502
## 
## Cluster means:
##             ent           mun        est        pea   ocupados informales
## 1  8.595842e-15 -4.265395e-16 -0.7070785 -1.2471947 -1.2217756 -1.1640590
## 2  6.890406e-01  3.760716e-01 -0.2327094  0.8111927  0.8171509  0.8608142
## 3 -9.072367e-01 -4.951610e-01 -0.2396211  0.7945673  0.8094208  0.6051642
## 4  8.595842e-15 -4.265395e-16  1.4141570 -1.1648541 -1.2196668 -1.0873261
## 
## Clustering vector:
##     [1] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##    [37] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##    [73] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##   [109] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##   [145] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##   [181] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##   [217] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##   [253] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##   [289] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##   [325] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##   [361] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##   [397] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##   [433] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##   [469] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##   [505] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##   [541] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##   [577] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##   [613] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##   [649] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##   [685] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##   [721] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##   [757] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##   [793] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##   [829] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##   [865] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##   [901] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##   [937] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##   [973] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [1009] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [1045] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [1081] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [1117] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [1153] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [1189] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [1225] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [1261] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [1297] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [1333] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [1369] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [1405] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [1441] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [1477] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [1513] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [1549] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [1585] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [1621] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [1657] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [1693] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [1729] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [1765] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [1801] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [1837] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [1873] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [1909] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [1945] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [1981] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [2017] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [2053] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [2089] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [2125] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [2161] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [2197] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [2233] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [2269] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [2305] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [2341] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [2377] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [2413] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [2449] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [2485] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [2521] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [2557] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [2593] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [2629] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [2665] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [2701] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [2737] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [2773] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [2809] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [2845] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [2881] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [2917] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [2953] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [2989] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [3025] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [3061] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [3097] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [3133] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [3169] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [3205] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [3241] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [3277] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [3313] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [3349] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [3385] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [3421] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [3457] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [3493] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [3529] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [3565] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [3601] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [3637] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [3673] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [3709] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [3745] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [3781] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [3817] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [3853] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [3889] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [3925] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [3961] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [3997] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [4033] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [4069] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [4105] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [4141] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [4177] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [4213] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [4249] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [4285] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [4321] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [4357] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [4393] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [4429] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [4465] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [4501] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [4537] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [4573] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [4609] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [4645] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [4681] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [4717] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [4753] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [4789] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [4825] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [4861] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [4897] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [4933] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [4969] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [5005] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [5041] 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3
##  [5077] 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1
##  [5113] 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3
##  [5149] 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3
##  [5185] 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4
##  [5221] 3 1 3 3 4 3 1 3 2 4 3 1 3 2 4 3 1 3 2 4 3 1 3 3 4 3 1 3 3 4 3 1 3 3 4 2
##  [5257] 1 3 2 4 3 1 3 3 4 3 1 3 3 4 3 1 3 2 4 2 1 3 2 4 2 1 3 2 4 3 1 3 2 4 2 1
##  [5293] 3 2 4 3 1 3 2 4 2 1 3 2 4 2 1 3 2 4 3 1 3 3 4 2 1 3 2 4 3 1 3 2 4 2 1 3
##  [5329] 2 4 2 1 3 2 4 2 1 3 2 4 3 1 3 2 4 2 1 2 2 4 2 1 3 2 4 3 1 3 2 4 3 1 3 2
##  [5365] 4 2 1 3 2 4 3 1 3 2 4 2 1 2 2 4 2 1 3 2 4 2 1 3 2 4 2 1 3 2 4 2 1 2 2 4
##  [5401] 2 1 2 2 4 2 1 3 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 3 2 4 2 1 3 2 4 2
##  [5437] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 3 2 4 2 1 3 2 4 2 1 2 2 4 2 1
##  [5473] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [5509] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [5545] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [5581] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [5617] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [5653] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [5689] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [5725] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [5761] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [5797] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [5833] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [5869] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [5905] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [5941] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [5977] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [6013] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [6049] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [6085] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [6121] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [6157] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [6193] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [6229] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [6265] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [6301] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [6337] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [6373] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [6409] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [6445] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [6481] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [6517] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [6553] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [6589] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [6625] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [6661] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [6697] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [6733] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [6769] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [6805] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [6841] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [6877] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [6913] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [6949] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [6985] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [7021] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [7057] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [7093] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [7129] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [7165] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [7201] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [7237] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [7273] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [7309] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [7345] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [7381] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [7417] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [7453] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [7489] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [7525] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [7561] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [7597] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [7633] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [7669] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [7705] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [7741] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [7777] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [7813] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [7849] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [7885] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [7921] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [7957] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [7993] 2 2 4 2 1 2 2 4 3 1 3 3 4 3 1 3 2 4 3 1 3 2 4 3 1 3 2 4 3 1 3 2 4 2 1 2
##  [8029] 2 4 2 1 3 2 4 2 1 2 2 4 3 1 3 2 4 2 1 3 2 4 2 1 3 2 4 2 1 2 2 4 2 1 3 2
##  [8065] 4 2 1 2 2 4 2 1 3 2 4 3 1 3 3 4 2 1 3 2 4 2 1 3 2 4 2 1 3 2 4 2 1 3 2 4
##  [8101] 2 1 2 2 4 2 1 3 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [8137] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [8173] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 3 1 3
##  [8209] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [8245] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [8281] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [8317] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [8353] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [8389] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [8425] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [8461] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [8497] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [8533] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [8569] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [8605] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [8641] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [8677] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [8713] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [8749] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [8785] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [8821] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [8857] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [8893] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [8929] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [8965] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [9001] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [9037] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [9073] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 3 1 3 3 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [9109] 2 4 2 1 2 2 4 3 1 3 2 4 3 1 3 3 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [9145] 4 3 1 3 2 4 3 1 3 2 4 2 1 2 2 4 3 1 3 3 4 2 1 2 2 4 3 1 3 2 4 2 1 2 2 4
##  [9181] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [9217] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [9253] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [9289] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [9325] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [9361] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [9397] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [9433] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [9469] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [9505] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [9541] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [9577] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [9613] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [9649] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [9685] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [9721] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [9757] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [9793] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
##  [9829] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
##  [9865] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
##  [9901] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
##  [9937] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
##  [9973] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
## [10009] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
## [10045] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
## [10081] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
## [10117] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
## [10153] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
## [10189] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
## [10225] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
## [10261] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
## [10297] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
## [10333] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
## [10369] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
## [10405] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
## [10441] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
## [10477] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
## [10513] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
## [10549] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
## [10585] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
## [10621] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
## [10657] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
## [10693] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
## [10729] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
## [10765] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
## [10801] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
## [10837] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
## [10873] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
## [10909] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
## [10945] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
## [10981] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
## [11017] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
## [11053] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
## [11089] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
## [11125] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
## [11161] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
## [11197] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
## [11233] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
## [11269] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
## [11305] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
## [11341] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
## [11377] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
## [11413] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
## [11449] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
## [11485] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
## [11521] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
## [11557] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
## [11593] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
## [11629] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
## [11665] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
## [11701] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
## [11737] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
## [11773] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
## [11809] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
## [11845] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
## [11881] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
## [11917] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
## [11953] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
## [11989] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
## [12025] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
## [12061] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
## [12097] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
## [12133] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
## [12169] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
## [12205] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
## [12241] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
## [12277] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
## [12313] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2
## [12349] 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2
## [12385] 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
## [12421] 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2
## [12457] 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1
## [12493] 2 2 4 2 1 2 2 4 2 1 2 2 4 2 1 2 2 4
## 
## Within cluster sum of squares by cluster:
## [1]  5022.676 12010.267  4961.419  5034.616
##  (between_SS / total_SS =  64.0 %)
## 
## Available components:
## 
## [1] "cluster"      "centers"      "totss"        "withinss"     "tot.withinss"
## [6] "betweenss"    "size"         "iter"         "ifault"
pea = Evidencia1 %>% mutate(cluster = kmcluster$cluster)

(g1=ggplot(pea, aes(x = ocupados, y = informales)) +
    geom_point(aes(color=as.factor(cluster)), size=.01) +
    theme_bw() +
    theme(legend.position = "none")+
    labs(title = "Kmenas con k=4") 
)