Índice


1 Lectura de la base de datos

(volver al índice)

xlsx_example <- read_xlsx("Prueba_pearson_abril.xlsx")
xlsx_example_show <- xlsx_example[1:100,]
xlsx_example_show %>%  kbl() %>% kable_material(c("striped", "hover"), font_size = 12)%>% scroll_box(width = "100%", height = "400px")
SOC NDVI EVI SAVI IBI BSI GNDVI NDFI NIRv Bblue Bgreen Bred NIR Swir1 Swir2 Elev slope Aspect TWI Temp Precip HR
197.61894 0.6640141 1.879693 0.9958745 -0.1126705 -0.0979599 0.6200861 0.5541623 1648.6719 433 662 570 2823 2105 1118 112.9709679 11.2032995 327.072028 9.144974 30.85462 3.608097 70.36842
153.69270 0.7750302 2.202606 1.1623700 -0.2323172 -0.2392591 0.6875000 0.8864557 2045.4738 302 545 373 2943 1619 716 459.9029039 17.6230354 320.015286 7.286290 27.95747 3.979765 81.70479
103.36890 0.7313249 2.058671 1.0968188 -0.1363925 -0.1275456 0.6511287 0.6495487 1834.1310 340 595 437 2816 2005 971 128.3579800 5.8304653 286.109808 8.421191 33.38864 3.590635 73.19187
76.98600 0.6717914 2.245308 1.0075188 -0.1302490 -0.1181523 0.5955343 0.6242181 1480.0704 428 634 491 2501 1819 934 115.9925653 2.3158376 292.757044 9.347432 31.92122 2.759803 79.31818
114.86160 0.7236299 2.091993 1.0852851 -0.1849498 -0.1841350 0.6628766 0.7693315 1882.6176 374 593 469 2925 1804 879 230.2200680 9.6569643 325.439946 7.910536 32.88904 1.989459 77.69904
126.75000 0.6246702 1.575445 0.9368508 -0.0846947 -0.0615442 0.6108568 0.5268579 1341.5227 383 595 569 2463 1947 1005 185.2025030 6.1309800 145.318111 9.469178 29.79773 1.916768 77.69904
374.00340 0.8394805 2.413021 1.2590573 -0.2903875 -0.3293830 0.7727159 0.9945621 2689.3205 273 454 309 3541 1615 647 350.4440999 11.3047590 11.399294 8.848040 29.02166 1.714890 69.10048
67.44060 0.5756372 1.516393 0.8633129 -0.0429058 -0.0074813 0.5469613 0.3396102 1179.6166 448 697 641 2380 2145 1167 245.8672713 6.3985529 346.382359 8.327507 30.84087 3.666748 70.83206
50.12700 0.8567104 2.858586 1.2849035 -0.3285313 -0.3689071 0.7519638 1.0000000 2858.2942 322 521 284 3680 1561 578 108.8953877 3.1563003 61.877860 10.423629 30.15273 2.135990 73.46938
126.73500 0.8603336 2.731107 1.2903180 -0.3286052 -0.3795111 0.7895023 1.0000000 2567.2976 265 387 247 3290 1352 526 953.2750475 4.5108271 3.795600 8.679198 24.35919 2.828359 70.73349
96.54864 0.8337818 2.509448 1.2504858 -0.2549092 -0.3012708 0.7883382 0.9678939 2311.8487 261 363 278 3067 1509 637 258.1505697 23.6206932 21.515638 8.758372 27.08099 2.093172 73.46938
37.75980 0.5546903 1.673430 0.8318881 -0.0573227 -0.0309675 0.5351276 0.4143516 1042.4198 484 665 629 2196 1890 1057 114.8216908 2.0959888 210.957949 9.447276 33.87967 1.862672 68.66364
183.29160 0.6786667 2.320492 1.0178304 -0.1609266 -0.1568204 0.6187721 0.7479965 1507.4427 429 593 482 2518 1666 809 204.9328120 9.6900158 333.720887 7.907053 31.36106 1.347016 68.22488
154.25046 0.7616901 2.290749 1.1423743 -0.2094941 -0.2171638 0.6816348 0.8238150 2131.6451 362 592 423 3127 1821 857 617.8827597 22.2022820 169.198217 7.035668 28.34826 2.199509 76.35933
135.58515 0.6717557 1.865015 1.0074857 -0.0960855 -0.0802316 0.6273221 0.5077836 1684.7285 418 652 559 2847 2221 1169 562.1875420 17.2121696 201.210261 13.005131 30.05673 4.227437 74.54067
118.50336 0.7522909 2.265041 1.1282696 -0.2464346 -0.2462462 0.6572547 0.9052014 1992.6701 356 613 419 2964 1589 751 731.6689502 17.8711739 312.632113 7.271372 30.16924 3.126918 69.33254
236.16438 0.5675171 1.974026 0.8511432 -0.0172571 0.0006441 0.5573416 0.1825518 1228.0556 584 716 695 2519 2412 1484 370.6332909 0.8996376 213.784846 16.904125 32.66268 2.897673 69.23445
362.87280 0.7859873 2.564422 1.1787932 -0.2086252 -0.2321640 0.7181373 0.8661286 1979.5883 322 460 336 2804 1612 669 226.7617489 12.6237917 160.116552 7.635797 29.38732 3.467204 79.31818
92.59062 0.6441103 1.955860 0.9660141 -0.0980207 -0.0798106 0.5907851 0.4889467 1480.2254 454 675 568 2624 2055 1232 386.4273968 17.4212303 299.113373 7.298559 29.09018 3.554900 79.31818
564.76251 0.8180662 2.544016 1.2269042 -0.2992122 -0.3252910 0.7289776 1.0000000 2109.3931 273 448 286 2858 1308 513 226.0260541 11.7186737 37.502439 9.791924 28.90311 3.432520 79.31818
286.70430 0.7358491 2.266517 1.1035910 -0.1668381 -0.1717731 0.6727273 0.7602147 1719.6362 342 513 399 2622 1696 777 169.8279576 17.1103611 108.704707 8.010849 30.80715 2.314142 79.31818
210.36444 0.7162904 2.063994 1.0742718 -0.1633632 -0.1563068 0.6435875 0.7139405 1789.8850 368 610 465 2813 1856 900 210.8762854 9.6412973 308.557880 7.912191 30.40339 3.019064 79.31818
508.90932 0.7077882 1.866272 1.0615169 -0.1910229 -0.1817134 0.6531966 0.8035677 1720.7674 335 575 469 2741 1661 778 260.5124154 19.5542088 329.157472 7.174641 31.12841 2.759803 79.31818
281.69046 0.6762335 1.639819 1.0141867 -0.1593625 -0.1376826 0.6284461 0.7265315 1549.6108 322 593 502 2599 1712 806 122.5905753 0.9015555 43.686355 11.900737 30.46339 2.910924 72.43924
253.77780 0.8065094 2.455455 1.2095835 -0.2359455 -0.2617781 0.7315398 0.9207636 2197.6910 296 469 324 3025 1619 639 258.0409606 1.3522235 343.243803 10.578959 30.16459 2.864275 72.43924
297.25635 0.7872801 2.225027 1.1807604 -0.2358696 -0.2460427 0.6972501 0.8884506 2335.4389 319 589 393 3302 1798 779 98.6504615 3.2932243 290.197550 8.994779 30.79310 2.921364 72.17034
231.72120 0.7017231 1.922201 1.0524284 -0.1921694 -0.1791697 0.6319088 0.8045969 1780.6150 374 646 502 2864 1752 794 76.0675739 0.7260358 243.262701 14.533202 31.79074 1.665149 77.69904
547.77114 0.8097517 2.486680 1.2144459 -0.2781289 -0.3040063 0.7305492 0.9862896 2207.4990 295 471 318 3025 1454 572 7.6097649 1.3504326 330.806169 9.887137 0.00000 2.773143 77.69904
301.54452 0.6526764 1.810054 0.9788657 -0.1082883 -0.0921419 0.6172619 0.5618974 1555.9618 424 643 571 2717 2040 1025 70.9212269 3.3414605 61.020406 8.980205 29.53063 1.866200 74.11962
324.51300 0.8622646 2.585060 1.2932302 -0.3766927 -0.4167124 0.7743918 1.0000000 2823.9753 264 459 267 3610 1328 481 7.9089295 0.6983666 322.068653 11.239857 28.27585 1.975179 71.73924
196.14600 0.8295042 2.356174 1.2440683 -0.2783988 -0.3099439 0.7547115 0.9861020 2267.9998 241 423 282 3026 1439 542 178.2686324 4.0644846 5.570819 8.783781 29.42068 2.028104 77.01579
329.70300 0.8248799 2.199601 1.2371547 -0.2847887 -0.3107022 0.7501280 0.9859480 2545.9994 250 488 328 3418 1601 612 494.0556587 1.8543341 36.608331 9.569873 28.20475 1.860933 77.01579
308.65500 0.6793378 1.596312 1.0188506 -0.1596132 -0.1407269 0.6465284 0.7287619 1641.5863 321 588 523 2739 1782 829 259.1472890 3.1470053 198.593874 9.040290 30.37033 1.417632 62.47034
439.69800 0.7220614 2.029292 1.0829353 -0.1601440 -0.1546427 0.6549805 0.7039029 1909.4905 371 620 480 2974 1969 929 119.1041201 3.5337293 350.512544 13.113780 32.46235 3.666748 70.83206
135.65970 0.7635743 2.292288 1.1451838 -0.2241440 -0.2317263 0.6811594 0.8907958 1942.7182 326 539 381 2842 1595 661 50.3685175 2.6205983 48.982429 9.916794 30.89943 4.501689 70.83206
349.27200 0.6559356 2.242605 0.9837385 -0.1114441 -0.0994725 0.5913632 0.5631296 1421.9850 449 634 513 2469 1877 1009 708.9509361 20.5901356 328.866459 8.504836 27.20748 3.832259 75.51388
256.90500 0.7970921 2.341940 1.1954449 -0.2520484 -0.2687591 0.7098063 0.9499024 1994.2331 271 472 314 2781 1445 574 100.4267454 6.0419388 205.022487 8.385306 28.45761 2.333751 70.73349
371.54700 0.7111504 2.226285 1.0665369 -0.1676087 -0.1654373 0.6436586 0.7550265 1525.4906 348 524 408 2417 1572 774 699.3248815 12.8511896 359.612654 9.226780 27.30622 4.299838 75.51388
293.21940 0.8384522 2.737682 1.2575263 -0.2607038 -0.3045390 0.7683182 0.9551504 2882.8770 352 498 334 3801 1880 788 118.2501596 3.7425191 187.512167 9.559712 32.75868 1.780820 73.46938
499.45506 0.6874388 2.023238 1.0309900 -0.1485171 -0.1415929 0.6382642 0.7049034 1570.8368 381 571 479 2586 1752 823 103.5976102 1.8735234 94.468991 9.559570 30.35076 2.906004 70.73349
362.89440 0.7629938 2.345547 1.1442924 -0.2361324 -0.2528634 0.7085292 0.9160277 1737.5361 300 434 342 2544 1354 622 503.2929426 26.8960724 175.153385 7.511433 29.13097 1.562046 76.35933
219.51000 0.8197021 2.598575 1.2293925 -0.2944474 -0.3250087 0.7392607 1.0000000 2575.6428 338 522 345 3482 1601 623 416.6079051 22.6073608 148.421338 7.708751 28.27083 1.693463 68.22488
313.72500 0.6532878 1.598635 0.9797922 -0.1916767 -0.1658718 0.6155772 0.8083471 1664.8277 396 691 609 2904 1752 843 438.3526614 18.0606804 52.258094 7.953247 28.01108 1.746906 68.66364
343.34400 0.7848873 2.295491 1.1771516 -0.2413150 -0.2567647 0.7088681 0.9100239 2064.6148 299 499 353 2929 1556 689 643.3918208 10.6516132 154.176278 7.810422 28.04550 2.270637 72.58804
412.03200 0.6913452 2.378617 1.0368376 -0.1353450 -0.1367830 0.6411467 0.6743196 1487.4028 401 532 444 2433 1708 866 345.4299746 10.0830526 244.107093 9.658253 31.10991 1.955941 72.58804
202.64964 0.7941691 2.672160 1.1910800 -0.1897631 -0.2148043 0.7213986 0.8104258 2197.4983 353 498 353 3077 1864 828 656.7197296 18.5871449 14.089184 8.615604 27.19161 2.564608 72.53876
246.11040 0.7196522 2.230968 1.0792905 -0.1752708 -0.1800461 0.6691425 0.7878523 1581.2202 343 490 403 2472 1553 730 367.5856896 2.2592702 180.802369 9.372187 30.94227 2.400997 69.55120
287.96436 0.5081633 1.226198 0.7621153 -0.0239504 0.0193572 0.5091899 0.2574678 949.2380 468 721 723 2217 2068 1224 475.3640920 3.6463795 157.020855 11.783033 32.61406 3.645259 69.23445
186.71700 0.5514981 1.137505 0.8271504 -0.0986610 -0.0447110 0.5339042 0.3648165 1562.5448 518 1007 958 3314 2546 1576 206.2959890 0.4498891 164.225223 10.986481 32.37490 3.189012 69.23445
206.83008 0.6150521 1.679161 0.9224609 -0.1091057 -0.0871151 0.5899875 0.4584866 1699.3255 549 819 757 3176 2371 1431 322.0417517 0.4498915 334.270717 17.296394 32.53236 2.718746 69.23445
304.15200 0.6978833 2.021178 1.0466571 -0.1093999 -0.1038771 0.6569640 0.6073224 1635.5370 371 548 471 2647 1979 929 405.4549988 2.0974550 176.637244 10.545188 31.57093 3.638691 69.23445
268.41000 0.7697253 2.328501 1.1544193 -0.2228060 -0.2371513 0.7016016 0.8737684 2088.4882 342 531 394 3028 1684 741 14.9666604 1.6560603 121.700266 11.474787 32.29253 2.527772 69.46220
263.72550 0.8688525 2.697842 1.3031362 -0.3524705 -0.4001829 0.7827356 1.0000000 3372.3443 319 521 300 4275 1668 606 2.8511868 0.4502895 146.399497 11.678739 27.74075 5.605688 81.57751
448.07580 0.8635579 2.700270 1.2951504 -0.4596322 -0.4899616 0.7741847 1.0000000 2536.3768 251 412 237 3237 957 307 17.1324271 1.9670380 157.493927 16.538140 29.37934 2.391389 73.49570
133.63980 0.7783607 1.987609 1.1673496 -0.3942902 -0.3837482 0.7024482 1.0000000 1893.9541 234 474 338 2712 974 389 8.3665944 1.5454433 1.076380 15.055499 30.65452 1.945427 71.73924
472.34880 0.7592480 2.234517 1.1386994 -0.3645164 -0.3599832 0.6920385 1.0000000 1970.4985 331 528 397 2901 1124 458 4.2772164 2.2549646 38.660833 12.146686 27.85375 2.313109 77.69904
523.73460 0.6254218 2.012306 0.9378690 -0.3581517 -0.3050076 0.5706522 1.0000000 788.1345 275 395 333 1445 583 260 4.7250291 0.0000000 18.267456 0.000000 27.66554 1.546130 74.11962
296.17200 0.8474381 2.811843 1.2709743 -0.3622851 -0.3997200 0.7569121 1.0000000 2462.7089 291 444 265 3209 1236 461 20.1615957 2.7108533 328.534639 10.576032 26.28073 6.206704 86.55790
196.44300 0.8908409 3.253208 1.3361050 -0.3680897 -0.4317065 0.8009817 1.0000000 3272.5541 335 446 233 4036 1502 496 7.3120941 0.3091606 245.876540 12.460244 27.75025 6.027392 86.55790
257.29800 0.8823874 2.585291 1.3233875 -0.4779444 -0.5113863 0.7842485 1.0000000 2581.2801 201 389 201 3217 904 258 10.6964882 2.9591093 303.412152 9.101970 26.22128 6.160589 81.57751
204.84000 0.8943197 2.635267 1.3412580 -0.4991601 -0.5317861 0.7786046 1.0000000 2335.4689 168 357 160 2868 768 181 3.5847906 0.3091606 86.042224 11.361632 27.86144 3.538299 77.76794
146.88000 0.8643703 2.756798 1.2964159 -0.3589603 -0.4031822 0.7724110 1.0000000 3396.3234 344 556 315 4330 1673 587 8.8469637 1.2364626 205.579041 14.648167 27.54715 5.536363 81.57751
225.82800 0.9134831 2.864189 1.3700323 -0.5139337 -0.5616201 0.8078556 1.0000000 2838.8436 199 362 154 3406 858 233 11.6044256 3.0860858 73.716996 9.059876 0.00000 5.600992 81.57751
121.27800 0.8022814 2.260553 1.2031933 -0.3566543 -0.3641405 0.7081081 1.0000000 1711.8068 213 405 260 2370 944 311 3.9524369 0.4504554 130.199038 10.985223 26.64548 5.849019 77.76794
394.12422 0.8129771 2.849226 1.2192994 -0.4468252 -0.4511884 0.7055655 1.0000000 2437.1489 369 574 343 3325 1054 330 9.3343954 2.5005765 340.869053 9.270591 27.44060 5.197669 85.81436
284.90076 0.8551108 2.510684 1.2824541 -0.3951704 -0.4151387 0.7207732 1.0000000 2173.4107 206 455 219 2804 1025 386 14.7899676 0.9846064 23.840732 10.203162 0.00000 5.470121 73.27034
245.41734 0.8626171 2.699893 1.2937421 -0.4270920 -0.4603633 0.7663527 1.0000000 2567.7667 256 434 242 3281 1065 364 13.9302998 2.7144175 175.267457 10.574716 31.09486 2.667564 73.49570
443.49900 0.7439678 2.322176 1.1157647 -0.4238669 -0.3994280 0.6631511 1.0000000 1727.6443 334 527 382 2602 878 372 5.2904578 1.3135754 40.580339 9.914820 29.30273 1.985693 73.49570
312.12972 0.8374817 2.322371 1.2559927 -0.3977184 -0.4186414 0.7509592 1.0000000 1901.2791 184 357 222 2510 882 301 11.5845954 1.3138016 13.291427 9.914647 27.53159 4.889603 82.57895
368.01030 0.8507079 2.761069 1.2758565 -0.4888128 -0.5046932 0.7515225 1.0000000 2216.5558 250 408 232 2876 797 273 7.9713074 0.4511351 205.637251 10.983716 28.46483 2.426758 73.49570
413.83440 0.8670923 2.565247 1.3004497 -0.4890082 -0.5185348 0.7957019 1.0000000 2532.0759 224 366 229 3217 862 288 10.1593160 0.6183033 316.819678 12.971070 28.25645 2.283921 77.69904
281.05623 0.5712747 1.420029 0.8567582 -0.3357435 -0.2568093 0.5365168 1.0000000 1074.9090 396 660 597 2188 931 390 3.7681431 1.6793184 251.308465 10.767686 29.38309 3.785050 82.57895
404.47692 0.8262880 2.176409 1.2392273 -0.4522517 -0.4539651 0.7346299 1.0000000 2063.4863 196 423 263 2765 849 295 7.5629561 0.4512455 332.798177 12.592909 27.99285 2.121601 72.17034
200.44080 0.6743844 1.638686 1.0113908 -0.4222474 -0.3500132 0.5824939 1.0000000 1354.0077 285 601 443 2278 791 349 4.4569402 0.3091606 219.100623 12.054779 0.00000 1.907025 73.49570
362.61687 0.8746736 2.446843 1.3118201 -0.4928025 -0.5200888 0.7890366 1.0000000 2567.5905 193 381 216 3231 865 281 8.0415215 1.9672916 33.455897 10.896991 28.25882 2.113612 74.11962
437.00349 0.8622715 2.346359 1.2931963 -0.4601934 -0.4867387 0.7842401 1.0000000 2231.8207 174 345 211 2853 834 249 5.5761553 0.9025357 358.055981 13.724199 29.76651 3.096933 74.70192
438.74703 0.7390254 1.984642 1.1083149 -0.3699867 -0.3468127 0.6569455 1.0000000 1422.8358 239 447 324 2159 839 336 4.5211384 0.7002809 10.547262 11.237119 27.91506 2.205819 74.11962
363.58350 0.7993399 2.159800 1.1988121 -0.5033926 -0.4795000 0.7064162 1.0000000 1960.9207 233 469 304 2726 737 266 4.2145415 0.3091606 98.477382 14.945151 26.49048 1.738677 74.11962
59.18400 0.7712975 1.933947 1.1567568 -0.3514557 -0.3404838 0.6835877 1.0000000 1868.5772 234 508 349 2703 1096 491 7.3957909 0.9274099 339.118198 10.263020 30.57980 1.948970 62.47034
57.15600 0.8337978 2.487152 1.2505383 -0.3275373 -0.3567353 0.7440964 1.0000000 2727.9943 304 531 328 3619 1532 575 1.0958891 0.4487907 243.550100 10.988926 0.00000 0.000000 73.75885
102.48600 0.8037691 2.065970 1.2054733 -0.4581052 -0.4388298 0.6852990 1.0000000 2182.1637 231 563 328 3015 938 319 -0.7419201 0.6183033 4.019487 12.460244 28.85156 3.289265 73.75885
499.97646 0.8233145 2.283109 1.2347667 -0.4375511 -0.4382132 0.7124142 1.0000000 2040.3983 217 461 266 2745 891 352 5.0656053 0.0000000 230.738159 0.000000 0.00000 1.872247 69.46220
55.84800 0.8278741 2.963218 1.2416118 -0.4119160 -0.4367161 0.7417381 1.0000000 2128.4497 304 422 268 2846 967 369 8.0220731 2.7938628 165.076375 17.731022 30.10660 3.615145 84.19043
181.29600 0.8291898 2.174080 1.2436029 -0.4407239 -0.4406378 0.7162459 1.0000000 2342.7166 216 517 292 3127 1006 333 4.5142283 1.5454433 223.985014 9.752194 0.00000 3.860292 77.14689
272.70000 0.8740706 2.582018 1.3109536 -0.4029461 -0.4414475 0.7715792 1.0000000 3202.4869 269 520 271 4033 1396 478 4.0376291 1.3493214 12.424092 9.887961 27.16168 5.030078 74.96172
473.30265 0.9288366 2.971689 1.3930395 -0.5231678 -0.5834337 0.8329903 1.0000000 2645.8238 171 284 115 3117 750 179 5.2333648 0.3269915 298.473616 11.998705 26.95375 6.100797 80.49139
309.41100 0.9018325 2.929422 1.3525274 -0.4911735 -0.5457492 0.8270984 1.0000000 2388.2451 194 275 150 2906 761 225 1.8882892 1.1347990 180.190255 10.061161 27.01403 6.655955 78.28804
250.70100 0.8697531 2.499557 1.3044283 -0.4664361 -0.4859512 0.7438112 1.0000000 2392.1621 197 445 211 3029 905 294 5.2762504 1.8303246 150.675709 11.885499 0.00000 7.033825 78.28804
281.04420 0.7814790 2.221170 1.1720233 -0.4168966 -0.3981459 0.6567534 1.0000000 1875.7549 267 554 328 2674 938 380 8.8135277 0.7000855 357.123322 10.544251 30.29451 2.255022 73.49570
195.60501 0.7693935 2.430385 1.1538868 -0.4714156 -0.4441585 0.6660026 1.0000000 1729.6883 297 503 327 2509 753 295 5.4995593 2.0550985 200.015751 9.466995 27.20542 2.426758 73.49570
190.37940 0.6310976 2.024120 0.9464059 -0.3628234 -0.3030096 0.5351506 1.0000000 884.5116 300 486 363 1605 656 300 4.0172362 0.3091606 254.027542 11.361632 30.40030 2.365567 73.49570
244.82040 0.7926371 2.359651 1.1887324 -0.3853391 -0.3906829 0.7134650 1.0000000 1700.3522 241 399 276 2386 875 310 5.1522760 1.2793682 226.005894 12.138440 0.00000 2.313109 77.69904
394.69353 0.7063197 1.981230 1.0592334 -0.3204882 -0.2971286 0.6341789 1.0000000 1149.9230 242 411 316 1836 810 358 4.2300856 4.3200855 352.010593 9.415722 28.31471 2.126319 77.69904
187.11420 0.7621661 1.840756 1.1430401 -0.4026669 -0.3743752 0.6652836 1.0000000 1642.6560 204 484 325 2408 864 349 4.1299579 1.5812916 177.923413 11.115546 29.01519 2.762995 77.69904
370.98600 0.8360886 2.326742 1.2539124 -0.5415790 -0.5305677 0.7388408 1.0000000 1973.3913 194 392 233 2610 627 178 3.3214054 1.0334971 12.266037 12.351916 28.45893 1.546130 73.95024
398.14830 0.5822849 1.451330 0.8732076 -0.3160972 -0.2452830 0.5389134 1.0000000 789.5918 276 471 415 1572 705 347 4.2148294 0.0000000 350.254087 0.000000 28.30890 1.645272 74.11962
82.96320 0.8386323 2.251208 1.2577598 -0.3022645 -0.3321131 0.7574542 0.9995053 2325.2079 210 423 269 3065 1373 546 1285.5512071 25.2054749 352.244109 7.991708 22.21650 3.352576 82.49761
93.32640 0.8103378 1.853472 1.2152594 -0.2370439 -0.2544726 0.7581028 0.9556300 1624.2713 125 306 233 2224 1163 507 1956.0845055 31.6855202 183.384195 6.621980 20.15067 5.485835 72.39426
95.00400 0.8336192 2.640587 1.2501608 -0.2831815 -0.3248155 0.7676726 1.0000000 1611.2379 195 281 194 2138 995 344 1450.0225790 22.5792484 53.932872 7.016988 21.30817 5.485835 76.17081
114.32520 0.8855969 2.685943 1.3282006 -0.3081279 -0.3665935 0.8046042 1.0000000 2589.1886 210 348 195 3214 1392 493 1075.8656010 22.6398087 117.531161 7.014009 24.12282 6.228412 76.17081


