##  CURRENT_A_CALC    CURRENT_B_CALC     CURRENT_C_CALC     CURRENT_D_CALC    
##  Min.   :-1.1972   Min.   :-1.27996   Min.   :-1.28566   Min.   :-1.28588  
##  1st Qu.:-0.9188   1st Qu.:-0.95752   1st Qu.:-0.95102   1st Qu.:-0.95490  
##  Median :-0.2182   Median :-0.01771   Median :-0.01696   Median :-0.01529  
##  Mean   : 0.0000   Mean   : 0.00000   Mean   : 0.00000   Mean   : 0.00000  
##  3rd Qu.: 0.7160   3rd Qu.: 0.75540   3rd Qu.: 0.76080   3rd Qu.: 0.75331  
##  Max.   : 8.2160   Max.   : 3.75438   Max.   : 3.68800   Max.   : 3.39560  
##     POWER_A           POWER_B             POWER_C             POWER_D         
##  Min.   :-1.1384   Min.   :-1.270003   Min.   :-1.275933   Min.   :-1.278024  
##  1st Qu.:-0.8423   1st Qu.:-0.953846   1st Qu.:-0.958260   1st Qu.:-0.960437  
##  Median :-0.2501   Median :-0.005374   Median :-0.005242   Median :-0.007675  
##  Mean   : 0.0000   Mean   : 0.000000   Mean   : 0.000000   Mean   : 0.000000  
##  3rd Qu.: 0.6381   3rd Qu.: 0.767454   3rd Qu.: 0.771291   3rd Qu.: 0.768649  
##  Max.   : 7.1521   Max.   : 3.718254   Max.   : 3.665643   Max.   : 3.379921  
##  TEMPERATURE_A     TEMPERATURE_B     TEMPERATURE_C     TEMPERATURE_D    
##  Min.   :-1.7978   Min.   :-1.9345   Min.   :-1.8118   Min.   :-1.8093  
##  1st Qu.:-0.6606   1st Qu.:-0.6581   1st Qu.:-0.6605   1st Qu.:-0.6605  
##  Median :-0.1119   Median :-0.1185   Median :-0.1155   Median :-0.1150  
##  Mean   : 0.0000   Mean   : 0.0000   Mean   : 0.0000   Mean   : 0.0000  
##  3rd Qu.: 0.4671   3rd Qu.: 0.4685   3rd Qu.: 0.4684   3rd Qu.: 0.4659  
##  Max.   : 3.2261   Max.   : 2.8645   Max.   : 2.8986   Max.   : 2.8908  
##    VOLTAGE_A         VOLTAGE_B          VOLTAGE_C          VOLTAGE_D       
##  Min.   :-1.8444   Min.   :-3.14323   Min.   :-2.10733   Min.   :-2.19643  
##  1st Qu.:-0.8718   1st Qu.:-0.86869   1st Qu.:-0.87167   1st Qu.:-0.87567  
##  Median : 0.0502   Median : 0.05412   Median : 0.05671   Median : 0.05471  
##  Mean   : 0.0000   Mean   : 0.00000   Mean   : 0.00000   Mean   : 0.00000  
##  3rd Qu.: 0.7314   3rd Qu.: 0.73649   3rd Qu.: 0.73665   3rd Qu.: 0.73135  
##  Max.   : 2.1191   Max.   : 2.12070   Max.   : 2.12269   Max.   : 2.12368

Procedemos con los Clúster

Comenzamos haciendo un estudio PCA

Uno de los temas clásicos de la estadistica multivariada es el análisis de componentes principales (ACP), creado por Lebart y Marinoe.

El objeto del ACP es de observar que tan correlacionadas están las variables, disminuyendo un conjunto p-dimensiones a uno de 2D y mirar que dimensiones del modelo concentran la mayor variabilidad. Ademas PCA tiene como objetivo reducir el número de dimensiones(componente de la varianza)

Matriz de correlaciones

