data <- read_csv2("C:/Users/MIRZ/Downloads/data_pca.csv")
## ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
## Rows: 200 Columns: 16
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ";"
## dbl (16): x1, x2, x3, x4, x5, x6, x7, x8, x9, x10, x11, x12, x13, x14, x15, y
##
## ℹ 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.
View(data)
data1 <- scale(data[,-16])
View(data1)
# Calcular el KMO
psych::KMO(data1)
## Kaiser-Meyer-Olkin factor adequacy
## Call: psych::KMO(r = data1)
## Overall MSA = 0.34
## MSA for each item =
## x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15
## 0.36 0.27 0.24 0.46 0.53 0.55 0.45 0.27 0.42 0.26 0.43 0.46 0.28 0.62 0.33
Nota: #No se toma en cuenta porque se va a reducir mucho (estan mal los datos)
# Calcular PCA
pca <- princomp(data1)
summary(pca) # Resumen del PCA
## Importance of components:
## Comp.1 Comp.2 Comp.3 Comp.4 Comp.5
## Standard deviation 1.6220588 1.4501268 1.3332930 1.2434264 1.15529908
## Proportion of Variance 0.1762864 0.1408957 0.1191069 0.1035919 0.08942821
## Cumulative Proportion 0.1762864 0.3171821 0.4362890 0.5398809 0.62930907
## Comp.6 Comp.7 Comp.8 Comp.9 Comp.10
## Standard deviation 1.05569426 0.90471763 0.88908929 0.8622762 0.80999883
## Proportion of Variance 0.07467272 0.05484181 0.05296347 0.0498171 0.04395967
## Cumulative Proportion 0.70398179 0.75882360 0.81178707 0.8616042 0.90556384
## Comp.11 Comp.12 Comp.13 Comp.14 Comp.15
## Standard deviation 0.7012045 0.59518243 0.53958339 0.4662240 0.234552581
## Proportion of Variance 0.0329439 0.02373482 0.01950755 0.0145638 0.003686091
## Cumulative Proportion 0.9385077 0.96224255 0.98175010 0.9963139 1.000000000
Nota: #Solo considerar los que tienen la proporción de varianza más del 6% porque estamos reduciendo la dimensión. #Hasta el momento se observa que las principales componentes que aportan mayor varianza son de la 1 a 6.
# Cargas de las variables
pca$loadings
##
## Loadings:
## Comp.1 Comp.2 Comp.3 Comp.4 Comp.5 Comp.6 Comp.7 Comp.8 Comp.9 Comp.10
## x1 0.141 0.320 0.200 0.604 0.137 0.102 0.199 0.109
## x2 -0.419 0.180 -0.248 0.145 0.236 -0.110 -0.570
## x3 -0.274 0.177 0.259 0.483 -0.131 -0.207 0.367
## x4 -0.307 0.447 -0.223 0.129 -0.167 -0.291 -0.399 -0.152
## x5 -0.236 -0.410 -0.354 0.102 -0.163
## x6 0.132 -0.203 -0.628 0.178 -0.112 0.340
## x7 0.112 0.340 -0.464 -0.345 0.151 -0.194 0.136
## x8 0.385 -0.246 0.153 -0.132 -0.268 0.382 0.424 -0.258
## x9 0.142 0.246 -0.284 -0.510 -0.336 0.157 -0.536
## x10 -0.386 0.110 -0.342 -0.331 0.327 0.273 0.383
## x11 0.137 -0.255 0.122 -0.300 0.528 0.574 -0.364
## x12 0.102 0.330 -0.226 0.346 -0.643 -0.434 -0.209
## x13 0.232 -0.223 -0.648 -0.301 0.246
## x14 0.175 0.410 0.305 -0.182 0.158 0.154 -0.256
## x15 0.521 -0.153 0.135 0.173 -0.256 -0.249 0.151
## Comp.11 Comp.12 Comp.13 Comp.14 Comp.15
## x1 0.134 0.135 0.588
## x2 0.203 -0.186 -0.459
## x3 -0.232 -0.412 0.113 -0.382
## x4 0.576
## x5 -0.582 0.204 0.470
## x6 -0.171 -0.566 0.147
## x7 0.662
## x8 -0.385 -0.355
## x9 -0.367
## x10 0.367 -0.367
## x11 0.237
## x12 0.223
## x13 0.136 0.524
## x14 -0.693 -0.248
## x15 0.344 -0.611
##
## Comp.1 Comp.2 Comp.3 Comp.4 Comp.5 Comp.6 Comp.7 Comp.8 Comp.9
## SS loadings 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000
## Proportion Var 0.067 0.067 0.067 0.067 0.067 0.067 0.067 0.067 0.067
## Cumulative Var 0.067 0.133 0.200 0.267 0.333 0.400 0.467 0.533 0.600
## Comp.10 Comp.11 Comp.12 Comp.13 Comp.14 Comp.15
## SS loadings 1.000 1.000 1.000 1.000 1.000 1.000
## Proportion Var 0.067 0.067 0.067 0.067 0.067 0.067
## Cumulative Var 0.667 0.733 0.800 0.867 0.933 1.000
Nota: #La variable x1 tiene una carga fuerte con la componente 14, mientras que la variable x2 esta relacionada negativamente con la componente 10.
# Gráficos de varianza y eigenvalores
fviz_eig(pca, choice = "variance")
fviz_eig(pca, choice = "eigenvalue")
Nota: La componente uno y dos aportan la mayor varianza, además estos mismos componentes son los que tienen eigenvalores mayores a 1, lo adecuado es extraer unicamente dos factores.
# Gráfico de puntuaciones de individuos
fviz_pca_ind(pca,
col.ind = "cos2",
gradient.cols = c("red", "yellow", "green"),
repel = FALSE)
> Nota: #Las observaciones en color verde fuerte son
representadas en mejor medida. #las observaciones 21 Y 43 no son tan
bien representadas, pero son la minoria
# Gráfico de variables
fviz_pca_var(pca,
col.var = "contrib",
gradient.cols = c("red", "yellow", "green"),
repel = FALSE)
> Nota: #Las variables x11, x12, x7, x9, x1, x14 están
agrupadas y apuntan en la misma dirección por lo que están positivamente
correlacionadas entre sí.
# Biplot de PCA
fviz_pca_biplot(pca,
col.var = "red",
col.ind = "black")
> Nota: #Las observaciones se encuentran agrupadas
mayormente en el cuadrante 1 y 3
# Matriz de correlaciones
psych::cor.plot(data1)
# Determinante de la matriz de correlaciones
det(cor(data1))
## [1] 0.004667778
Nota: #Existen diversas variables que estan correlacionadas tanto positiva como negativamente, lo cual es bueno para nuestro análisis de componentes. Esto se confirma con el resultado del determinante que es muy cercano a 0.
psych::principal (Rotación Varimax)# Análisis PCA alternativo usando principal() de psych
pca2 <- psych::principal(data1,
nfactors = 6,
residuals = FALSE,
rotate = "varimax",
scores = TRUE,
oblique.scores = FALSE,
method = "regression",
use = "pairwise",
cor = "cor")
pca2
## Principal Components Analysis
## Call: psych::principal(r = data1, nfactors = 6, residuals = FALSE,
## rotate = "varimax", scores = TRUE, oblique.scores = FALSE,
## method = "regression", use = "pairwise", cor = "cor")
## Standardized loadings (pattern matrix) based upon correlation matrix
## RC1 RC2 RC4 RC3 RC6 RC5 h2 u2 com
## x1 -0.06 0.57 -0.04 0.06 -0.10 -0.72 0.86 0.14 2.0
## x2 0.80 -0.05 0.07 0.02 0.00 -0.15 0.68 0.32 1.1
## x3 0.22 0.08 -0.84 -0.08 0.06 0.01 0.77 0.23 1.2
## x4 -0.01 0.06 0.07 -0.50 -0.65 0.12 0.69 0.31 2.0
## x5 0.10 -0.85 0.03 -0.03 -0.06 -0.07 0.75 0.25 1.1
## x6 0.12 0.07 0.87 0.00 0.04 0.03 0.78 0.22 1.1
## x7 0.02 0.03 0.05 0.87 0.21 -0.01 0.80 0.20 1.1
## x8 -0.73 -0.13 0.12 0.11 -0.12 0.00 0.59 0.41 1.2
## x9 -0.06 0.10 0.04 0.77 -0.12 0.00 0.63 0.37 1.1
## x10 0.76 -0.07 0.13 0.02 -0.08 0.13 0.62 0.38 1.2
## x11 -0.02 -0.07 0.03 -0.04 0.78 0.02 0.61 0.39 1.0
## x12 0.02 0.41 0.00 -0.01 0.54 0.06 0.46 0.54 1.9
## x13 -0.05 0.31 0.00 -0.01 -0.05 0.88 0.87 0.13 1.3
## x14 0.03 0.80 0.04 0.09 -0.03 0.04 0.66 0.34 1.0
## x15 -0.77 0.15 0.42 -0.03 0.07 0.00 0.80 0.20 1.7
##
## RC1 RC2 RC4 RC3 RC6 RC5
## SS loadings 2.42 2.04 1.69 1.63 1.42 1.35
## Proportion Var 0.16 0.14 0.11 0.11 0.09 0.09
## Cumulative Var 0.16 0.30 0.41 0.52 0.61 0.70
## Proportion Explained 0.23 0.19 0.16 0.15 0.13 0.13
## Cumulative Proportion 0.23 0.42 0.58 0.74 0.87 1.00
##
## Mean item complexity = 1.3
## Test of the hypothesis that 6 components are sufficient.
##
## The root mean square of the residuals (RMSR) is 0.08
## with the empirical chi square 263.19 with prob < 4.2e-39
##
## Fit based upon off diagonal values = 0.83
Nota: #Los valores indican las cargas en cada componente, además, varimax ayuda a simplificar la interpretación de estas.
# Pesos de los componentes
pca2$weights
## RC1 RC2 RC4 RC3 RC6
## x1 -0.008727579 0.2792604831 -0.007237084 -0.01527418 -0.091588546
## x2 0.347445455 0.0040542499 0.111942053 0.01275760 -0.002653909
## x3 0.025220962 0.0472773165 -0.491534113 -0.02545133 0.035909049
## x4 0.003568835 0.0734721529 0.048916959 -0.22268542 -0.406875705
## x5 0.010811259 -0.4185764561 0.023497517 0.02449604 -0.014296960
## x6 0.125340287 0.0420708386 0.542636482 -0.04827402 0.046513370
## x7 0.021601246 -0.0274162575 -0.003459397 0.53463456 0.015853266
## x8 -0.304573037 -0.0938811312 0.002234392 0.08698561 -0.099920860
## x9 -0.009219345 0.0191129775 -0.019401843 0.52155816 -0.212794964
## x10 0.334173404 0.0004521551 0.136097304 0.03778716 -0.065646513
## x11 -0.015511335 -0.0578383249 0.031514256 -0.14507604 0.588000386
## x12 0.021797373 0.1920790342 0.014156384 -0.10667257 0.387946754
## x13 -0.003859800 0.1578934621 -0.028795850 0.03836012 -0.053144256
## x14 0.048754865 0.3991573828 0.025836092 0.02854465 -0.057791927
## x15 -0.288725458 0.0444343090 0.197316966 -0.06405394 0.066900852
## RC5
## x1 -0.532518411
## x2 -0.106498653
## x3 0.031410906
## x4 0.061999780
## x5 -0.053850311
## x6 -0.001304753
## x7 0.037945017
## x8 -0.002944088
## x9 0.044229464
## x10 0.098142293
## x11 0.005480346
## x12 0.038824028
## x13 0.656302428
## x14 0.034560186
## x15 -0.017402741
pca2$weights[1:6,]
## RC1 RC2 RC4 RC3 RC6 RC5
## x1 -0.008727579 0.27926048 -0.007237084 -0.01527418 -0.091588546 -0.532518411
## x2 0.347445455 0.00405425 0.111942053 0.01275760 -0.002653909 -0.106498653
## x3 0.025220962 0.04727732 -0.491534113 -0.02545133 0.035909049 0.031410906
## x4 0.003568835 0.07347215 0.048916959 -0.22268542 -0.406875705 0.061999780
## x5 0.010811259 -0.41857646 0.023497517 0.02449604 -0.014296960 -0.053850311
## x6 0.125340287 0.04207084 0.542636482 -0.04827402 0.046513370 -0.001304753
pca2$scores
## RC1 RC2 RC4 RC3 RC6
## [1,] 1.696675712 -2.95237390 0.18409563 -1.878654143 -0.673987884
## [2,] 0.351284360 1.08835815 -0.06242438 -2.727522318 0.259612560
## [3,] -0.201057151 -0.57101629 0.25247399 1.120188178 -1.026319387
## [4,] 0.170299405 0.47762532 0.51199628 0.207655637 -0.605058470
## [5,] 1.759096644 -0.06691141 -0.30379172 0.102550019 0.253110592
## [6,] -0.652624337 0.68606782 0.42292026 -1.805348449 -0.847561608
## [7,] 2.184837727 -1.11440944 0.89051816 -1.309657745 -0.193225576
## [8,] -2.199632155 -0.14959795 1.00364600 1.335361317 -0.861191559
## [9,] -0.116663140 -0.35762612 -0.34233539 1.587338793 0.695920508
## [10,] -0.641678048 0.46743514 0.66839606 -1.447722199 -0.833514181
## [11,] -0.794145937 0.72021506 0.60547108 -0.698097829 1.193845348
## [12,] -2.133031724 2.40206452 0.16210372 -0.058633355 0.324717899
## [13,] -0.358288317 0.06683173 -0.52418785 -1.310118628 -0.517293133
## [14,] 1.247022136 0.57597071 0.72167660 1.359679490 0.275169109
## [15,] -0.172029438 0.30343334 0.04612618 -0.182531972 0.166891808
## [16,] -0.321610659 0.73767031 -0.68668399 -0.546450535 -1.400197744
## [17,] -0.486137110 2.04836826 0.77157837 0.202395822 0.247323109
## [18,] 0.328502629 -1.95453150 0.74732870 0.031011616 -0.168250895
## [19,] -0.101565209 -0.08614786 -0.45361911 -0.190402586 0.024778837
## [20,] -0.127054189 -0.17151817 -1.04385934 0.869199081 -1.768970472
## [21,] -1.495302935 -1.16482774 0.41847956 -2.812503672 -0.166417309
## [22,] 0.130429000 -0.32955749 0.75790637 0.888626492 2.259695878
## [23,] -0.222172119 -2.03333412 0.67066554 1.564371182 1.990806009
## [24,] -0.124141464 0.50078464 -0.55297139 -0.143367617 -0.913284587
## [25,] -0.317613859 0.19348970 -0.34821277 -0.871013558 1.891105814
## [26,] 1.066631680 -0.80505473 -0.16984415 -0.049852993 0.108642507
## [27,] 1.063888592 1.58131511 1.75535491 -2.035482940 0.804347356
## [28,] 1.681845046 -2.54116441 -0.30714295 0.371240044 -0.637140307
## [29,] 1.587969984 0.64875596 -1.20761357 0.759610526 1.519006824
## [30,] 2.271218931 0.25014974 1.65513179 0.758705225 0.422499257
## [31,] -1.671718572 0.16957039 1.77601105 0.494568919 -0.869365385
## [32,] 0.788681226 1.74566916 -0.99717308 -1.294210547 -0.536393513
## [33,] -0.937492683 -0.69895784 -0.90730283 -1.111724215 0.963315097
## [34,] 1.720424392 1.70801870 -2.18896350 -0.409162457 -0.486994709
## [35,] -1.091063709 0.39245819 1.18054601 1.332961692 1.149350625
## [36,] -1.050123438 -1.64159753 -1.70265790 0.533996289 -0.517763748
## [37,] 1.480970058 -0.26932713 -0.55172918 -0.555579922 0.398837887
## [38,] -0.091238751 0.86694841 0.25117600 1.010178424 2.082154647
## [39,] -0.017076897 0.63255933 0.59080485 -0.375990697 -0.336746935
## [40,] 0.755412513 1.76222834 0.73123544 0.510385354 -0.154442233
## [41,] 1.054846822 0.06971828 0.76612062 -0.557367395 -0.061886082
## [42,] -1.551290406 -0.17776582 -0.15054803 0.189260805 1.093368150
## [43,] 0.589617528 0.60596860 -2.25922471 -0.471881484 0.874935329
## [44,] 0.650816186 -0.23392216 -0.51276673 0.266952260 1.045861140
## [45,] -0.144608772 0.52244077 1.14102578 0.231851155 -1.078075938
## [46,] 1.422827531 0.27078598 -0.04087503 -1.311678293 0.517340417
## [47,] -0.935362476 0.89790839 -0.88260279 0.498910163 1.298518938
## [48,] -1.540437126 -0.75362303 1.62601585 -0.760197357 -1.392789837
## [49,] 0.226352870 -1.68305424 -0.94766294 -1.527224570 1.512421176
## [50,] -0.737796566 0.48921454 -1.63148547 -1.345296502 -1.076331063
## [51,] 0.123113051 -0.20557143 0.39441201 -0.452214836 1.081780159
## [52,] 0.095122007 -0.71774840 -0.05755255 -0.079421316 -0.058850984
## [53,] -1.060952566 1.28747977 -1.69368603 0.555649976 -1.588164134
## [54,] 0.387140469 -0.37233459 -1.35371062 1.075835481 -1.614362384
## [55,] -0.214703924 1.50524981 1.70142068 1.194486157 -0.494534789
## [56,] -1.314498811 -0.23919772 0.98973400 0.347111028 1.895876942
## [57,] -0.083617237 0.85170841 0.46562941 1.708649469 0.475446268
## [58,] 0.663465690 1.17953300 -1.74984656 0.543536565 0.576974093
## [59,] -0.319120490 0.36812946 0.07724003 -0.289612343 0.487029725
## [60,] 1.875828388 2.65913320 -0.70300048 -0.115212123 0.881241038
## [61,] 0.151353320 -0.06276960 0.28553228 1.653840200 -0.804810213
## [62,] -0.157398138 -0.80496203 0.25221464 0.142460894 -0.311081936
## [63,] 0.374723238 -1.98603731 -0.94790686 -1.557130879 0.414883495
## [64,] -0.424054109 0.30036332 0.69070696 0.216233233 0.233455994
## [65,] -0.554787465 0.26588289 -0.17876959 -0.624156460 0.303264326
## [66,] -0.239089346 0.59708165 -0.53491746 0.249678727 0.350468096
## [67,] 0.194697898 -0.22186304 -1.05738345 -0.722344841 -1.581724829
## [68,] 1.637256835 -0.09679031 0.04387329 -0.215262916 1.740468974
## [69,] 0.749962904 -0.45603886 -0.44797323 0.129910254 0.397795268
## [70,] 0.136259901 1.32505746 0.82919286 1.418751018 0.627497270
## [71,] 0.096223037 -0.27201485 -0.47512173 0.528372183 -0.414914581
## [72,] -0.179852743 -0.15448476 -0.47548758 0.374561805 0.953329730
## [73,] -1.230554310 -0.12036741 -0.80791816 0.656793813 -0.923134607
## [74,] -0.135207551 1.49954724 -0.68344829 -0.837968190 -2.246053781
## [75,] 2.361043402 0.81299822 -0.60940414 0.186831504 -1.248609446
## [76,] -1.952353161 -1.30503937 0.31744901 0.850557149 0.095059892
## [77,] -0.780418311 -0.79564126 -1.32697995 -0.015762074 1.488677326
## [78,] -1.231920383 0.41091210 0.23895779 -0.123662948 2.141040431
## [79,] -0.421426079 -0.02550052 -0.55502141 -0.899756764 -0.592987033
## [80,] 0.514164950 0.08331605 1.63948430 0.043456624 -0.645631384
## [81,] -1.260264703 0.94810853 -0.64341283 -0.602658083 -1.498860359
## [82,] 0.267109991 0.21959230 -0.50954000 -0.875003856 1.136918715
## [83,] -1.503091517 0.49939831 1.28088137 0.587045724 1.857589721
## [84,] -0.400932851 0.52943089 0.50536709 0.142969122 0.505343662
## [85,] 0.479924797 0.21742583 -0.89493428 3.610174527 -2.242035341
## [86,] -0.166448097 -0.93990305 2.01926875 -0.364692517 -0.408993707
## [87,] 1.026469011 0.21363230 -0.93111505 0.580351996 1.032307547
## [88,] -1.827349593 -1.40811865 -1.79465254 1.943771431 0.626427848
## [89,] 1.251032037 -0.70168683 -1.12386873 0.979550454 0.952322846
## [90,] -0.235111425 1.48331683 0.08274629 1.188291000 0.439592587
## [91,] 1.077162373 0.53191406 -0.29397435 -0.923175425 0.228050293
## [92,] 0.492626253 -0.75038766 -1.08715981 1.652750732 -1.192661517
## [93,] 0.122230007 1.27651064 -0.38365114 -1.159076300 -1.193543449
## [94,] -0.286641933 -0.42395596 1.05795982 0.830864507 0.696814894
## [95,] -0.903013496 0.73000989 2.05129198 -0.572269243 -2.174491796
## [96,] -0.651524962 -0.83597359 1.77708652 -0.824709500 0.229608552
## [97,] -0.618910206 -0.67369298 0.51388447 1.121065719 -1.754414735
## [98,] 0.665826147 -0.23209892 1.34871623 -0.083452128 0.421533092
## [99,] 0.033297616 0.53375487 0.54032040 0.181922911 -0.036983992
## [100,] -1.300688248 1.32216278 -0.01144614 -1.508107402 0.293199878
## [101,] -0.108034412 0.16403595 -0.54495077 -0.508195499 -1.668931209
## [102,] 1.395216735 -0.16740184 0.14294285 1.397360873 -1.043667387
## [103,] -0.714958241 -2.34203332 -0.70667586 0.582146194 -1.046514968
## [104,] -0.368961474 0.39829728 -0.21207663 0.868602792 -1.476129777
## [105,] 1.356972192 0.89101164 0.55366976 -0.350079866 -0.371591193
## [106,] -1.193265566 -1.63000423 0.34508625 0.841854236 -0.087589127
## [107,] 0.040333085 0.29083220 -1.64281615 -0.162102227 0.643652891
## [108,] -1.061099859 -1.57531486 0.11170241 -1.707182861 -0.145635089
## [109,] 0.515394602 0.26688228 -1.24354092 0.244114395 1.277182027
## [110,] -0.607541194 1.36738227 0.16610553 -0.120100723 -1.018456802
## [111,] -0.102522923 -0.55104521 -0.66085213 0.573670415 -0.191093167
## [112,] 0.904645541 1.79328553 1.27329313 0.828689244 -0.681673456
## [113,] -0.131743965 -1.78932457 0.09197090 -0.331612007 -1.056609203
## [114,] 0.893588709 0.20995112 0.95217888 0.008529476 -0.259290951
## [115,] 0.795907855 -0.96706828 -1.40675338 -1.427078473 -0.033217438
## [116,] 0.845916229 -1.63782878 -1.23411125 -1.227057854 -1.414716092
## [117,] -0.403334784 1.89095626 0.24412672 0.785644682 0.181859146
## [118,] 0.499424574 0.83265462 -0.83131887 0.847105435 -0.476117803
## [119,] -1.046102204 0.40199631 0.91563835 -1.497806530 0.393819169
## [120,] 1.141162155 0.13242365 -1.35142720 -0.715799608 0.894342931
## [121,] 2.251652886 -0.61345727 0.67926473 1.494408499 -0.265117682
## [122,] -1.737994916 0.50490551 -0.75438952 -0.778275013 0.425354968
## [123,] 0.850606687 -1.74170211 1.09156135 0.420678085 0.631528596
## [124,] -0.874453000 -1.06030506 -0.25881442 0.628213482 -0.315813087
## [125,] -0.061917724 0.95480736 2.05705416 0.587101111 1.425715940
## [126,] -0.064222794 -0.95856289 -0.14465248 2.117321435 1.364117555
## [127,] -0.897056260 -0.90905493 0.29749453 -0.689761851 -1.066810166
## [128,] 1.515940562 -0.67259820 2.17558929 -1.897118754 -1.414844525
## [129,] 0.003635467 -0.32946156 1.54600485 -0.182562825 -0.687020244
## [130,] -0.325863772 -0.72165510 -0.09688543 -1.040421709 0.799753738
## [131,] 1.633001817 -0.19587737 1.24164450 1.035504935 -2.725686031
## [132,] -0.365286083 0.75539075 -2.90068670 0.713785329 -0.975224396
## [133,] 0.498579840 -0.70885129 -1.18004054 0.548837597 0.988343630
## [134,] 0.816792170 -0.38012587 -1.03312749 1.025781014 3.105770038
## [135,] -1.250579399 -0.63999682 -1.40480826 0.299722283 0.326364891
## [136,] -0.332557701 -0.14594610 -1.17155713 -0.318800611 -0.683981969
## [137,] 1.933515324 -1.17863201 1.10772371 0.810447835 -0.263410864
## [138,] -1.003358734 1.16882700 0.53248813 0.471010500 -0.204071839
## [139,] 0.676008733 -0.27570595 0.44959580 0.125812386 -0.552074837
## [140,] -1.141207064 -1.97126326 -0.19040145 -0.087881490 1.025016310
## [141,] -0.709101900 -0.16944066 -0.23194030 0.299789033 0.024576034
## [142,] 0.651970973 1.53763202 0.81366081 -0.651398594 1.183212064
## [143,] -1.110547628 -0.13536375 1.36251286 -0.983660473 0.396858964
## [144,] 0.228090539 0.31318007 0.09132920 0.116232845 0.366658985
## [145,] 0.345728619 -0.27042307 -0.35768585 -0.911565333 1.065537927
## [146,] -0.893208235 -1.06239658 -0.17722810 -0.792584946 1.193594851
## [147,] -0.460308844 0.18117082 -0.32339408 -0.566270015 0.461242329
## [148,] 1.703662060 -1.03058709 -0.77145919 -2.488470228 0.563298217
## [149,] 1.058195842 1.07718539 1.06661406 0.993897751 -0.651210599
## [150,] 0.045452973 1.00383363 -0.87039537 1.568665653 1.044709744
## [151,] -0.383350172 -0.72599254 -0.68722225 0.150966974 -0.364108810
## [152,] -0.822628119 -1.66923604 0.06424345 -1.071424150 -0.517397382
## [153,] 0.564506732 0.03240311 -0.33179042 -0.218693542 -0.512908328
## [154,] -1.647663252 -0.24408895 -0.13957119 -1.415824791 -0.096306923
## [155,] -2.088397333 0.35781133 0.56681850 -0.118923700 0.205105603
## [156,] -0.998136881 -0.62820914 -1.45905296 0.888533293 0.797830450
## [157,] -0.531360948 -1.33713196 0.33017818 0.199359950 1.588817787
## [158,] -1.594241137 0.94333956 -0.57808442 1.733346952 0.037285496
## [159,] 0.520402928 -0.64854327 0.97979541 -0.239749543 -0.009981294
## [160,] 0.154469548 1.04296074 -0.85951095 0.409177561 0.531407765
## [161,] 2.458225711 -0.78952926 1.98501496 -0.411984678 1.347626407
## [162,] 0.750790603 -1.49289519 -0.14426713 -0.092645412 -0.770526955
## [163,] 0.487010450 0.15923571 0.36180930 -0.799806181 1.066569599
## [164,] -0.319990083 -0.60655278 1.34330670 0.636576065 0.236781685
## [165,] 0.223519662 0.31729811 0.54127398 0.779929965 0.816210102
## [166,] -1.574405150 0.77181785 0.72186663 -0.930615381 0.064249745
## [167,] -0.443436275 0.58193702 1.75193535 -0.273629551 -0.568844104
## [168,] -0.416907945 0.48428709 -0.63955217 1.014777716 -0.060831376
## [169,] 1.369452023 0.38806880 0.02901107 -0.249081097 1.246388825
## [170,] -0.841203055 -0.17423390 0.11385954 0.295478566 -1.999699389
## [171,] 1.266515701 1.04241454 -0.12445019 -0.462934435 1.187770968
## [172,] 0.958390288 1.09581932 -0.60603104 -0.838625356 -1.828224249
## [173,] 0.275331958 -1.39432214 1.15543190 0.020933953 -0.299523809
## [174,] -1.304445427 -0.70557199 -2.34559754 -1.880933838 0.828448954
## [175,] -1.512786956 -0.09057302 -0.04406826 0.166203000 -0.150662115
## [176,] -0.367702423 0.79104026 1.22665307 -1.628652593 -0.005482783
## [177,] 0.532893020 -0.53188456 1.13923303 3.289787079 -0.631972408
## [178,] -1.780325162 -0.86079831 -0.26784422 0.891530417 -0.555479306
## [179,] -0.166951676 1.66271031 0.61379428 -1.773724723 -0.056624062
## [180,] 1.987921396 -0.80864502 -1.94182133 0.781808454 0.014914693
## [181,] 0.360362584 0.70111545 -1.18053766 0.973171616 0.581189979
## [182,] -0.499525759 0.59896755 -0.24113982 0.336015248 -0.406010382
## [183,] -1.498433331 -0.37678544 0.15441921 0.417299656 -1.603641681
## [184,] -0.562845831 0.87203526 0.33427304 -0.261167127 1.265040762
## [185,] 0.332168945 -0.03411607 -0.10930311 0.541250960 -0.404019238
## [186,] 0.126076092 -0.55478070 -1.77713429 0.428373291 -0.442500420
## [187,] -0.331408243 0.10062822 -0.56811582 0.904157241 -0.772162228
## [188,] 0.024483676 0.45599323 -1.45499732 -1.219884224 -0.685919771
## [189,] -0.493795505 2.30620450 0.55732282 0.135573736 0.875242835
## [190,] -0.677472139 0.46919472 0.52958004 -0.396427758 -0.140128163
## [191,] -0.358006865 0.54568378 -0.72586886 0.498403992 -0.545466508
## [192,] 1.044949190 -1.08767947 1.98077485 0.937090198 -1.430972969
## [193,] 0.913766287 -1.15662080 1.99390502 -0.551381753 -0.044276092
## [194,] -0.812079297 -0.48722203 -1.03663818 -1.179698933 -1.584698277
## [195,] -0.120187813 1.04914374 0.27287413 -0.486070069 0.130688848
## [196,] 1.332279261 1.89059570 -0.28807161 -0.710926532 -1.020090812
## [197,] 0.404530235 -0.61540093 1.67727477 -0.438818732 -0.249558679
## [198,] -0.639071082 -2.16282843 1.22484860 0.770510194 0.689480438
## [199,] 1.897545903 -0.09765963 -1.21421292 -0.076610665 -1.494448116
## [200,] -0.153797277 -0.65979437 0.20350938 -0.560309904 0.947876710
## RC5
## [1,] 0.18450606
## [2,] -1.21332546
## [3,] 0.88046683
## [4,] 0.49093050
## [5,] 0.48789498
## [6,] 0.56793420
## [7,] -0.52900120
## [8,] 0.42154716
## [9,] -1.17394391
## [10,] 3.34970341
## [11,] -0.23608932
## [12,] -0.76244539
## [13,] 0.41267501
## [14,] -0.21688449
## [15,] -2.50215158
## [16,] -1.72856464
## [17,] -1.24685526
## [18,] 0.67456599
## [19,] 0.01617382
## [20,] 0.24508923
## [21,] 1.00380132
## [22,] 0.51191458
## [23,] -0.34468581
## [24,] 0.65055110
## [25,] 0.83599140
## [26,] -0.53269239
## [27,] -0.82956540
## [28,] 1.08045389
## [29,] 1.24080116
## [30,] 1.51713338
## [31,] -0.17173407
## [32,] -0.22286824
## [33,] 0.78600738
## [34,] 1.00285654
## [35,] -1.18796629
## [36,] 0.05708163
## [37,] -0.24445621
## [38,] 1.33531188
## [39,] -0.68416562
## [40,] 0.48238834
## [41,] 0.63028353
## [42,] -1.78112436
## [43,] 0.42271600
## [44,] 0.77882093
## [45,] -0.45699243
## [46,] 1.17971801
## [47,] -0.03157979
## [48,] 0.11300140
## [49,] 1.45972536
## [50,] 0.35284137
## [51,] -0.78385186
## [52,] 1.34464849
## [53,] -0.45639551
## [54,] -1.83422715
## [55,] -1.35572915
## [56,] 1.29851585
## [57,] -1.40775848
## [58,] -0.08509117
## [59,] -0.56898764
## [60,] -0.45524301
## [61,] -0.27244546
## [62,] 0.50486675
## [63,] -2.17121305
## [64,] 1.05836764
## [65,] -0.72818121
## [66,] -0.65424004
## [67,] -0.22574058
## [68,] -1.35842404
## [69,] 0.60651112
## [70,] 0.17999082
## [71,] -0.49777078
## [72,] -0.23714411
## [73,] -0.50334948
## [74,] -0.70732947
## [75,] -0.44328299
## [76,] -1.68142971
## [77,] 0.21419820
## [78,] -1.75142751
## [79,] 0.84075289
## [80,] -1.10680647
## [81,] -0.03041947
## [82,] -0.71265039
## [83,] 0.20084083
## [84,] -1.58422448
## [85,] -1.42056561
## [86,] 1.53607711
## [87,] 1.64723159
## [88,] -0.07293742
## [89,] -0.10097355
## [90,] 1.07972036
## [91,] -1.18928304
## [92,] -0.98652962
## [93,] 0.63976145
## [94,] 0.70976302
## [95,] 1.12215043
## [96,] -0.57291764
## [97,] 0.09714357
## [98,] -0.09665338
## [99,] -0.90542168
## [100,] 0.38917576
## [101,] -0.40921235
## [102,] 0.81316497
## [103,] -1.28430964
## [104,] -0.75364877
## [105,] -0.91420749
## [106,] 1.89361193
## [107,] 0.14265574
## [108,] 0.41664273
## [109,] 0.84792265
## [110,] 0.27643566
## [111,] -0.15100376
## [112,] 1.49860009
## [113,] -0.42632878
## [114,] -1.10126070
## [115,] 0.18891519
## [116,] -1.97844085
## [117,] -0.58803890
## [118,] 0.13291022
## [119,] 0.63204044
## [120,] -1.00743377
## [121,] -2.22885052
## [122,] 0.16788370
## [123,] 0.09447279
## [124,] -0.58771803
## [125,] -1.34310504
## [126,] -0.96682231
## [127,] -0.46903127
## [128,] 0.44576335
## [129,] 0.28450761
## [130,] 0.31327082
## [131,] 0.91555065
## [132,] 0.43083091
## [133,] -0.34636574
## [134,] -0.66481246
## [135,] 1.67750468
## [136,] 0.63554845
## [137,] 1.41164321
## [138,] 2.07601253
## [139,] 1.36428590
## [140,] -0.86850241
## [141,] 2.20810646
## [142,] -0.17086796
## [143,] -0.31430454
## [144,] 0.78676931
## [145,] 0.77052423
## [146,] -0.09942650
## [147,] -0.27686970
## [148,] 0.74491319
## [149,] 2.00059055
## [150,] -0.42466513
## [151,] -0.07086902
## [152,] -0.83659784
## [153,] -0.29654627
## [154,] 0.48158246
## [155,] 1.04204742
## [156,] 1.55546856
## [157,] -0.49446136
## [158,] 0.58490937
## [159,] -0.21264804
## [160,] -0.25088131
## [161,] -2.64103639
## [162,] -0.70074005
## [163,] 0.15986564
## [164,] 1.66123902
## [165,] 2.25539458
## [166,] -0.58252615
## [167,] -0.50673962
## [168,] -0.92631826
## [169,] 0.61055724
## [170,] 1.01097423
## [171,] 0.55777114
## [172,] -0.85802724
## [173,] -0.61581291
## [174,] -0.83589532
## [175,] -0.13304706
## [176,] 0.66250589
## [177,] 0.62481638
## [178,] -0.35789982
## [179,] -0.87637655
## [180,] 1.82040776
## [181,] 0.53504259
## [182,] 1.26812290
## [183,] -0.47238575
## [184,] 1.11810978
## [185,] 1.31059584
## [186,] 0.10947770
## [187,] 1.02619920
## [188,] 0.62663289
## [189,] -0.21015861
## [190,] -0.51013437
## [191,] -0.32891441
## [192,] -0.08255375
## [193,] 0.19166064
## [194,] -0.96087132
## [195,] -0.67274474
## [196,] -2.42308327
## [197,] 0.40197792
## [198,] -1.82406267
## [199,] 0.48995249
## [200,] -0.80669620