2 Cálculo de las correlaciones con Pearson

(volver al índice)

a <- round(cor(xlsx_example,  use="complete.obs", method="pearson"),2)
a %>%  kbl() %>% kable_material(c("striped", "hover"), font_size = 12)%>% scroll_box(width = "100%", height = "400px")
SOC NDVI EVI SAVI IBI BSI GNDVI NDFI NIRv Bblue Bgreen Bred NIR Swir1 Swir2 Elev slope Aspect TWI Temp Precip HR
SOC 1.00 -0.06 -0.04 -0.06 -0.12 -0.07 -0.08 0.00 -0.06 0.05 0.05 0.04 -0.05 -0.09 -0.06 -0.25 -0.19 -0.03 0.03 0.05 -0.30 -0.16
NDVI -0.06 1.00 0.84 1.00 -0.75 -0.87 0.97 0.83 0.79 -0.58 -0.63 -0.88 0.57 -0.40 -0.65 -0.08 0.00 -0.15 0.09 -0.20 0.29 0.37
EVI -0.04 0.84 1.00 0.84 -0.58 -0.71 0.78 0.64 0.73 -0.20 -0.44 -0.71 0.56 -0.23 -0.48 -0.27 -0.11 -0.08 0.16 -0.02 0.25 0.38
SAVI -0.06 1.00 0.84 1.00 -0.75 -0.87 0.97 0.83 0.79 -0.58 -0.63 -0.88 0.57 -0.40 -0.65 -0.08 0.00 -0.15 0.09 -0.20 0.29 0.37
IBI -0.12 -0.75 -0.58 -0.75 1.00 0.98 -0.66 -0.83 -0.52 0.61 0.54 0.76 -0.30 0.74 0.85 0.29 0.26 0.13 -0.18 0.28 -0.10 -0.24
BSI -0.07 -0.87 -0.71 -0.87 0.98 1.00 -0.79 -0.86 -0.64 0.61 0.60 0.83 -0.41 0.67 0.83 0.25 0.21 0.14 -0.17 0.26 -0.16 -0.30
GNDVI -0.08 0.97 0.78 0.97 -0.66 -0.79 1.00 0.75 0.77 -0.59 -0.68 -0.85 0.55 -0.34 -0.59 0.03 0.06 -0.18 0.06 -0.18 0.30 0.36
NDFI 0.00 0.83 0.64 0.83 -0.83 -0.86 0.75 1.00 0.52 -0.71 -0.67 -0.88 0.27 -0.69 -0.86 -0.02 -0.02 -0.13 -0.02 -0.26 0.14 0.27
NIRv -0.06 0.79 0.73 0.79 -0.52 -0.64 0.77 0.52 1.00 -0.07 -0.10 -0.46 0.95 0.11 -0.19 -0.35 -0.07 -0.08 0.16 0.01 0.21 0.42
Bblue 0.05 -0.58 -0.20 -0.58 0.61 0.61 -0.59 -0.71 -0.07 1.00 0.88 0.82 0.21 0.81 0.83 -0.39 -0.10 0.17 0.14 0.41 -0.19 -0.06
Bgreen 0.05 -0.63 -0.44 -0.63 0.54 0.60 -0.68 -0.67 -0.10 0.88 1.00 0.89 0.21 0.77 0.82 -0.38 -0.09 0.18 0.10 0.31 -0.22 -0.11
Bred 0.04 -0.88 -0.71 -0.88 0.76 0.83 -0.85 -0.88 -0.46 0.82 0.89 1.00 -0.15 0.71 0.87 -0.12 0.00 0.15 0.02 0.30 -0.26 -0.24
NIR -0.05 0.57 0.56 0.57 -0.30 -0.41 0.55 0.27 0.95 0.21 0.21 -0.15 1.00 0.38 0.10 -0.43 -0.07 -0.03 0.18 0.12 0.14 0.38
Swir1 -0.09 -0.40 -0.23 -0.40 0.74 0.67 -0.34 -0.69 0.11 0.81 0.77 0.71 0.38 1.00 0.94 -0.12 0.14 0.11 0.00 0.36 -0.04 0.01
Swir2 -0.06 -0.65 -0.48 -0.65 0.85 0.83 -0.59 -0.86 -0.19 0.83 0.82 0.87 0.10 0.94 1.00 -0.03 0.15 0.14 -0.03 0.34 -0.12 -0.12
Elev -0.25 -0.08 -0.27 -0.08 0.29 0.25 0.03 -0.02 -0.35 -0.39 -0.38 -0.12 -0.43 -0.12 -0.03 1.00 0.57 -0.03 -0.33 -0.24 0.18 -0.10
slope -0.19 0.00 -0.11 0.00 0.26 0.21 0.06 -0.02 -0.07 -0.10 -0.09 0.00 -0.07 0.14 0.15 0.57 1.00 0.02 -0.42 -0.07 0.12 0.09
Aspect -0.03 -0.15 -0.08 -0.15 0.13 0.14 -0.18 -0.13 -0.08 0.17 0.18 0.15 -0.03 0.11 0.14 -0.03 0.02 1.00 -0.04 0.08 -0.03 -0.03
TWI 0.03 0.09 0.16 0.09 -0.18 -0.17 0.06 -0.02 0.16 0.14 0.10 0.02 0.18 0.00 -0.03 -0.33 -0.42 -0.04 1.00 0.09 0.00 0.01
Temp 0.05 -0.20 -0.02 -0.20 0.28 0.26 -0.18 -0.26 0.01 0.41 0.31 0.30 0.12 0.36 0.34 -0.24 -0.07 0.08 0.09 1.00 -0.17 -0.05
Precip -0.30 0.29 0.25 0.29 -0.10 -0.16 0.30 0.14 0.21 -0.19 -0.22 -0.26 0.14 -0.04 -0.12 0.18 0.12 -0.03 0.00 -0.17 1.00 0.37
HR -0.16 0.37 0.38 0.37 -0.24 -0.30 0.36 0.27 0.42 -0.06 -0.11 -0.24 0.38 0.01 -0.12 -0.10 0.09 -0.03 0.01 -0.05 0.37 1.00