## [1] "La matriz de correlaciones de las variables puras"
##                CURRENT_A_CALC CURRENT_B_CALC CURRENT_C_CALC CURRENT_D_CALC
## CURRENT_A_CALC     1.00000000      0.7766685      0.7640501      0.7482858
## CURRENT_B_CALC     0.77666849      1.0000000      0.9473651      0.9325967
## CURRENT_C_CALC     0.76405012      0.9473651      1.0000000      0.9449309
## CURRENT_D_CALC     0.74828576      0.9325967      0.9449309      1.0000000
## POWER_A            0.99145316      0.7993456      0.7868023      0.7707034
## POWER_B            0.77744994      0.9909449      0.9498474      0.9349877
## POWER_C            0.76514380      0.9471888      0.9849482      0.9463947
## POWER_D            0.74610330      0.9318261      0.9432785      0.9807189
## TEMPERATURE_A      0.08946585      0.3754819      0.3759531      0.3769793
## TEMPERATURE_B      0.09003897      0.3772876      0.3773814      0.3788208
## TEMPERATURE_C      0.09291300      0.3793650      0.3792751      0.3808450
## TEMPERATURE_D      0.09231414      0.3789366      0.3790925      0.3806705
## VOLTAGE_A         -0.29473300     -0.5329628     -0.5255992     -0.5180733
## VOLTAGE_B         -0.28800254     -0.5363715     -0.5305330     -0.5237771
## VOLTAGE_C         -0.28108284     -0.5307386     -0.5317425     -0.5265501
## VOLTAGE_D         -0.27482030     -0.5258839     -0.5271206     -0.5285804
##                   POWER_A    POWER_B    POWER_C    POWER_D TEMPERATURE_A
## CURRENT_A_CALC  0.9914532  0.7774499  0.7651438  0.7461033    0.08946585
## CURRENT_B_CALC  0.7993456  0.9909449  0.9471888  0.9318261    0.37548192
## CURRENT_C_CALC  0.7868023  0.9498474  0.9849482  0.9432785    0.37595308
## CURRENT_D_CALC  0.7707034  0.9349877  0.9463947  0.9807189    0.37697926
## POWER_A         1.0000000  0.8002005  0.7878694  0.7688621    0.15155859
## POWER_B         0.8002005  1.0000000  0.9505846  0.9349951    0.37225822
## POWER_C         0.7878694  0.9505846  1.0000000  0.9451010    0.37423258
## POWER_D         0.7688621  0.9349951  0.9451010  1.0000000    0.37787744
## TEMPERATURE_A   0.1515586  0.3722582  0.3742326  0.3778774    1.00000000
## TEMPERATURE_B   0.1522648  0.3741073  0.3758417  0.3797653    0.99520013
## TEMPERATURE_C   0.1550452  0.3761493  0.3776590  0.3815350    0.99525790
## TEMPERATURE_D   0.1544007  0.3756090  0.3774791  0.3813937    0.99381647
## VOLTAGE_A      -0.3615224 -0.5321161 -0.5259983 -0.5195669   -0.80656393
## VOLTAGE_B      -0.3546692 -0.5360463 -0.5309988 -0.5253289   -0.80651697
## VOLTAGE_C      -0.3477342 -0.5306513 -0.5321899 -0.5279423   -0.80742945
## VOLTAGE_D      -0.3415249 -0.5250794 -0.5278612 -0.5300528   -0.80745300
##                TEMPERATURE_B TEMPERATURE_C TEMPERATURE_D  VOLTAGE_A  VOLTAGE_B
## CURRENT_A_CALC    0.09003897     0.0929130    0.09231414 -0.2947330 -0.2880025
## CURRENT_B_CALC    0.37728760     0.3793650    0.37893657 -0.5329628 -0.5363715
## CURRENT_C_CALC    0.37738137     0.3792751    0.37909254 -0.5255992 -0.5305330
## CURRENT_D_CALC    0.37882078     0.3808450    0.38067054 -0.5180733 -0.5237771
## POWER_A           0.15226481     0.1550452    0.15440067 -0.3615224 -0.3546692
## POWER_B           0.37410726     0.3761493    0.37560898 -0.5321161 -0.5360463
## POWER_C           0.37584170     0.3776590    0.37747906 -0.5259983 -0.5309988
## POWER_D           0.37976533     0.3815350    0.38139372 -0.5195669 -0.5253289
## TEMPERATURE_A     0.99520013     0.9952579    0.99381647 -0.8065639 -0.8065170
## TEMPERATURE_B     1.00000000     0.9943558    0.99351183 -0.8065210 -0.8066188
## TEMPERATURE_C     0.99435582     1.0000000    0.99354444 -0.8065614 -0.8065193
## TEMPERATURE_D     0.99351183     0.9935444    1.00000000 -0.8055157 -0.8054690
## VOLTAGE_A        -0.80652097    -0.8065614   -0.80551570  1.0000000  0.9963806
## VOLTAGE_B        -0.80661880    -0.8065193   -0.80546905  0.9963806  1.0000000
## VOLTAGE_C        -0.80748571    -0.8074522   -0.80639472  0.9938600  0.9954345
## VOLTAGE_D        -0.80745847    -0.8076031   -0.80653473  0.9907834  0.9927473
##                 VOLTAGE_C  VOLTAGE_D
## CURRENT_A_CALC -0.2810828 -0.2748203
## CURRENT_B_CALC -0.5307386 -0.5258839
## CURRENT_C_CALC -0.5317425 -0.5271206
## CURRENT_D_CALC -0.5265501 -0.5285804
## POWER_A        -0.3477342 -0.3415249
## POWER_B        -0.5306513 -0.5250794
## POWER_C        -0.5321899 -0.5278612
## POWER_D        -0.5279423 -0.5300528
## TEMPERATURE_A  -0.8074295 -0.8074530
## TEMPERATURE_B  -0.8074857 -0.8074585
## TEMPERATURE_C  -0.8074522 -0.8076031
## TEMPERATURE_D  -0.8063947 -0.8065347
## VOLTAGE_A       0.9938600  0.9907834
## VOLTAGE_B       0.9954345  0.9927473
## VOLTAGE_C       1.0000000  0.9938317
## VOLTAGE_D       0.9938317  1.0000000