3 Obtencion de los triángulos inferior y superior de la matriz de correlación

(volver al índice)

# Get lower triangle of the correlation matrix
  get_lower_tri<-function(a){
    a[upper.tri(a)] <- NA
    return(a)
  }
  # Get upper triangle of the correlation matrix
  get_upper_tri <- function(a){
    a[lower.tri(a)]<- NA
    return(a)
  }


4 Llamado al triángulo superior de la matriz de correlación

(volver al índice)

upper_tri <- get_upper_tri(a)
upper_tri %>%  kbl() %>% kable_material(c("striped", "hover"), font_size = 12)%>% scroll_box(width = "100%", height = "400px")
SOC NDVI EVI SAVI IBI BSI GNDVI NDFI NIRv Bblue Bgreen Bred NIR Swir1 Swir2 Elev slope Aspect TWI Temp Precip HR
SOC 1 -0.06 -0.04 -0.06 -0.12 -0.07 -0.08 0.00 -0.06 0.05 0.05 0.04 -0.05 -0.09 -0.06 -0.25 -0.19 -0.03 0.03 0.05 -0.30 -0.16
NDVI NA 1.00 0.84 1.00 -0.75 -0.87 0.97 0.83 0.79 -0.58 -0.63 -0.88 0.57 -0.40 -0.65 -0.08 0.00 -0.15 0.09 -0.20 0.29 0.37
EVI NA NA 1.00 0.84 -0.58 -0.71 0.78 0.64 0.73 -0.20 -0.44 -0.71 0.56 -0.23 -0.48 -0.27 -0.11 -0.08 0.16 -0.02 0.25 0.38
SAVI NA NA NA 1.00 -0.75 -0.87 0.97 0.83 0.79 -0.58 -0.63 -0.88 0.57 -0.40 -0.65 -0.08 0.00 -0.15 0.09 -0.20 0.29 0.37
IBI NA NA NA NA 1.00 0.98 -0.66 -0.83 -0.52 0.61 0.54 0.76 -0.30 0.74 0.85 0.29 0.26 0.13 -0.18 0.28 -0.10 -0.24
BSI NA NA NA NA NA 1.00 -0.79 -0.86 -0.64 0.61 0.60 0.83 -0.41 0.67 0.83 0.25 0.21 0.14 -0.17 0.26 -0.16 -0.30
GNDVI NA NA NA NA NA NA 1.00 0.75 0.77 -0.59 -0.68 -0.85 0.55 -0.34 -0.59 0.03 0.06 -0.18 0.06 -0.18 0.30 0.36
NDFI NA NA NA NA NA NA NA 1.00 0.52 -0.71 -0.67 -0.88 0.27 -0.69 -0.86 -0.02 -0.02 -0.13 -0.02 -0.26 0.14 0.27
NIRv NA NA NA NA NA NA NA NA 1.00 -0.07 -0.10 -0.46 0.95 0.11 -0.19 -0.35 -0.07 -0.08 0.16 0.01 0.21 0.42
Bblue NA NA NA NA NA NA NA NA NA 1.00 0.88 0.82 0.21 0.81 0.83 -0.39 -0.10 0.17 0.14 0.41 -0.19 -0.06
Bgreen NA NA NA NA NA NA NA NA NA NA 1.00 0.89 0.21 0.77 0.82 -0.38 -0.09 0.18 0.10 0.31 -0.22 -0.11
Bred NA NA NA NA NA NA NA NA NA NA NA 1.00 -0.15 0.71 0.87 -0.12 0.00 0.15 0.02 0.30 -0.26 -0.24
NIR NA NA NA NA NA NA NA NA NA NA NA NA 1.00 0.38 0.10 -0.43 -0.07 -0.03 0.18 0.12 0.14 0.38
Swir1 NA NA NA NA NA NA NA NA NA NA NA NA NA 1.00 0.94 -0.12 0.14 0.11 0.00 0.36 -0.04 0.01
Swir2 NA NA NA NA NA NA NA NA NA NA NA NA NA NA 1.00 -0.03 0.15 0.14 -0.03 0.34 -0.12 -0.12
Elev NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA 1.00 0.57 -0.03 -0.33 -0.24 0.18 -0.10
slope NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA 1.00 0.02 -0.42 -0.07 0.12 0.09
Aspect NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA 1.00 -0.04 0.08 -0.03 -0.03
TWI NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA 1.00 0.09 0.00 0.01
Temp NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA 1.00 -0.17 -0.05
Precip NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA 1.00 0.37
HR NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA 1.00


5 Generación del mapa de calor

(volver al índice)

# Melt the correlation matrix
library(reshape2)
## 
## Attaching package: 'reshape2'
## The following object is masked from 'package:tidyr':
## 
##     smiths
melted_cormat <- melt(upper_tri, na.rm = TRUE)
# Heatmap
library(ggplot2)
ggheatmap <- ggplot(data = melted_cormat, aes(Var2, Var1, fill = value))+
 geom_tile(color = "white")+
 scale_fill_gradient2(low = "green", high = "red", mid = "white", 
   midpoint = 0, limit = c(-1,1), space = "Lab", 
   name="Correlación\nde Pearson") +
  theme_minimal()+ 
 theme(axis.text.x = element_text(angle = 45, vjust = 1, 
    size = 8, hjust = 1))+
 coord_fixed()
ggheatmap


6 Integración de los coeficientes de correlación al mapa de calor y generación del png a 300

(volver al índice)

ggheatmap +
geom_text(aes(Var2, Var1, label = value), color = "black", size = 1.5) +
theme(
  axis.title.x = element_blank(),
  axis.title.y = element_blank(),
  panel.grid.major = element_blank(),
  panel.border = element_blank(),
  panel.background = element_blank(),
  axis.ticks = element_blank(),
  legend.justification = c(1, 0),
  legend.position = c(0.6, 0.7),
  legend.direction = "horizontal")+
  guides(fill = guide_colorbar(barwidth = 7, barheight = 1,
                title.position = "top", title.hjust = 0.5))

ggsave("myplot.png")
## Saving 7 x 5 in image


Referencias:

1 Correlations

https://www.statmethods.net/stats/correlations.html

2 ggplot2 : Quick correlation matrix heatmap - R software and data visualization

http://www.sthda.com/english/wiki/ggplot2-quick-correlation-matrix-heatmap-r-software-and-data-visualization

3 ggsave : Save a ggplot - R software and data visualization

http://www.sthda.com/english/wiki/ggsave-save-a-ggplot-r-software-and-data-visualization