PCA

## [1] "Cálculo del PCA"
## Standard deviations (1, .., p=16):
##  [1] 3.22732683 2.02943144 0.83246589 0.70017061 0.34244039 0.28771807
##  [7] 0.13886926 0.12268412 0.09526871 0.08873330 0.08380961 0.07762887
## [13] 0.07507910 0.06973460 0.06681253 0.05642992
## 
## Rotation (n x k) = (16 x 16):
##                       PC1        PC2         PC3         PC4           PC5
## CURRENT_A_CALC  0.1911609  0.3235640  0.14920454 -0.58793210  0.0560112114
## CURRENT_B_CALC  0.2639734  0.2283853 -0.09651663  0.13829241 -0.5096636069
## CURRENT_C_CALC  0.2637374  0.2280377 -0.11472536  0.18399694 -0.0494046681
## CURRENT_D_CALC  0.2619977  0.2242631 -0.13204298  0.21398597  0.4890265928
## POWER_A         0.2070443  0.3007080  0.16304247 -0.57001968  0.0500324505
## POWER_B         0.2639493  0.2301592 -0.09375778  0.14492454 -0.4860461023
## POWER_C         0.2637823  0.2287781 -0.11104756  0.18554491 -0.0347389308
## POWER_D         0.2620519  0.2232351 -0.13057545  0.21755027  0.4924217823
## TEMPERATURE_A   0.2339734 -0.2938879 -0.29042295 -0.15690673 -0.0000679113
## TEMPERATURE_B   0.2342373 -0.2931361 -0.29126996 -0.15413576 -0.0004915009
## TEMPERATURE_C   0.2346428 -0.2920736 -0.29190344 -0.15660286 -0.0007808558
## TEMPERATURE_D   0.2344176 -0.2918956 -0.29320828 -0.15568894  0.0014499926
## VOLTAGE_A      -0.2669310  0.1944222 -0.37309403 -0.05438339  0.0501830205
## VOLTAGE_B      -0.2674872  0.1940345 -0.36705564 -0.08229934  0.0408501094
## VOLTAGE_C      -0.2671840  0.1954656 -0.36167261 -0.09769661 -0.0259226287
## VOLTAGE_D      -0.2664171  0.1970138 -0.35773169 -0.10709420 -0.0906964698
##                          PC6          PC7           PC8          PC9
## CURRENT_A_CALC -0.0054239943  0.004001356  2.735884e-04  0.030763712
## CURRENT_B_CALC  0.3247742430  0.033100657  4.605923e-02  0.671487968
## CURRENT_C_CALC -0.5811739080  0.020786977  6.989614e-01 -0.035558947
## CURRENT_D_CALC  0.2580734982  0.711433522 -2.351414e-02 -0.042880641
## POWER_A        -0.0061901169 -0.006872584  3.018959e-04 -0.025112692
## POWER_B         0.2995200466 -0.025260291 -5.220168e-02 -0.666804799
## POWER_C        -0.5655986574 -0.039173732 -7.101179e-01  0.057126575
## POWER_D         0.2811657205 -0.699904518  4.062151e-02  0.012780236
## TEMPERATURE_A  -0.0059216775 -0.004880580  5.170901e-03 -0.012049456
## TEMPERATURE_B  -0.0008338671 -0.007680901 -6.731291e-03 -0.023568505
## TEMPERATURE_C   0.0010634064  0.005548448 -1.648619e-03 -0.003061206
## TEMPERATURE_D  -0.0010644180  0.004681214 -1.580413e-03  0.034790558
## VOLTAGE_A      -0.0143305974  0.003103981 -5.123663e-03  0.108441476
## VOLTAGE_B      -0.0108541726  0.004081393 -3.980552e-06  0.105371856
## VOLTAGE_C       0.0316568339 -0.003164729 -3.515384e-03  0.044828575
## VOLTAGE_D      -0.0075690493 -0.007779937  4.460972e-03 -0.263771582
##                        PC10         PC11          PC12          PC13
## CURRENT_A_CALC  0.078107167  0.023861011 -0.6854810927  0.0050737835
## CURRENT_B_CALC -0.157267626  0.028643280  0.0013607518 -0.0067424074
## CURRENT_C_CALC  0.010832909 -0.002128070  0.0030243657 -0.0007444604
## CURRENT_D_CALC -0.058874655  0.003928265  0.0006887242 -0.0027708432
## POWER_A        -0.046688540 -0.023685250  0.7028371954 -0.0108642328
## POWER_B         0.264752316 -0.028357761  0.0002884904 -0.0008943671
## POWER_C        -0.028571180  0.002121509  0.0009353809  0.0053598989
## POWER_D        -0.061029651 -0.001988605 -0.0090370308  0.0091107224
## TEMPERATURE_A  -0.005884863  0.287733132 -0.0312565133  0.0296529332
## TEMPERATURE_B  -0.030371012  0.290304797  0.0204519096 -0.7181596220
## TEMPERATURE_C   0.042358396  0.287449188  0.0332206134  0.6903607622
## TEMPERATURE_D   0.003528371 -0.864326931 -0.0326146367 -0.0034738505
## VOLTAGE_A       0.509972229  0.017544606 -0.0226858441 -0.0658620648
## VOLTAGE_B       0.266861879 -0.001706198  0.0564772622  0.0010411886
## VOLTAGE_C      -0.035560399 -0.012057846  0.1241019315  0.0395768209
## VOLTAGE_D      -0.743944121 -0.002284651 -0.1156428013  0.0232849834
##                         PC14         PC15          PC16
## CURRENT_A_CALC -0.0910331294 -0.036515966 -0.0225385592
## CURRENT_B_CALC  0.0678308115  0.003323068  0.0125109056
## CURRENT_C_CALC -0.0277809010 -0.008488094  0.0012742400
## CURRENT_D_CALC -0.0062229610  0.003425264  0.0044041079
## POWER_A         0.1110737090  0.037496276  0.0374192700
## POWER_B        -0.0359861543  0.004812353 -0.0374438657
## POWER_C        -0.0171014935  0.001921719  0.0005610257
## POWER_D         0.0004417061 -0.001986173  0.0025041172
## TEMPERATURE_A  -0.0419513201  0.814320628  0.0114478801
## TEMPERATURE_B  -0.0237396058 -0.383725325 -0.0277104731
## TEMPERATURE_C   0.0555143090 -0.429539816  0.0122464085
## TEMPERATURE_D   0.0131144729 -0.001864782  0.0085138210
## VOLTAGE_A       0.4044815238  0.016963033  0.5524011188
## VOLTAGE_B       0.1127807980  0.023418590 -0.8054283748
## VOLTAGE_C      -0.8299049207 -0.037768343  0.1944271202
## VOLTAGE_D       0.3189547294  0.001109477  0.0609958074
## [1] "solicito las tablas"
## Principal Component Analysis Results for variables
##  ===================================================
##   Name       Description                                    
## 1 "$coord"   "Coordinates for the variables"                
## 2 "$cor"     "Correlations between variables and dimensions"
## 3 "$cos2"    "Cos2 for the variables"                       
## 4 "$contrib" "contributions of the variables"
##          eigenvalue variance.percent cumulative.variance.percent
## Dim.1  10.415638453      65.09774033                    65.09774
## Dim.2   4.118591987      25.74119992                    90.83894
## Dim.3   0.692999455       4.33124659                    95.17019
## Dim.4   0.490238882       3.06399301                    98.23418
## Dim.5   0.117265417       0.73290886                    98.96709
## Dim.6   0.082781688       0.51738555                    99.48447
## Dim.7   0.019284671       0.12052919                    99.60500
## Dim.8   0.015051392       0.09407120                    99.69907
## Dim.9   0.009076127       0.05672579                    99.75580
## Dim.10  0.007873599       0.04920999                    99.80501
## Dim.11  0.007024052       0.04390032                    99.84891
## Dim.12  0.006026241       0.03766400                    99.88657
## Dim.13  0.005636871       0.03523044                    99.92181
## Dim.14  0.004862915       0.03039322                    99.95220
## Dim.15  0.004463915       0.02789947                    99.98010
## Dim.16  0.003184336       0.01990210                   100.00000
## [1] "las gráficas"

## [1] "Cálculo de los componentes"

Gráficamos clúster con k-means