# Load Library
library(MASS)
library(plotly)
## Loading required package: ggplot2
##
## Attaching package: 'plotly'
## The following object is masked from 'package:ggplot2':
##
## last_plot
## The following object is masked from 'package:MASS':
##
## select
## The following object is masked from 'package:stats':
##
## filter
## The following object is masked from 'package:graphics':
##
## layout
library(dplyr)
##
## Attaching package: 'dplyr'
## The following object is masked from 'package:MASS':
##
## select
## The following objects are masked from 'package:stats':
##
## filter, lag
## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, union
# Baca Dataset
visdat <- read.csv("C:/Users/priya/Downloads/Indeks Pembangunan Literasi Masyarakat dan Unsur Penyusunnya Menurut Provinsi, 2024.csv")
# Cek ringkasan data
summary(visdat)
## Provinsi Indeks.Pembangunan.Literasi.Masyarakat
## Length:39 Min. :35.25
## Class :character 1st Qu.:62.47
## Mode :character Median :69.24
## Mean :68.32
## 3rd Qu.:73.88
## Max. :88.24
## Pemerataan.Layanan.Perpustakaan Ketercukupan.Koleksi.Perpustakaan
## Min. :0.0264 Min. :0.0333
## 1st Qu.:0.3278 1st Qu.:0.2450
## Median :0.4260 Median :0.3793
## Mean :0.4273 Mean :0.3872
## 3rd Qu.:0.5675 3rd Qu.:0.4924
## Max. :0.7625 Max. :0.8484
## Rasio.Ketercukupan.Tenaga.Perpustakaan Tingkat.Kunjungan.Masyarakat.per.hari
## Min. :0.0121 Min. :0.0376
## 1st Qu.:0.4402 1st Qu.:0.1636
## Median :0.7155 Median :0.2670
## Mean :0.6767 Mean :0.3285
## 3rd Qu.:1.0000 3rd Qu.:0.4092
## Max. :1.0000 Max. :1.0000
## Perpustakaan.yang.dibina.sesuai.SNP
## Min. :0.7613
## 1st Qu.:1.0000
## Median :1.0000
## Mean :0.9939
## 3rd Qu.:1.0000
## Max. :1.0000
## Keterlibatan.Masyarakat.dalam.Kegiatan.Sosialisasi.Perpustakaan
## Min. :0.6228
## 1st Qu.:1.0000
## Median :1.0000
## Mean :0.9852
## 3rd Qu.:1.0000
## Max. :1.0000
## Jumlah.Anggota.Perpustakaan
## Min. :0.3581
## 1st Qu.:1.0000
## Median :1.0000
## Mean :0.9835
## 3rd Qu.:1.0000
## Max. :1.0000
# Pembentukan Matriks Jarak
Jarak <- as.matrix(dist(visdat[,-1]))
Jarak
## 1 2 3 4 5 6 7
## 1 0.0000000 10.0472120 10.060742 3.193343 7.0091275 0.2605385 6.4896318
## 2 10.0472120 0.0000000 20.094327 6.875250 3.0455821 9.8628498 3.5796521
## 3 10.0607417 20.0943271 0.000000 13.240964 17.0542549 10.2378456 16.5256577
## 4 3.1933425 6.8752499 13.240964 0.000000 3.8537150 3.0085307 3.3390174
## 5 7.0091275 3.0455821 17.054255 3.853715 0.0000000 6.8241144 0.5606590
## 6 0.2605385 9.8628498 10.237846 3.008531 6.8241144 0.0000000 6.2992969
## 7 6.4896318 3.5796521 16.525658 3.339017 0.5606590 6.2992969 0.0000000
## 8 7.6380391 2.4291868 17.673880 4.472020 0.7051859 7.4493213 1.1975772
## 9 12.1860368 22.2162365 2.128169 15.363050 19.1767674 12.3611721 18.6465650
## 10 1.8676401 11.8616519 8.239017 5.014979 8.8215712 2.0143950 8.2903787
## 11 1.1758674 10.7131267 9.458233 4.009700 7.6729218 1.2849746 7.1518235
## 12 0.4221796 10.3836381 9.722222 3.542487 7.3409474 0.5594816 6.8156065
## 13 1.9145884 8.1867627 11.913309 1.449118 5.1434965 1.7142570 4.6144693
## 14 13.9832255 24.0155046 3.924199 17.164094 20.9745454 14.1602113 20.4448746
## 15 6.2187242 16.2314189 3.944460 9.409305 13.1891791 6.4058350 12.6673965
## 16 10.5704464 0.6942747 20.614610 7.419723 3.5734149 10.3904265 4.1133830
## 17 6.4061066 3.6747384 16.436810 3.256092 0.6798849 6.2130012 0.1330497
## 18 12.0086873 2.0035248 22.062461 8.830694 5.0214264 11.8265822 5.5544455
## 19 9.8188698 0.2567149 19.863929 6.643601 2.8205665 9.6326711 3.3491273
## 20 2.7571614 12.7686349 7.325843 5.927171 9.7289210 2.9225972 9.2008955
## 21 0.1486029 10.1264285 9.978667 3.265571 7.0897101 0.2872391 6.5677167
## 22 8.7500091 18.7838193 1.312747 11.929808 15.7434249 8.9263558 15.2145749
## 23 5.9316988 15.9624968 4.133381 9.109047 12.9225897 6.1053948 12.3937261
## 24 5.6974422 4.3798495 15.753307 2.514456 1.4181504 5.5171350 0.9956222
## 25 9.8985098 0.2173841 19.946173 6.731751 2.8922022 9.7148207 3.4274306
## 26 0.8127706 9.3178047 10.781885 2.520011 6.2758473 0.6439460 5.7534695
## 27 15.8341944 25.8682832 5.787741 19.020602 22.8268500 16.0156565 22.3001746
## 28 0.3356176 9.9322774 10.166882 3.078939 6.8959117 0.1642061 6.3686343
## 29 5.0467944 15.0851096 5.027368 8.235549 12.0423776 5.2294195 11.5171018
## 30 8.7823800 1.4392353 18.831667 5.602770 1.9073950 8.6011574 2.4226667
## 31 13.8856321 3.8445220 23.936778 10.709302 6.8845180 13.7024536 7.4161163
## 32 10.7326656 0.7776790 20.783884 7.566675 3.7418211 10.5524160 4.2817701
## 33 6.5763543 3.4961364 16.621278 3.400368 0.6721523 6.3931408 0.5997722
## 34 18.2946308 8.2559113 28.347996 15.115377 11.2983364 18.1128971 11.8307909
## 35 11.6801695 1.6585874 21.734909 8.506349 4.6879845 11.4997822 5.2269644
## 36 22.6607625 12.6193111 32.713096 19.484263 15.6610310 22.4795672 16.1934992
## 37 23.5103420 13.4687527 33.562791 20.332369 16.5107817 23.3286882 17.0424224
## 38 37.1929197 27.1554083 47.245170 34.014150 30.1964604 37.0118921 30.7274680
## 39 1.1414503 11.1402309 8.962098 4.310971 8.0975016 1.3158857 7.5738051
## 8 9 10 11 12 13 14
## 1 7.6380391 12.186037 1.8676401 1.1758674 0.4221796 1.914588 13.983225
## 2 2.4291868 22.216236 11.8616519 10.7131267 10.3836381 8.186763 24.015505
## 3 17.6738800 2.128169 8.2390168 9.4582330 9.7222218 11.913309 3.924199
## 4 4.4720203 15.363050 5.0149789 4.0096996 3.5424867 1.449118 17.164094
## 5 0.7051859 19.176767 8.8215712 7.6729218 7.3409474 5.143497 20.974545
## 6 7.4493213 12.361172 2.0143950 1.2849746 0.5594816 1.714257 14.160211
## 7 1.1975772 18.646565 8.2903787 7.1518235 6.8156065 4.614469 20.444875
## 8 0.0000000 19.794371 9.4435595 8.3135469 7.9737481 5.773207 21.594797
## 9 19.7943715 0.000000 10.3592216 11.5785346 11.8463395 14.035370 1.810064
## 10 9.4435595 10.359222 0.0000000 1.5228090 1.5104417 3.685082 12.158815
## 11 8.3135469 11.578535 1.5228090 0.0000000 0.8924930 2.590895 13.359899
## 12 7.9737481 11.846340 1.5104417 0.8924930 0.0000000 2.214656 13.642102
## 13 5.7732075 14.035370 3.6850820 2.5908947 2.2146555 0.000000 15.832062
## 14 21.5947973 1.810064 12.1588150 13.3598994 13.6421021 15.832062 0.000000
## 15 13.8201940 6.060199 4.4407719 5.5524580 5.8770813 8.056712 7.828674
## 16 2.9971594 22.738199 12.3883371 11.2008764 10.9028914 8.705472 24.533271
## 17 1.2905811 18.556730 8.2006424 7.0699090 6.7296836 4.528115 20.355517
## 18 4.4169962 24.184802 13.8281544 12.6861057 12.3466775 10.158786 25.984152
## 19 2.1960313 21.985047 11.6300186 10.4905893 10.1547301 7.957736 23.785099
## 20 10.3487827 9.448403 0.9438375 2.2585500 2.4160393 4.590065 11.247117
## 21 7.7141685 12.102667 1.7747377 1.1956664 0.3839549 1.992334 13.901771
## 22 16.3639257 3.436876 6.9270188 8.1551415 8.4104027 10.602480 5.234317
## 23 13.5427640 6.255912 4.1063228 5.3666240 5.5919235 7.782839 8.055559
## 24 2.0305029 17.876096 7.5242701 6.4462400 6.0423790 3.885584 19.676130
## 25 2.2961255 22.068567 11.7131449 10.5546900 10.2323567 8.035347 23.866561
## 26 6.9047779 12.906267 2.5739332 1.5232438 1.1048276 1.151624 14.701901
## 27 23.4495815 3.694673 14.0198354 15.1967523 15.4954653 17.685874 1.897530
## 28 7.5147023 12.288507 1.9401421 1.2968823 0.5594205 1.787550 14.089459
## 29 12.6715459 7.153800 3.2479175 4.4664659 4.7049327 6.904744 8.943433
## 30 1.3659652 20.953351 10.6041559 9.5006078 9.1261176 6.953911 22.753973
## 31 6.2709882 26.058760 15.7019526 14.5466463 14.2218499 12.027512 27.857890
## 32 3.1497814 22.907267 12.5540526 11.3928780 11.0699683 8.878374 24.704766
## 33 1.1200541 18.743100 8.3963762 7.2997085 6.9241018 4.743877 20.544642
## 34 10.6797906 30.470092 20.1141818 18.9587784 18.6338751 16.441396 32.269998
## 35 4.0828934 23.858181 13.5030501 12.3510295 12.0197548 9.829678 25.656897
## 36 15.0428845 34.835402 24.4802472 23.3117609 22.9991370 20.804285 36.634431
## 37 15.8919438 35.684783 25.3290522 24.1634417 23.8485826 21.654016 37.484215
## 38 29.5769824 49.366797 39.0122414 37.8437850 37.5318043 35.338458 51.166416
## 39 8.7275157 11.087422 0.8213083 0.8253926 0.7922991 2.962703 12.881653
## 15 16 17 18 19 20 21
## 1 6.2187242 10.5704464 6.4061066 12.0086873 9.8188698 2.7571614 0.1486029
## 2 16.2314189 0.6942747 3.6747384 2.0035248 0.2567149 12.7686349 10.1264285
## 3 3.9444603 20.6146097 16.4368096 22.0624611 19.8639285 7.3258426 9.9786668
## 4 9.4093051 7.4197227 3.2560923 8.8306941 6.6436008 5.9271713 3.2655711
## 5 13.1891791 3.5734149 0.6798849 5.0214264 2.8205665 9.7289210 7.0897101
## 6 6.4058350 10.3904265 6.2130012 11.8265822 9.6326711 2.9225972 0.2872391
## 7 12.6673965 4.1133830 0.1330497 5.5544455 3.3491273 9.2008955 6.5677167
## 8 13.8201940 2.9971594 1.2905811 4.4169962 2.1960313 10.3487827 7.7141685
## 9 6.0601993 22.7381986 18.5567298 24.1848022 21.9850469 9.4484025 12.1026666
## 10 4.4407719 12.3883371 8.2006424 13.8281544 11.6300186 0.9438375 1.7747377
## 11 5.5524580 11.2008764 7.0699090 12.6861057 10.4905893 2.2585500 1.1956664
## 12 5.8770813 10.9028914 6.7296836 12.3466775 10.1547301 2.4160393 0.3839549
## 13 8.0567122 8.7054720 4.5281154 10.1587864 7.9577363 4.5900652 1.9923342
## 14 7.8286738 24.5332710 20.3555166 25.9841516 23.7850985 11.2471167 13.9017715
## 15 0.0000000 16.7329093 12.5832871 18.2012326 16.0061182 3.5180116 6.1502196
## 16 16.7329093 0.0000000 4.2140339 1.5948747 0.9361782 13.2911162 10.6546546
## 17 12.5832871 4.2140339 0.0000000 5.6478924 3.4415936 9.1129140 6.4825093
## 18 18.2012326 1.5948747 5.6478924 0.0000000 2.2310050 14.7390955 12.0883984
## 19 16.0061182 0.9361782 3.4415936 2.2310050 0.0000000 12.5384660 9.8966797
## 20 3.5180116 13.2911162 9.1129140 14.7390955 12.5384660 0.0000000 2.6722188
## 21 6.1502196 10.6546546 6.4825093 12.0883984 9.8966797 2.6722188 0.0000000
## 22 2.6716748 19.3046665 15.1256486 20.7512412 18.5532950 6.0157596 8.6676787
## 23 0.8198667 16.4855447 12.3048538 17.9299144 15.7317408 3.1959315 5.8478551
## 24 11.9084475 4.9322954 0.9535567 6.3219095 4.1502294 8.4369782 5.7753147
## 25 16.0783337 0.7477548 3.5239268 2.1522572 0.2526417 12.6206201 9.9791796
## 26 6.9180800 9.8330362 5.6699340 11.2890934 9.0905091 3.4607953 0.9012064
## 27 9.6532608 26.3798340 22.2125464 27.8375370 25.6397194 13.1030425 15.7558132
## 28 6.3479234 10.4647007 6.2806487 11.8979947 9.7007429 2.8498019 0.2864732
## 29 1.2580635 15.5996237 11.4306383 17.0497519 14.8567035 2.3424176 4.9710595
## 30 14.9847607 2.0332344 2.5165809 3.2566595 1.2315284 11.5151264 8.8598618
## 31 20.0712653 3.3625435 7.5084643 1.9021890 4.0761519 16.6113550 13.9654564
## 32 16.9128282 0.4633589 4.3802848 1.3520784 1.0169471 13.4600810 10.8146508
## 33 12.7747054 4.0645631 0.6590595 5.4611899 3.2657284 9.3000454 6.6520970
## 34 24.4824401 7.7620087 11.9227711 6.2948997 8.4868455 21.0230053 18.3743533
## 35 17.8678478 1.2262900 5.3235168 0.4464478 1.8974765 14.4104413 11.7611164
## 36 28.8412550 12.1111351 16.2855639 10.6613421 12.8515291 25.3875801 22.7413597
## 37 29.6928422 12.9630067 17.1339462 11.5088681 13.7001468 26.2372763 23.5905338
## 38 43.3742630 26.6468654 30.8183920 25.1913787 27.3862404 39.9208148 37.2731255
## 39 5.1022828 11.6545566 7.4889455 13.1084034 10.9125735 1.6556665 1.0821941
## 22 23 24 25 26 27 28
## 1 8.750009 5.9316988 5.6974422 9.8985098 0.8127706 15.834194 0.3356176
## 2 18.783819 15.9624968 4.3798495 0.2173841 9.3178047 25.868283 9.9322774
## 3 1.312747 4.1333807 15.7533073 19.9461728 10.7818848 5.787741 10.1668817
## 4 11.929808 9.1090467 2.5144559 6.7317512 2.5200108 19.020602 3.0789391
## 5 15.743425 12.9225897 1.4181504 2.8922022 6.2758473 22.826850 6.8959117
## 6 8.926356 6.1053948 5.5171350 9.7148207 0.6439460 16.015656 0.1642061
## 7 15.214575 12.3937261 0.9956222 3.4274306 5.7534695 22.300175 6.3686343
## 8 16.363926 13.5427640 2.0305029 2.2961255 6.9047779 23.449581 7.5147023
## 9 3.436876 6.2559122 17.8760963 22.0685667 12.9062667 3.694673 12.2885074
## 10 6.927019 4.1063228 7.5242701 11.7131449 2.5739332 14.019835 1.9401421
## 11 8.155141 5.3666240 6.4462400 10.5546900 1.5232438 15.196752 1.2968823
## 12 8.410403 5.5919235 6.0423790 10.2323567 1.1048276 15.495465 0.5594205
## 13 10.602480 7.7828386 3.8855845 8.0353473 1.1516236 17.685874 1.7875497
## 14 5.234317 8.0555595 19.6761302 23.8665606 14.7019012 1.897530 14.0894589
## 15 2.671675 0.8198667 11.9084475 16.0783337 6.9180800 9.653261 6.3479234
## 16 19.304666 16.4855447 4.9322954 0.7477548 9.8330362 26.379834 10.4647007
## 17 15.125649 12.3048538 0.9535567 3.5239268 5.6699340 22.212546 6.2806487
## 18 20.751241 17.9299144 6.3219095 2.1522572 11.2890934 27.837537 11.8979947
## 19 18.553295 15.7317408 4.1502294 0.2526417 9.0905091 25.639719 9.7007429
## 20 6.015760 3.1959315 8.4369782 12.6206201 3.4607953 13.103042 2.8498019
## 21 8.667679 5.8478551 5.7753147 9.9791796 0.9012064 15.755813 0.2864732
## 22 0.000000 2.8218557 14.4419446 18.6354400 9.4719501 7.097550 8.8556885
## 23 2.821856 0.0000000 11.6212829 15.8144891 6.6535415 9.916468 6.0339568
## 24 14.441945 11.6212829 0.0000000 4.2370456 5.0015983 21.530832 5.5905513
## 25 18.635440 15.8144891 4.2370456 0.0000000 9.1671553 25.718344 9.7860901
## 26 9.471950 6.6535415 5.0015983 9.1671553 0.0000000 16.551396 0.7349198
## 27 7.097550 9.9164685 21.5308318 25.7183444 16.5513961 0.000000 15.9476055
## 28 8.855688 6.0339568 5.5905513 9.7860901 0.7349198 15.947605 0.0000000
## 29 3.718580 0.9540521 10.7422643 14.9340773 5.7704430 10.791994 5.1682647
## 30 17.520923 14.7006615 3.1057875 1.3384174 8.0767354 24.608642 8.6716622
## 31 22.625833 19.8043699 8.2023692 3.9937810 13.1594841 29.710773 13.7728963
## 32 19.473392 16.6529548 5.0661017 0.8966152 10.0057013 26.554280 10.6253123
## 33 15.311528 12.4904684 0.9749700 3.3661441 5.8617058 22.398305 6.4596084
## 34 27.037270 24.2156871 12.6059875 8.4077593 17.5715654 34.122271 18.1830221
## 35 20.424192 17.6030222 5.9987385 1.8082346 10.9572916 27.507652 11.5717916
## 36 31.402675 28.5813984 16.9750748 12.7690335 21.9342488 38.484719 22.5500260
## 37 32.252219 29.4307705 17.8229253 13.6188587 22.7846548 39.335487 23.3988403
## 38 45.934741 43.1135648 31.5042103 27.3054118 36.4687930 53.017188 37.0819871
## 39 7.651903 4.8355555 6.8101220 10.9891033 1.8242540 14.730834 1.2739711
## 29 30 31 32 33 34 35
## 1 5.0467944 8.782380 13.885632 10.7326656 6.5763543 18.294631 11.6801695
## 2 15.0851096 1.439235 3.844522 0.7776790 3.4961364 8.255911 1.6585874
## 3 5.0273676 18.831667 23.936778 20.7838842 16.6212780 28.347996 21.7349093
## 4 8.2355489 5.602770 10.709302 7.5666750 3.4003678 15.115377 8.5063486
## 5 12.0423776 1.907395 6.884518 3.7418211 0.6721523 11.298336 4.6879845
## 6 5.2294195 8.601157 13.702454 10.5524160 6.3931408 18.112897 11.4997822
## 7 11.5171018 2.422667 7.416116 4.2817701 0.5997722 11.830791 5.2269644
## 8 12.6715459 1.365965 6.270988 3.1497814 1.1200541 10.679791 4.0828934
## 9 7.1537998 20.953351 26.058760 22.9072673 18.7431002 30.470092 23.8581813
## 10 3.2479175 10.604156 15.701953 12.5540526 8.3963762 20.114182 13.5030501
## 11 4.4664659 9.500608 14.546646 11.3928780 7.2997085 18.958778 12.3510295
## 12 4.7049327 9.126118 14.221850 11.0699683 6.9241018 18.633875 12.0197548
## 13 6.9047441 6.953911 12.027512 8.8783741 4.7438768 16.441396 9.8296778
## 14 8.9434334 22.753973 27.857890 24.7047659 20.5446424 32.269998 25.6568974
## 15 1.2580635 14.984761 20.071265 16.9128282 12.7747054 24.482440 17.8678478
## 16 15.5996237 2.033234 3.362544 0.4633589 4.0645631 7.762009 1.2262900
## 17 11.4306383 2.516581 7.508464 4.3802848 0.6590595 11.922771 5.3235168
## 18 17.0497519 3.256660 1.902189 1.3520784 5.4611899 6.294900 0.4464478
## 19 14.8567035 1.231528 4.076152 1.0169471 3.2657284 8.486845 1.8974765
## 20 2.3424176 11.515126 16.611355 13.4600810 9.3000454 21.023005 14.4104413
## 21 4.9710595 8.859862 13.965456 10.8146508 6.6520970 18.374353 11.7611164
## 22 3.7185799 17.520923 22.625833 19.4733925 15.3115278 27.037270 20.4241916
## 23 0.9540521 14.700662 19.804370 16.6529548 12.4904684 24.215687 17.6030222
## 24 10.7422643 3.105788 8.202369 5.0661017 0.9749700 12.605987 5.9987385
## 25 14.9340773 1.338417 3.993781 0.8966152 3.3661441 8.407759 1.8082346
## 26 5.7704430 8.076735 13.159484 10.0057013 5.8617058 17.571565 10.9572916
## 27 10.7919944 24.608642 29.710773 26.5542805 22.3983054 34.122271 27.5076519
## 28 5.1682647 8.671662 13.772896 10.6253123 6.4596084 18.183022 11.5717916
## 29 0.0000000 13.824018 18.924947 15.7699625 11.6188427 23.336580 16.7214859
## 30 13.8240182 0.000000 5.153377 2.0814056 2.2725033 9.541294 2.9691111
## 31 18.9249474 5.153377 0.000000 3.1751952 7.3303261 4.415305 2.2130782
## 32 15.7699625 2.081406 3.175195 0.0000000 4.1986288 7.576811 1.0012028
## 33 11.6188427 2.272503 7.330326 4.1986288 0.0000000 11.732033 5.1284200
## 34 23.3365798 9.541294 4.415305 7.5768108 11.7320332 0.000000 6.6157660
## 35 16.7214859 2.969111 2.213078 1.0012028 5.1284200 6.615766 0.0000000
## 36 27.7009499 13.908470 8.779000 11.9363601 16.0989076 4.370929 10.9806746
## 37 28.5509861 14.755153 9.627461 12.7866067 16.9476957 5.217236 11.8303065
## 38 42.2335962 28.431078 23.315242 26.4699129 30.6305593 18.905744 25.5164047
## 39 3.9464382 9.890110 14.980951 11.8264191 7.6799317 19.393019 12.7781263
## 36 37 38 39
## 1 22.6607625 23.5103420 37.19292 1.1414503
## 2 12.6193111 13.4687527 27.15541 11.1402309
## 3 32.7130962 33.5627907 47.24517 8.9620977
## 4 19.4842629 20.3323688 34.01415 4.3109706
## 5 15.6610310 16.5107817 30.19646 8.0975016
## 6 22.4795672 23.3286882 37.01189 1.3158857
## 7 16.1934992 17.0424224 30.72747 7.5738051
## 8 15.0428845 15.8919438 29.57698 8.7275157
## 9 34.8354022 35.6847826 49.36680 11.0874225
## 10 24.4802472 25.3290522 39.01224 0.8213083
## 11 23.3117609 24.1634417 37.84378 0.8253926
## 12 22.9991370 23.8485826 37.53180 0.7922991
## 13 20.8042849 21.6540159 35.33846 2.9627034
## 14 36.6344315 37.4842149 51.16642 12.8816528
## 15 28.8412550 29.6928422 43.37426 5.1022828
## 16 12.1111351 12.9630067 26.64687 11.6545566
## 17 16.2855639 17.1339462 30.81839 7.4889455
## 18 10.6613421 11.5088681 25.19138 13.1084034
## 19 12.8515291 13.7001468 27.38624 10.9125735
## 20 25.3875801 26.2372763 39.92081 1.6556665
## 21 22.7413597 23.5905338 37.27313 1.0821941
## 22 31.4026754 32.2522186 45.93474 7.6519029
## 23 28.5813984 29.4307705 43.11356 4.8355555
## 24 16.9750748 17.8229253 31.50421 6.8101220
## 25 12.7690335 13.6188587 27.30541 10.9891033
## 26 21.9342488 22.7846548 36.46879 1.8242540
## 27 38.4847190 39.3354870 53.01719 14.7308337
## 28 22.5500260 23.3988403 37.08199 1.2739711
## 29 27.7009499 28.5509861 42.23360 3.9464382
## 30 13.9084700 14.7551532 28.43108 9.8901104
## 31 8.7790004 9.6274608 23.31524 14.9809505
## 32 11.9363601 12.7866067 26.46991 11.8264191
## 33 16.0989076 16.9476957 30.63056 7.6799317
## 34 4.3709290 5.2172363 18.90574 19.3930188
## 35 10.9806746 11.8303065 25.51640 12.7781263
## 36 0.0000000 0.8553894 14.54549 23.7563383
## 37 0.8553894 0.0000000 13.69609 24.6066207
## 38 14.5454916 13.6960933 0.00000 38.2902495
## 39 23.7563383 24.6066207 38.29025 0.0000000
# Pembentukan Matriks Pusat (Matrix Centering)
n <- nrow(Jarak) # jumlah provinsi, biasanya 34
A <- Jarak^2
I <- diag(n)
J <- matrix(1, nrow = n, ncol = n)
V <- I - (1/n) * J
dim(V)
## [1] 39 39
dim(A)
## [1] 39 39
aa <- V %*% A
BB <- aa %*% V
B <- (-1/2) * BB
B
## [,1] [,2] [,3] [,4] [,5] [,6]
## [1,] 16.942504 -24.391535 58.13529 3.884531 -11.901596 16.160541
## [2,] -24.391535 35.220895 -84.00725 -5.512086 17.163748 -23.304226
## [3,] 58.135286 -84.007248 200.54659 13.123731 -40.959422 55.589784
## [4,] 3.884531 -5.512086 13.12373 1.023995 -2.722476 3.709598
## [5,] -11.901596 17.163748 -40.95942 -2.722476 8.382172 -11.369954
## [6,] 16.160541 -23.304226 55.58978 3.709598 -11.369954 15.446458
## [7,] -9.759911 14.029991 -33.44889 -2.236023 6.860415 -9.290843
## [8,] -14.482539 20.876003 -49.69369 -3.271455 10.158473 -13.806935
## [9,] 66.813618 -96.578021 230.60086 15.092452 -47.091006 63.916054
## [10,] 24.313515 -35.152643 83.91890 5.523293 -17.132671 23.280638
## [11,] 19.391161 -28.163853 67.15545 4.084393 -13.634537 18.508891
## [12,] 18.285675 -26.395981 62.91604 4.140933 -12.850127 17.470261
## [13,] 9.194351 -13.345170 31.86576 2.017950 -6.480768 8.809814
## [14,] 74.201030 -107.266708 256.06870 16.704018 -52.279615 70.962513
## [15,] 42.220681 -61.033339 145.57961 9.330181 -29.700442 40.291562
## [16,] -26.513816 38.251540 -91.32567 -6.132044 18.688541 -25.375151
## [17,] -9.405073 13.501372 -32.16828 -2.146296 6.602740 -8.934688
## [18,] -32.392936 46.843489 -111.86270 -7.238485 22.823822 -30.970697
## [19,] -23.452950 33.858397 -80.73363 -5.275818 16.494189 -22.390046
## [20,] 28.039840 -40.539013 96.80887 6.315876 -19.765307 26.822000
## [21,] 17.261986 -24.860054 59.28818 3.981795 -12.139133 16.483751
## [22,] 52.759137 -76.236272 181.98086 11.921058 -37.167413 50.452530
## [23,] 41.174630 -59.494301 142.02678 9.320535 -29.009673 39.381210
## [24,] -6.403920 9.374158 -22.45480 -1.293995 4.540763 -6.140909
## [25,] -23.780508 34.325308 -81.91312 -5.407751 16.747158 -22.727153
## [26,] 13.875755 -20.065494 47.88358 3.071571 -9.767243 13.250697
## [27,] 81.826624 -118.257362 282.24055 18.336584 -57.625225 78.188832
## [28,] 16.425087 -23.704465 56.60071 3.782219 -11.575558 15.719902
## [29,] 37.604378 -54.301625 129.50428 8.468057 -26.450150 35.918008
## [30,] -19.047744 27.620852 -65.99645 -4.137417 13.418112 -18.220621
## [31,] -40.150303 58.004108 -138.42754 -9.048747 28.276627 -38.371553
## [32,] -27.168852 39.263007 -93.75667 -6.160336 19.145426 -25.998560
## [33,] -10.055327 14.596601 -34.76251 -2.171614 7.062831 -9.615257
## [34,] -58.229838 84.176079 -200.88547 -13.079646 41.010552 -55.669623
## [35,] -31.055965 44.920954 -107.24388 -6.981024 21.888449 -29.713303
## [36,] -76.187000 110.083767 -262.70321 -17.209427 53.653966 -72.845416
## [37,] -79.676124 115.127511 -274.73645 -17.969900 56.108843 -76.169905
## [38,] -135.830457 196.257277 -468.42484 -30.614259 95.632903 -129.861921
## [39,] 21.376062 -30.885659 73.66996 4.776028 -15.037414 20.413717
## [,7] [,8] [,9] [,10] [,11] [,12]
## [1,] -9.759911 -14.482539 66.81362 24.313515 19.391161 18.285675
## [2,] 14.029991 20.876003 -96.57802 -35.152643 -28.163853 -26.395981
## [3,] -33.448888 -49.693690 230.60086 83.918900 67.155452 62.916039
## [4,] -2.236023 -3.271455 15.09245 5.523293 4.084393 4.140933
## [5,] 6.860415 10.158473 -47.09101 -17.132671 -13.634537 -12.850127
## [6,] -9.290843 -13.806935 63.91605 23.280638 18.508891 17.470261
## [7,] 5.652996 8.325433 -38.42858 -13.952389 -11.136551 -10.496207
## [8,] 8.325433 12.432060 -57.10043 -20.788075 -16.730260 -15.670758
## [9,] -38.428582 -57.100429 265.18423 96.521679 77.172123 72.327774
## [10,] -13.952389 -20.788075 96.52168 35.172605 28.038071 26.349127
## [11,] -11.136551 -16.730260 77.17212 28.038071 23.222483 21.116511
## [12,] -10.496207 -15.670758 72.32777 26.349127 21.116511 19.807083
## [13,] -5.264241 -7.893008 36.65223 13.352312 10.810798 10.007116
## [14,] -42.674875 -63.456529 294.44902 107.162988 85.862861 80.345143
## [15,] -24.319274 -36.197156 167.31480 60.811769 49.282041 45.719193
## [16,] 15.248639 22.606649 -105.03862 -38.267045 -30.236473 -28.650878
## [17,] 5.460422 8.026006 -36.94122 -13.396190 -10.737789 -10.098004
## [18,] 18.640663 27.701199 -128.62012 -46.782527 -37.617301 -35.076585
## [19,] 13.499072 20.085654 -92.79813 -33.761463 -27.134089 -25.374830
## [20,] -16.132183 -23.963063 111.32552 40.510446 32.430276 30.354476
## [21,] -9.939178 -14.736392 68.15662 24.813231 19.698208 18.631606
## [22,] -30.345933 -45.103787 209.25527 76.163723 60.927290 57.105319
## [23,] -23.679822 -35.191294 163.31980 59.451263 47.506818 44.564640
## [24,] 3.686118 5.509811 -25.83005 -9.365766 -7.810512 -6.996379
## [25,] 13.691346 20.318423 -94.18022 -34.274090 -27.351010 -25.708532
## [26,] -7.989906 -11.887147 55.04105 20.008538 16.185907 15.028021
## [27,] -47.106167 -70.009177 324.48304 118.024640 94.856830 88.565048
## [28,] -9.443099 -14.009191 65.09856 23.714382 18.780444 17.757220
## [29,] -21.627126 -32.199815 148.87188 54.180012 43.504776 40.703538
## [30,] 10.937945 16.329204 -75.88323 -27.591655 -22.473429 -20.693366
## [31,] 23.110943 34.337218 -159.15353 -57.905520 -46.407383 -43.443131
## [32,] 15.614672 23.210421 -107.82438 -39.260864 -31.332641 -29.413606
## [33,] 5.744273 8.686408 -39.96215 -14.565625 -11.933992 -10.970413
## [34,] 33.488359 49.832734 -230.97547 -84.058184 -67.460730 -63.061441
## [35,] 17.851882 26.566983 -123.32833 -44.893915 -35.976761 -33.647749
## [36,] 43.808617 65.168669 -302.06368 -109.958122 -88.011030 -82.479785
## [37,] 45.825131 68.159805 -315.88903 -114.973425 -92.104002 -86.253190
## [38,] 78.092781 116.172015 -538.59328 -196.036258 -157.109861 -147.059698
## [39,] -12.298499 -18.312470 84.68291 30.805294 24.826870 23.145937
## [,13] [,14] [,15] [,16] [,17] [,18]
## [1,] 9.194351 74.20103 42.220681 -26.513816 -9.405073 -32.392936
## [2,] -13.345170 -107.26671 -61.033339 38.251540 13.501372 46.843489
## [3,] 31.865755 256.06870 145.579607 -91.325669 -32.168283 -111.862701
## [4,] 2.017950 16.70402 9.330181 -6.132044 -2.146296 -7.238485
## [5,] -6.480768 -52.27962 -29.700442 18.688541 6.602740 22.823822
## [6,] 8.809814 70.96251 40.291562 -25.375151 -8.934688 -30.970697
## [7,] -5.264241 -42.67488 -24.319274 15.248639 5.460422 18.640663
## [8,] -7.893008 -63.45653 -36.197156 22.606649 8.026006 27.701199
## [9,] 36.652230 294.44902 167.314799 -105.038624 -36.941221 -128.620119
## [10,] 13.352312 107.16299 60.811769 -38.267045 -13.396190 -46.782527
## [11,] 10.810798 85.86286 49.282041 -30.236473 -10.737789 -37.617301
## [12,] 10.007116 80.34514 45.719193 -28.650878 -10.098004 -35.076585
## [13,] 5.111848 40.72391 23.186312 -14.454597 -5.053215 -17.804449
## [14,] 40.723906 326.99015 185.936704 -116.563515 -41.035677 -142.852894
## [15,] 23.186312 185.93670 106.171389 -66.027332 -23.441087 -81.316642
## [16,] -14.454597 -116.56352 -66.027332 41.764202 14.645836 50.850386
## [17,] -5.053215 -41.03568 -23.441087 14.645836 5.285551 17.933529
## [18,] -17.804449 -142.85289 -81.316642 50.850386 17.933529 62.480194
## [19,] -12.825959 -103.08948 -58.731315 36.724787 13.001393 45.032306
## [20,] 15.391133 123.61582 70.267049 -44.075226 -15.510267 -54.010813
## [21,] 9.373002 75.66723 42.974869 -27.076956 -9.566912 -33.022816
## [22,] 28.918844 232.36525 132.085986 -82.883758 -29.180633 -101.497693
## [23,] 22.565539 181.34496 103.045507 -64.708587 -22.766034 -79.204914
## [24,] -3.637708 -28.72472 -16.464615 10.073584 3.543392 12.612079
## [25,] -12.988990 -104.57279 -59.432224 37.341021 13.172234 45.662480
## [26,] 7.627607 61.15693 34.890580 -21.727398 -7.696499 -26.746916
## [27,] 44.877076 360.41099 205.209202 -128.349491 -45.339604 -157.507907
## [28,] 8.968412 72.24880 40.947783 -25.862725 -9.070343 -31.530887
## [29,] 20.586372 165.37077 94.162525 -58.923836 -20.818777 -72.238731
## [30,] -10.576408 -84.33047 -48.139729 29.861184 10.522290 36.983286
## [31,] -21.990758 -176.75211 -100.558316 63.012586 22.238092 77.214770
## [32,] -14.901887 -119.71270 -67.981232 42.729703 15.004280 52.280991
## [33,] -5.598621 -44.44845 -25.413216 15.719403 5.523235 19.425438
## [34,] -31.958165 -256.53563 -145.963574 91.403379 32.212208 112.072884
## [35,] -17.069397 -136.95715 -77.858335 48.816170 17.158823 59.826402
## [36,] -41.756386 -335.44888 -190.726474 119.639131 42.129806 146.504816
## [37,] -43.671565 -350.81740 -199.526030 125.083044 44.077433 153.233788
## [38,] -74.492468 -598.15104 -340.222721 213.209312 75.111061 261.292245
## [39,] 11.723383 94.08285 53.625314 -33.475979 -11.843111 -41.118757
## [,19] [,20] [,21] [,22] [,23] [,24]
## [1,] -23.452950 28.039840 17.261986 52.75914 41.174630 -6.403920
## [2,] 33.858397 -40.539013 -24.860054 -76.23627 -59.494301 9.374158
## [3,] -80.733631 96.808869 59.288176 181.98086 142.026782 -22.454798
## [4,] -5.275818 6.315876 3.981795 11.92106 9.320535 -1.293995
## [5,] 16.494189 -19.765307 -12.139133 -37.16741 -29.009673 4.540763
## [6,] -22.390046 26.822000 16.483751 50.45253 39.381210 -6.140909
## [7,] 13.499072 -16.132183 -9.939178 -30.34593 -23.679822 3.686118
## [8,] 20.085654 -23.963063 -14.736392 -45.10379 -35.191294 5.509811
## [9,] -92.798131 111.325515 68.156618 209.25527 163.319797 -25.830046
## [10,] -33.761463 40.510446 24.813231 76.16372 59.451263 -9.365766
## [11,] -27.134089 32.430276 19.698208 60.92729 47.506818 -7.810512
## [12,] -25.374830 30.354476 18.631606 57.10532 44.564640 -6.996379
## [13,] -12.825959 15.391133 9.373002 28.91884 22.565539 -3.637708
## [14,] -103.089479 123.615817 75.667226 232.36525 181.344961 -28.724721
## [15,] -58.731315 70.267049 42.974869 132.08599 103.045507 -16.464615
## [16,] 36.724787 -44.075226 -27.076956 -82.88376 -64.708587 10.073584
## [17,] 13.001393 -15.510267 -9.566912 -29.18063 -22.766034 3.543392
## [18,] 45.032306 -54.010813 -33.022816 -101.49769 -79.204914 12.612079
## [19,] 32.561801 -38.956106 -23.889458 -73.26226 -57.167031 9.023951
## [20,] -38.956106 46.739116 28.600957 87.84409 68.558473 -10.866490
## [21,] -23.889458 28.600957 17.603551 53.80666 41.998974 -6.520103
## [22,] -73.262262 87.844091 53.806663 165.13843 128.883683 -20.360415
## [23,] -57.167031 68.558473 41.998974 128.88368 100.591807 -15.875953
## [24,] 9.023951 -10.866490 -6.520103 -20.36041 -15.875953 2.710504
## [25,] 32.987475 -39.531979 -24.251749 -74.33211 -58.014640 9.117463
## [26,] -19.302976 23.115807 14.130490 43.44510 33.895898 -5.417940
## [27,] -113.700476 136.240926 83.395179 256.09784 199.843959 -31.716879
## [28,] -22.761151 27.319028 16.770897 51.36776 40.101741 -6.261725
## [29,] -52.211726 62.494291 38.314252 117.52349 91.708989 -14.474677
## [30,] 26.568673 -31.883406 -19.400696 -59.87605 -46.712717 7.578398
## [31,] 55.757228 -66.815165 -40.931376 -125.61111 -98.026794 15.499656
## [32,] 37.718762 -45.262380 -27.721609 -85.08234 -66.409596 10.477511
## [33,] 14.046048 -16.778225 -10.225783 -31.55459 -24.612359 3.977607
## [34,] 80.913296 -96.968149 -59.360986 -182.29211 -142.258179 22.545459
## [35,] 43.166655 -51.774888 -31.674191 -97.31862 -75.951329 12.048783
## [36,] 105.796827 -126.798229 -77.686120 -238.39797 -186.055438 29.375496
## [37,] 110.654603 -132.607062 -81.234152 -249.31287 -194.568510 30.747632
## [38,] 188.632746 -226.111242 -138.486237 -425.07605 -331.738905 52.452547
## [39,] -29.704965 35.555207 21.772468 66.84967 52.160870 -8.277364
## [,25] [,26] [,27] [,28] [,29] [,30]
## [1,] -23.780508 13.875755 81.82662 16.425087 37.604378 -19.047744
## [2,] 34.325308 -20.065494 -118.25736 -23.704465 -54.301625 27.620852
## [3,] -81.913120 47.883577 282.24055 56.600709 129.504277 -65.996448
## [4,] -5.407751 3.071571 18.33658 3.782219 8.468057 -4.137417
## [5,] 16.747158 -9.767243 -57.62522 -11.575558 -26.450150 13.418112
## [6,] -22.727153 13.250697 78.18883 15.719902 35.918008 -18.220621
## [7,] 13.691346 -7.989906 -47.10617 -9.443099 -21.627126 10.937945
## [8,] 20.318423 -11.887147 -70.00918 -14.009191 -32.199815 16.329204
## [9,] -94.180218 55.041054 324.48304 65.098560 148.871880 -75.883232
## [10,] -34.274090 20.008538 118.02464 23.714382 54.180012 -27.591655
## [11,] -27.351010 16.185907 94.85683 18.780444 43.504776 -22.473429
## [12,] -25.708532 15.028021 88.56505 17.757220 40.703538 -20.693366
## [13,] -12.988990 7.627607 44.87708 8.968412 20.586372 -10.576408
## [14,] -104.572793 61.156928 360.41099 72.248804 165.370769 -84.330475
## [15,] -59.432224 34.890580 205.20920 40.947783 94.162525 -48.139729
## [16,] 37.341021 -21.727398 -128.34949 -25.862725 -58.923836 29.861184
## [17,] 13.172234 -7.696499 -45.33960 -9.070343 -20.818777 10.522290
## [18,] 45.662480 -26.746916 -157.50791 -31.530887 -72.238731 36.983286
## [19,] 32.987475 -19.302976 -113.70048 -22.761151 -52.211726 26.568673
## [20,] -39.531979 23.115807 136.24093 27.319028 62.494291 -31.883406
## [21,] -24.251749 14.130490 83.39518 16.770897 38.314252 -19.400696
## [22,] -74.332109 43.445096 256.09784 51.367760 117.523490 -59.876053
## [23,] -58.014640 33.895898 199.84396 40.101741 91.708989 -46.712717
## [24,] 9.117463 -5.417940 -31.71688 -6.261725 -14.474677 7.578398
## [25,] 33.476977 -19.545078 -115.26190 -23.135136 -52.906651 26.888912
## [26,] -19.545078 11.469602 67.47667 13.474902 30.953988 -15.835922
## [27,] -115.261902 67.476673 397.43246 79.563323 182.350851 -93.030292
## [28,] -23.135136 13.474902 79.56332 16.020309 36.522868 -18.542604
## [29,] -52.906651 30.953988 182.35085 36.522868 83.736386 -42.637442
## [30,] 26.888912 -15.835922 -93.03029 -18.542604 -42.637442 22.092208
## [31,] 56.547180 -33.067375 -194.86496 -39.052347 -89.424790 45.551294
## [32,] 38.291481 -22.367275 -131.89372 -26.483524 -60.522713 30.834931
## [33,] 14.170664 -8.347358 -49.02817 -9.755477 -22.532922 11.561607
## [34,] 82.038948 -47.999486 -282.80278 -56.655324 -129.784117 66.173624
## [35,] 43.789595 -25.610356 -150.93326 -30.257063 -69.249891 35.324256
## [36,] 107.311206 -62.724008 -369.72374 -74.144856 -169.706293 86.420161
## [37,] 112.222546 -65.614732 -386.70333 -77.521995 -177.490496 90.409544
## [38,] 191.300659 -111.896701 -659.33994 -132.171801 -302.615201 154.237947
## [39,] -30.085442 17.627115 103.77376 20.754919 47.637271 -24.304773
## [,31] [,32] [,33] [,34] [,35] [,36]
## [1,] -40.150303 -27.168852 -10.055327 -58.22984 -31.055965 -76.18700
## [2,] 58.004108 39.263007 14.596601 84.17608 44.920954 110.08377
## [3,] -138.427539 -93.756674 -34.762506 -200.88547 -107.243883 -262.70321
## [4,] -9.048747 -6.160336 -2.171614 -13.07965 -6.981024 -17.20943
## [5,] 28.276627 19.145426 7.062831 41.01055 21.888449 53.65397
## [6,] -38.371553 -25.998560 -9.615257 -55.66962 -29.713303 -72.84542
## [7,] 23.110943 15.614672 5.744273 33.48836 17.851882 43.80862
## [8,] 34.337218 23.210421 8.686408 49.83273 26.566983 65.16867
## [9,] -159.153527 -107.824382 -39.962151 -230.97547 -123.328332 -302.06368
## [10,] -57.905520 -39.260864 -14.565625 -84.05818 -44.893915 -109.95812
## [11,] -46.407383 -31.332641 -11.933992 -67.46073 -35.976761 -88.01103
## [12,] -43.443131 -29.413606 -10.970413 -63.06144 -33.647749 -82.47978
## [13,] -21.990758 -14.901887 -5.598621 -31.95816 -17.069397 -41.75639
## [14,] -176.752112 -119.712700 -44.448451 -256.53563 -136.957154 -335.44888
## [15,] -100.558316 -67.981232 -25.413216 -145.96357 -77.858335 -190.72647
## [16,] 63.012586 42.729703 15.719403 91.40338 48.816170 119.63913
## [17,] 22.238092 15.004280 5.523235 32.21221 17.158823 42.12981
## [18,] 77.214770 52.280991 19.425438 112.07288 59.826402 146.50482
## [19,] 55.757228 37.718762 14.046048 80.91330 43.166655 105.79683
## [20,] -66.815165 -45.262380 -16.778225 -96.96815 -51.774888 -126.79823
## [21,] -40.931376 -27.721609 -10.225783 -59.36099 -31.674191 -77.68612
## [22,] -125.611108 -85.082341 -31.554588 -182.29211 -97.318623 -238.39797
## [23,] -98.026794 -66.409596 -24.612359 -142.25818 -75.951329 -186.05544
## [24,] 15.499656 10.477511 3.977607 22.54546 12.048783 29.37550
## [25,] 56.547180 38.291481 14.170664 82.03895 43.789595 107.31121
## [26,] -33.067375 -22.367275 -8.347358 -47.99949 -25.610356 -62.72401
## [27,] -194.864959 -131.893725 -49.028175 -282.80278 -150.933264 -369.72374
## [28,] -39.052347 -26.483524 -9.755477 -56.65532 -30.257063 -74.14486
## [29,] -89.424790 -60.522713 -22.532922 -129.78412 -69.249891 -169.70629
## [30,] 45.551294 30.834931 11.561607 66.17362 35.324256 86.42016
## [31,] 95.567670 64.697855 24.014633 138.68204 74.020940 181.34524
## [32,] 64.697855 43.909904 16.238349 93.89659 50.139711 122.81343
## [33,] 24.014633 16.238349 6.195277 34.92301 18.633256 45.60705
## [34,] 138.682045 93.896589 34.923005 201.29134 107.447450 263.18998
## [35,] 74.020940 50.139711 18.633256 107.44745 57.371925 140.49518
## [36,] 181.345237 122.813432 45.607053 263.18998 140.495182 344.19365
## [37,] 189.660547 128.427010 47.706157 275.25660 146.928600 359.95169
## [38,] 323.338512 218.981736 81.336984 469.28702 250.497437 613.66609
## [39,] -50.874339 -34.420877 -12.836772 -73.84266 -39.398029 -96.52871
## [,37] [,38] [,39]
## [1,] -79.67612 -135.83046 21.376062
## [2,] 115.12751 196.25728 -30.885659
## [3,] -274.73645 -468.42484 73.669964
## [4,] -17.96990 -30.61426 4.776028
## [5,] 56.10884 95.63290 -15.037414
## [6,] -76.16990 -129.86192 20.413717
## [7,] 45.82513 78.09278 -12.298499
## [8,] 68.15980 116.17202 -18.312470
## [9,] -315.88903 -538.59328 84.682909
## [10,] -114.97343 -196.03626 30.805294
## [11,] -92.10400 -157.10986 24.826870
## [12,] -86.25319 -147.05970 23.145937
## [13,] -43.67157 -74.49247 11.723383
## [14,] -350.81740 -598.15104 94.082851
## [15,] -199.52603 -340.22272 53.625314
## [16,] 125.08304 213.20931 -33.475979
## [17,] 44.07743 75.11106 -11.843111
## [18,] 153.23379 261.29224 -41.118757
## [19,] 110.65460 188.63275 -29.704965
## [20,] -132.60706 -226.11124 35.555207
## [21,] -81.23415 -138.48624 21.772468
## [22,] -249.31287 -425.07605 66.849671
## [23,] -194.56851 -331.73891 52.160870
## [24,] 30.74763 52.45255 -8.277364
## [25,] 112.22255 191.30066 -30.085442
## [26,] -65.61473 -111.89670 17.627115
## [27,] -386.70333 -659.33994 103.773763
## [28,] -77.52199 -132.17180 20.754919
## [29,] -177.49050 -302.61520 47.637271
## [30,] 90.40954 154.23795 -24.304773
## [31,] 189.66055 323.33851 -50.874339
## [32,] 128.42701 218.98174 -34.420877
## [33,] 47.70616 81.33698 -12.836772
## [34,] 275.25660 469.28702 -73.842656
## [35,] 146.92860 250.49744 -39.398029
## [36,] 359.95169 613.66609 -96.528714
## [37,] 376.44143 641.78416 -100.965913
## [38,] 641.78416 1094.70986 -172.160412
## [39,] -100.96591 -172.16041 27.112530
# Nilai dan Vektor Eigen
eigen_result <- eigen(B)
eigenvalues <- eigen_result$values
eigenvalues
## [1] 4.359180e+03 2.217521e+00 8.147696e-01 4.432524e-01 3.218536e-01
## [6] 1.647813e-01 6.206368e-02 1.569871e-07 2.911762e-13 2.188937e-13
## [11] 2.017802e-13 1.858259e-13 1.617015e-13 1.298410e-13 1.278753e-13
## [16] 1.016894e-13 7.232708e-14 6.876334e-14 5.779322e-14 3.410793e-14
## [21] 1.695991e-14 3.465558e-15 -4.645599e-15 -8.647536e-15 -1.077135e-14
## [26] -1.310847e-14 -1.961673e-14 -2.523010e-14 -2.935389e-14 -3.605967e-14
## [31] -5.397689e-14 -7.514568e-14 -8.040765e-14 -8.070686e-14 -1.512854e-13
## [36] -1.812617e-13 -2.303730e-13 -3.571161e-13 -4.607984e-13
eigenvectors <- eigen_result$vectors
eigenvectors
## [,1] [,2] [,3] [,4] [,5]
## [1,] 0.06218599 0.093810578 0.273395465 0.006118036 0.040519920
## [2,] -0.08986196 -0.020977021 -0.127355490 -0.024398807 0.126586721
## [3,] 0.21447334 0.072556555 -0.081625170 -0.166318287 0.005652965
## [4,] 0.01400646 0.258717215 0.128039070 0.050527091 0.030414348
## [5,] -0.04379325 -0.077781017 -0.066200355 0.103718132 -0.010980692
## [6,] 0.05945019 0.116096219 0.079133193 0.063825165 -0.032128824
## [7,] -0.03576704 -0.055571736 -0.233347049 0.211005274 -0.129212794
## [8,] -0.05319083 0.022405165 -0.301759427 -0.155181251 0.181844190
## [9,] 0.24659923 0.119208153 -0.253873851 -0.164116898 -0.045070013
## [10,] 0.08974507 0.097328388 -0.157236364 0.159715482 -0.171237986
## [11,] 0.07193562 -0.540255793 0.031071561 0.138570552 -0.143250500
## [12,] 0.06732098 0.013549014 0.137686449 0.220612618 -0.164788250
## [13,] 0.03409982 -0.090891822 -0.133434421 0.124064956 -0.101912807
## [14,] 0.27386884 0.009543463 -0.171474799 -0.110059443 -0.105667765
## [15,] 0.15578362 -0.363594053 0.300883281 -0.154457096 0.078089138
## [16,] -0.09762024 -0.311679540 0.060643415 0.052161712 0.082581523
## [17,] -0.03440426 -0.029230527 -0.320715562 0.258078938 -0.180552067
## [18,] -0.11964292 0.105748416 0.124493194 0.203944248 -0.125959469
## [19,] -0.08637332 0.033643897 -0.208868836 0.004820018 0.090649890
## [20,] 0.10352624 0.018813791 -0.122247324 -0.107531057 0.039637828
## [21,] 0.06340097 0.153067755 0.175946465 -0.005839735 0.038100658
## [22,] 0.19462222 0.081971337 -0.070070824 -0.073565531 -0.052602069
## [23,] 0.15188550 0.098346643 -0.085026016 -0.047257486 -0.040609162
## [24,] -0.02402925 0.239529128 0.239097940 0.146583978 -0.002802821
## [25,] -0.08759533 -0.095294290 -0.073464667 0.099425258 0.026785413
## [26,] 0.05123278 -0.104139938 0.039554395 -0.052941588 0.054652004
## [27,] 0.30189682 -0.172829904 0.120342103 -0.326583082 0.083743820
## [28,] 0.06050885 0.159527122 -0.057084181 -0.001477078 0.003387021
## [29,] 0.13854926 -0.036084380 0.231440932 0.099287077 -0.111673555
## [30,] -0.07062063 0.298646489 0.247008264 0.075251841 -0.148606370
## [31,] -0.14805351 -0.012342954 -0.071453367 0.146091832 0.042155232
## [32,] -0.10025776 -0.089735134 0.141640344 0.002033727 0.032705768
## [33,] -0.03723865 0.186618782 -0.011987606 -0.291302829 0.331144240
## [34,] -0.21487478 0.060286103 0.006009248 0.033009861 0.205113885
## [35,] -0.11469767 0.005478248 0.138251137 0.019242490 0.150996771
## [36,] -0.28097542 -0.093723676 -0.018484292 -0.024836850 0.296046032
## [37,] -0.29385270 -0.044533553 -0.058252171 0.033582091 0.254970720
## [38,] -0.50106486 -0.018177552 0.032873875 -0.563712085 -0.614256889
## [39,] 0.07882260 -0.088049573 0.116451442 0.017908726 -0.014466054
## [,6] [,7] [,8] [,9] [,10]
## [1,] -0.157064603 -4.160573e-02 0.1254151003 0.000000000 0.000000000
## [2,] 0.026257171 -2.508713e-02 -0.3633459467 -0.004229298 -0.172822464
## [3,] 0.024234114 1.291371e-02 -0.1038198848 0.142366464 -0.039994564
## [4,] -0.184141147 -7.749751e-03 0.1880127801 -0.052520622 -0.202197435
## [5,] -0.022945265 -2.669947e-02 -0.2049584172 -0.011192864 -0.179002286
## [6,] -0.124750968 -1.108771e-02 -0.1898256281 0.012064210 -0.149314673
## [7,] -0.018457936 4.022932e-03 0.0754902537 0.032181471 -0.257050730
## [8,] 0.114621501 -1.896378e-05 0.2179189133 0.086368053 0.002275851
## [9,] 0.060854395 4.484914e-02 0.0448778479 -0.075170455 -0.039671539
## [10,] -0.080213424 2.613743e-02 0.0737700426 0.050258677 0.100099263
## [11,] 0.091798302 -7.601081e-02 -0.0405921387 0.059567393 0.271510824
## [12,] -0.166827578 -2.117139e-02 -0.2123896073 -0.254922810 -0.088736103
## [13,] -0.006888263 -8.256642e-03 0.0763672070 0.442329720 0.077895500
## [14,] 0.052003243 2.805748e-02 -0.0999875944 0.009856368 0.306213705
## [15,] 0.052479210 -9.467511e-02 0.2066852212 -0.005528743 -0.409472089
## [16,] 0.039668306 -8.018805e-02 -0.3706484564 -0.124693969 -0.043493348
## [17,] -0.017773530 2.098064e-02 0.1638778770 -0.189624877 -0.299123005
## [18,] 0.346349671 -6.887154e-02 0.1462484099 0.295767840 0.004303813
## [19,] 0.021750898 -6.426750e-03 0.0049851364 0.092210756 -0.317237547
## [20,] 0.036685452 3.676549e-05 0.0943431417 -0.382529927 0.266865180
## [21,] -0.142296897 -2.247612e-02 -0.0963120892 0.110226254 0.008518036
## [22,] -0.017227225 1.479925e-02 -0.0718192762 -0.042496736 -0.054338241
## [23,] -0.027028737 1.426296e-02 0.0255294855 0.002828056 0.096511049
## [24,] -0.247848120 -2.410023e-02 -0.0401526594 0.212116123 0.012662105
## [25,] -0.011847224 -3.413792e-02 0.1721789825 -0.077794007 -0.042917791
## [26,] 0.009242957 -3.908641e-02 -0.1297406126 0.224772497 0.037346029
## [27,] 0.104092188 -3.873269e-02 0.1017247788 -0.011917769 -0.264792827
## [28,] -0.072045561 8.210722e-03 -0.2469253200 -0.306868158 -0.015845533
## [29,] -0.135413140 -3.609692e-02 -0.0327500345 0.027665670 0.167918596
## [30,] 0.755868863 -9.237491e-02 -0.0772246257 -0.177101276 -0.031701122
## [31,] -0.057530277 -3.030740e-02 0.1800664717 -0.118631860 0.088453105
## [32,] 0.070039184 9.644757e-01 0.0006266600 -0.013144925 -0.019217250
## [33,] 0.016119174 -2.308419e-02 -0.0527141540 0.112316966 0.048280967
## [34,] -0.062997115 -4.662136e-02 -0.0372870280 -0.026858767 -0.045330051
## [35,] -0.083475616 -5.764764e-02 0.3798102904 -0.130050047 0.111667856
## [36,] 0.022357109 -7.337217e-02 -0.0563066472 -0.118814973 0.085868171
## [37,] -0.003949295 -6.111786e-02 -0.0501463285 0.028412599 0.163427970
## [38,] -0.155259894 -5.189741e-02 0.0002332646 -0.013144925 -0.019217250
## [39,] -0.048439924 -3.984443e-02 0.1987854210 -0.316724185 0.092185076
## [,11] [,12] [,13] [,14] [,15]
## [1,] 0.000000000 0.000000000 0.000000000 0.754847396 0.000000000
## [2,] -0.007080183 -0.008239125 0.208612862 -0.054362465 0.032070791
## [3,] -0.202212921 -0.268922645 0.162538838 0.066717541 0.156696294
## [4,] 0.069013465 -0.030368513 -0.109723360 -0.074826374 -0.229324814
## [5,] -0.078716883 0.060590380 -0.168831341 0.078649474 -0.039677654
## [6,] -0.208329260 -0.003945564 0.430009726 -0.079177540 -0.174664186
## [7,] 0.104270203 -0.094871415 0.092582355 0.125522476 -0.319235438
## [8,] 0.079739208 0.061869456 0.013252227 -0.047505030 -0.091906817
## [9,] -0.075246999 0.100200230 -0.201670765 0.189543034 0.014109032
## [10,] 0.161234469 0.010837385 -0.221915829 -0.053462421 0.035495756
## [11,] 0.040679719 0.149540211 -0.211801503 0.002039480 -0.200418215
## [12,] 0.206681067 0.021175848 -0.062701590 0.042937125 -0.320843585
## [13,] -0.202722096 0.304200843 0.200147486 0.089965860 -0.185486823
## [14,] 0.226671047 -0.075785102 0.008447849 0.258401086 -0.079537936
## [15,] 0.224012417 0.041931293 0.028491119 -0.106854524 0.003636479
## [16,] -0.080222865 0.077193611 -0.028228181 0.139504654 0.320753233
## [17,] -0.149929188 -0.077410024 -0.035803186 0.176638001 0.212640607
## [18,] -0.023332951 -0.093838040 -0.049881187 0.111783205 0.299263267
## [19,] 0.101462318 0.212091723 -0.215674199 0.077136000 0.151943021
## [20,] -0.071095764 0.058300734 0.070107579 -0.051237608 0.065426971
## [21,] -0.266898657 0.122036222 -0.322517201 -0.017238879 -0.033412543
## [22,] 0.329348463 0.094149720 0.098132528 0.031064134 0.080552281
## [23,] 0.146018975 -0.125125372 0.243122417 0.066405740 0.083456621
## [24,] 0.013439623 0.116360850 -0.077793624 0.007680069 0.148546575
## [25,] -0.230955365 -0.267372233 -0.071039019 -0.025812978 0.163876988
## [26,] -0.117247370 -0.088030300 -0.120884833 -0.012153659 -0.071716861
## [27,] -0.227399972 -0.128702465 0.012683667 0.172082365 -0.169097756
## [28,] -0.187842969 0.151140214 -0.159068489 0.040580521 -0.001343807
## [29,] 0.011474519 -0.177942748 0.181303380 -0.027261543 0.189781338
## [30,] -0.011659132 0.055178657 0.019960928 0.032974384 -0.180780739
## [31,] -0.349670676 0.147617111 0.269566787 0.025391496 -0.202584274
## [32,] -0.015706757 0.003510588 -0.004255198 0.060299507 -0.014336662
## [33,] -0.060701393 0.141483562 -0.164206615 -0.064331767 -0.096679862
## [34,] 0.285918112 -0.250242606 0.053434034 -0.021251598 0.034924906
## [35,] 0.072055949 0.215296944 0.076920951 -0.005809732 0.042285255
## [36,] 0.119909325 0.277922468 0.205664176 0.315591669 0.065806234
## [37,] -0.021334128 -0.516717860 -0.200156514 0.163977745 -0.314190408
## [38,] -0.015706757 0.003510588 -0.004255198 0.060299507 -0.014336662
## [39,] -0.200480096 -0.081711684 -0.110523799 -0.097065585 0.079179565
## [,16] [,17] [,18] [,19] [,20]
## [1,] 0.00000000 0.000000000 0.000000000 0.000000000 0.000000000
## [2,] 0.01653063 0.060949093 0.070134187 -0.151138861 0.031442412
## [3,] 0.04822004 0.020131420 0.130414110 0.065594390 0.261204879
## [4,] -0.04518567 0.057090921 -0.050481835 0.116917565 -0.100990559
## [5,] -0.01185657 0.208673303 -0.156733153 0.239704850 -0.165214769
## [6,] -0.27095491 -0.153047065 -0.159247983 -0.162202742 0.153820882
## [7,] -0.18792501 0.128078130 -0.068660280 -0.252561056 0.180525214
## [8,] 0.12661274 0.091628781 -0.146395388 -0.152091209 -0.108970672
## [9,] 0.15239018 -0.198850326 0.144217827 -0.149150843 0.041444551
## [10,] -0.07284952 -0.079455656 0.116040488 0.177555112 0.364680030
## [11,] -0.04964038 0.007516101 -0.159655590 -0.074728846 0.069370048
## [12,] 0.23989474 0.065777737 0.119229366 -0.009616548 0.032625143
## [13,] -0.05828591 0.272510522 0.087910518 0.155280983 -0.055630637
## [14,] -0.13594216 0.178561783 0.083747498 -0.038851458 0.003171972
## [15,] -0.27153368 0.063476720 0.156045111 0.188437264 -0.080516283
## [16,] 0.04332654 -0.026367859 0.194356425 0.089078782 0.138775504
## [17,] 0.08986235 0.022930477 -0.034721688 0.096952533 -0.318755335
## [18,] -0.18438730 0.116893047 -0.047550004 -0.074828436 -0.069445964
## [19,] -0.11256080 -0.254677756 -0.072667560 0.052777473 0.132750040
## [20,] -0.33444508 0.067539278 -0.100490684 0.319707670 0.192459632
## [21,] -0.25970692 0.146475472 -0.161237008 -0.290489017 0.063362068
## [22,] 0.27941156 0.271063896 -0.038619789 -0.153299041 0.046900738
## [23,] -0.34600679 0.013423375 0.141902487 0.102280436 -0.296921581
## [24,] 0.01176551 -0.043689617 0.222140677 0.045720105 0.157063980
## [25,] 0.09373621 0.415092356 -0.131144183 -0.081744882 0.361159007
## [26,] 0.10595971 0.196564764 0.334791331 0.044044525 -0.171256727
## [27,] 0.12337870 0.003945094 -0.128079871 0.072745998 0.173365899
## [28,] -0.19655049 0.283955558 -0.113646300 0.180607597 -0.122278229
## [29,] 0.27484137 -0.009862989 -0.484123841 0.077134359 -0.194777671
## [30,] 0.06533528 0.037731504 0.039874726 0.048299033 0.066388355
## [31,] 0.20687706 -0.022112401 0.307537902 0.172696790 -0.006238935
## [32,] -0.02125021 0.065178925 0.009562237 0.005607451 0.019290969
## [33,] 0.09902365 0.186406230 -0.060047700 0.051660232 -0.133012716
## [34,] -0.04823885 0.392429601 0.155668749 0.023012014 0.102116525
## [35,] 0.11536689 0.099771827 -0.019345076 0.065442341 0.230013046
## [36,] -0.08887609 -0.024270382 -0.116545640 -0.212293567 -0.013371848
## [37,] -0.08002716 -0.234946578 -0.019103774 0.137924960 -0.039536982
## [38,] -0.02125021 0.065178925 0.009562237 0.005607451 0.019290969
## [39,] -0.12381762 0.050283861 0.318288732 -0.513102816 -0.211955150
## [,21] [,22] [,23] [,24] [,25]
## [1,] 0.000000000 0.000000000 0.000000000 0.000000000 0.00000000
## [2,] -0.086402486 -0.086541090 0.085681999 0.280776980 -0.02247137
## [3,] 0.056553600 -0.239133625 -0.259664105 -0.242983676 0.02246245
## [4,] 0.263546387 0.005767887 -0.028481936 -0.034476989 -0.02474095
## [5,] -0.069486326 -0.003284571 0.200782088 -0.076210850 0.55091602
## [6,] -0.233026483 0.131948630 -0.105380284 -0.096536334 -0.03428275
## [7,] 0.187026685 -0.040392590 0.281812925 -0.322791205 -0.19428669
## [8,] 0.102839918 0.023885845 -0.086100990 -0.284066413 0.21337172
## [9,] -0.122898325 -0.142613424 0.384581959 -0.102905560 -0.04977132
## [10,] -0.047099896 -0.193300576 -0.020149700 0.400679821 -0.09572830
## [11,] -0.055451805 0.001904812 0.057036145 -0.035330661 -0.14364212
## [12,] -0.297662405 0.041880475 -0.252800870 -0.102127795 -0.14373335
## [13,] 0.074905279 -0.271847385 -0.220782092 0.130047386 0.11535449
## [14,] 0.067401685 0.191064230 0.003858395 0.012350766 0.08018467
## [15,] 0.029541087 -0.084045771 -0.063041425 -0.054517272 -0.06017787
## [16,] 0.293324530 -0.030532608 0.073854444 -0.304068311 -0.09847953
## [17,] -0.067338473 0.284356205 -0.165331727 0.117427158 -0.10448692
## [18,] -0.101662827 0.015413703 -0.048964856 -0.089897183 -0.28895111
## [19,] 0.045526061 -0.080769557 -0.221410960 0.023192533 -0.11332577
## [20,] 0.141486098 0.352113938 -0.128331793 -0.091890809 -0.04097967
## [21,] 0.231449026 0.149279270 -0.007220017 0.128106925 -0.02419152
## [22,] 0.247094305 -0.009688265 -0.368632014 -0.014969396 -0.03513761
## [23,] -0.230358749 -0.123548335 0.185989828 -0.036394658 -0.03854895
## [24,] 0.031962618 0.188524249 0.079324881 -0.172236525 0.21759426
## [25,] -0.250305945 0.038181441 -0.011317834 -0.008268865 0.04839462
## [26,] -0.210853121 0.309425144 -0.087637456 -0.055561117 -0.10310090
## [27,] -0.012226642 0.073820435 0.073325336 0.321010249 0.01412788
## [28,] -0.074818591 -0.428351438 -0.037924732 -0.068756874 -0.13516231
## [29,] 0.179573007 -0.192085641 0.133823308 0.020419642 -0.16534866
## [30,] 0.060295810 -0.035439126 0.001225031 0.026859666 0.11165468
## [31,] 0.286961437 0.035456896 0.145591015 0.070963726 -0.22437144
## [32,] 0.004140426 -0.017807092 -0.016177143 -0.013623052 -0.02724604
## [33,] -0.144030888 0.037325395 0.041829292 -0.101451724 -0.46436560
## [34,] 0.142224507 -0.003582943 0.270075893 0.244450294 -0.04623644
## [35,] -0.338117832 -0.182518166 0.037728469 -0.208557514 0.07801907
## [36,] -0.082847382 0.030996213 -0.113045386 0.221145346 0.03075569
## [37,] 0.046626562 -0.180517483 -0.266177904 -0.058765387 0.03517352
## [38,] 0.004140425 -0.017807092 -0.016177143 -0.013623052 -0.02724604
## [39,] 0.089445304 -0.242014601 -0.162679233 0.061281707 0.12540847
## [,26] [,27] [,28] [,29] [,30]
## [1,] 0.000000000 0.000000000 0.000000000 0.0000000000 0.000000000
## [2,] -0.085526771 -0.115787521 0.183762144 -0.0274535783 0.047145145
## [3,] -0.057222095 -0.129908641 0.166831613 0.0424390785 -0.039877114
## [4,] 0.222880175 -0.048509631 0.232029788 -0.0070446556 -0.032648328
## [5,] -0.018284304 0.256276384 -0.046486633 0.2175122966 0.159152464
## [6,] 0.018593417 0.179298258 0.174346873 0.1445468088 0.330598042
## [7,] -0.120391919 -0.223638389 -0.270693552 0.1381107436 -0.177847427
## [8,] -0.275631691 0.182296913 0.044374375 -0.3600179088 0.067472746
## [9,] 0.165915980 -0.100103433 0.126903059 -0.1026605712 0.492815497
## [10,] -0.237237130 0.084243950 -0.288357814 0.0946738371 0.193109956
## [11,] -0.184997253 -0.103001424 0.480797607 0.0877812328 -0.011226922
## [12,] 0.140926315 0.223436478 -0.043265743 -0.2444763449 -0.058601017
## [13,] 0.303770858 -0.106733261 -0.027823718 0.0653548927 0.027725109
## [14,] 0.126911115 0.219008217 0.161329916 0.0617427569 0.004752678
## [15,] -0.110874430 -0.028910736 -0.068586770 -0.0683146861 0.391633401
## [16,] 0.200852758 0.126757381 -0.171923287 0.0506322965 -0.032270202
## [17,] -0.072801636 -0.210312706 0.113166911 0.2323789779 0.078974627
## [18,] -0.089633744 0.420490116 0.056410292 -0.0783097567 0.068446933
## [19,] 0.211885002 0.007636820 0.325699384 -0.1579082795 -0.195604854
## [20,] 0.050568258 -0.116018955 0.008385325 -0.0103170018 0.075863531
## [21,] 0.100606455 -0.089901651 -0.145271212 -0.2367479631 0.151742451
## [22,] -0.172349208 0.005464598 -0.040708494 0.1498976484 0.194289768
## [23,] -0.016569655 -0.049921792 -0.051000540 -0.1424931898 -0.185496019
## [24,] -0.459377784 -0.144360839 0.228219649 0.1051881378 -0.049549844
## [25,] 0.107314117 -0.003779071 -0.041611225 -0.1446646376 0.061610399
## [26,] -0.032674693 -0.358420934 -0.086677228 -0.2385857113 0.058790131
## [27,] -0.168148203 0.151150879 0.010422054 0.0125089540 -0.316996002
## [28,] -0.329418923 -0.030167801 0.083886941 -0.1990836449 -0.106676757
## [29,] 0.027939309 -0.166223801 0.028650635 -0.0939048226 0.168038243
## [30,] 0.012658984 -0.234372767 0.033800810 0.0408047917 0.039176373
## [31,] -0.180620333 0.270319535 0.086402598 -0.1698510153 0.114715800
## [32,] -0.022808637 -0.007314316 0.041640121 -0.0004954033 0.049325258
## [33,] 0.003607896 0.098728976 -0.061071161 0.4975594958 0.010200778
## [34,] 0.130923715 0.017193271 0.348897141 -0.0192878872 0.066795716
## [35,] 0.126056876 -0.128642672 0.061359005 0.1091989813 -0.018268292
## [36,] -0.127407743 -0.151625671 -0.138441714 -0.0708047317 0.080823474
## [37,] -0.066339026 -0.051255405 -0.010701529 0.0641238097 0.225671921
## [38,] -0.022808637 -0.007314316 0.041640121 -0.0004954033 0.049325258
## [39,] 0.010175750 0.078665619 0.077628988 0.2391417266 -0.059447857
## [,31] [,32] [,33] [,34] [,35]
## [1,] 0.000000000 0.000000000 0.000000000 0.000000000 0.000000000
## [2,] 0.008934628 0.102503065 0.138349448 0.078965169 0.048408952
## [3,] -0.018110418 -0.074524944 -0.162796750 0.020911721 -0.122917358
## [4,] -0.084075696 -0.245229904 -0.246601310 0.305151924 0.439435073
## [5,] -0.218090387 0.242234974 -0.066213582 -0.039676964 0.112931363
## [6,] -0.101715797 -0.162297151 -0.008837713 -0.185687158 0.161457826
## [7,] 0.046620017 0.138756850 0.048545418 -0.077888968 0.078039065
## [8,] -0.103811683 -0.367602221 0.300142710 -0.090642109 0.066291320
## [9,] 0.095055368 0.113386921 0.119868475 0.160750561 0.069362079
## [10,] -0.197921305 -0.268084805 0.053130292 -0.109667554 0.231897691
## [11,] -0.184655730 -0.052911744 -0.078470670 0.130121375 -0.030410383
## [12,] 0.004599091 0.004983800 0.315460697 0.113948168 -0.121078056
## [13,] 0.119478349 -0.027009353 0.304976879 0.116540589 -0.002780789
## [14,] 0.138080795 -0.213473842 -0.215032347 -0.192533838 -0.059473433
## [15,] 0.111450521 -0.060461559 -0.037269251 0.046131243 -0.184282826
## [16,] -0.162852798 -0.315848543 0.128233120 -0.028148483 0.129918513
## [17,] 0.007221616 -0.250975309 0.078574770 -0.131337051 -0.203511270
## [18,] 0.129273595 0.213872879 0.056208315 0.020188688 0.195956275
## [19,] -0.256446506 0.205900624 0.022361532 -0.150216980 0.047527384
## [20,] 0.053488574 0.274552836 0.333001359 0.103937734 0.152861392
## [21,] -0.225501255 -0.015429016 0.014623633 -0.175332122 -0.375282758
## [22,] -0.246634974 0.348081603 -0.132382239 0.032637005 0.001832806
## [23,] -0.591036451 -0.004955742 0.063804681 0.185000947 -0.135848105
## [24,] 0.035758477 -0.020405500 0.260727019 0.189441087 -0.051587618
## [25,] -0.118452256 -0.076776254 -0.145251613 0.391324050 -0.049471227
## [26,] -0.104562048 0.087233962 -0.105744898 -0.281426313 0.440570635
## [27,] -0.060826882 0.030423054 0.224302356 -0.070719120 0.132454384
## [28,] 0.270827731 -0.044173550 -0.128566716 -0.121201929 0.049027894
## [29,] -0.096118493 -0.012692626 0.206387352 -0.115462616 0.136994910
## [30,] -0.166458032 -0.132139226 0.035609336 -0.022954377 -0.058759416
## [31,] -0.185311922 0.151023928 -0.215647806 -0.031817039 -0.125763616
## [32,] -0.063919979 -0.012167589 0.042751552 -0.007995524 0.029557316
## [33,] -0.110997214 -0.106133852 0.107156979 0.123059978 -0.086533056
## [34,] 0.064943019 -0.025457337 0.194578074 -0.200121341 -0.063384028
## [35,] -0.105786288 0.041987462 -0.036306748 -0.452034332 -0.025888102
## [36,] 0.023615431 -0.102106387 -0.131037712 0.217083806 0.171262598
## [37,] -0.051568422 0.122265173 0.096441870 -0.012443113 -0.076856034
## [38,] -0.063919979 -0.012167589 0.042751552 -0.007995524 0.029557316
## [39,] -0.083451874 0.051280942 0.189482482 -0.041717016 0.201218620
## [,36] [,37] [,38] [,39]
## [1,] 0.00000000 -0.5467945139 0.0000000000 0.0000000000
## [2,] 0.04385127 -0.2324075272 -0.6759979818 -0.0688676167
## [3,] 0.26829230 0.0549324257 0.0863850494 -0.5009564658
## [4,] -0.11914139 0.1061273815 -0.2167180459 -0.1632747108
## [5,] 0.21745737 0.0191094431 0.0344301947 -0.1820613263
## [6,] -0.12032517 -0.0515868037 0.1889099871 0.1538096857
## [7,] 0.14654229 0.0581048965 -0.0215722067 0.0126258237
## [8,] 0.01340453 -0.1898657524 -0.0312941025 -0.0500697215
## [9,] -0.11484170 0.1674488434 0.0688708064 -0.0150500789
## [10,] 0.09559900 -0.0984477033 -0.0117839327 -0.0872443287
## [11,] -0.10236294 -0.1051169406 0.0568357883 -0.1548318519
## [12,] 0.16448085 0.1291719139 0.0020361442 -0.1842843512
## [13,] -0.08601180 0.0597237296 0.0318101279 0.0948407360
## [14,] 0.25237228 0.2547005521 -0.2795156777 0.2755453470
## [15,] 0.17391280 0.0018597396 -0.0758502638 0.0932183984
## [16,] -0.23452523 0.0747284678 -0.0696971526 0.0649126072
## [17,] -0.08746614 0.1051681696 -0.0471157656 -0.0839828895
## [18,] -0.08837628 0.1533430706 -0.1391407441 -0.1876864791
## [19,] 0.30186123 0.0001572429 0.0898488408 0.2791123136
## [20,] 0.06375992 -0.1040223376 -0.0506367263 -0.1171372504
## [21,] -0.04900672 0.1208979346 -0.1222531860 -0.1920116921
## [22,] -0.33780258 0.0266745760 0.0392974059 0.1080221091
## [23,] -0.13549285 0.0923026726 0.0102964849 0.0148283986
## [24,] 0.05689362 0.2337624328 -0.0394339884 0.2226214888
## [25,] 0.07991133 -0.0500882747 -0.0035062377 0.3541913912
## [26,] 0.05907337 -0.0350222803 0.0741206413 0.0439208097
## [27,] -0.17182095 0.3013431138 0.0006304812 0.0188630370
## [28,] -0.13927046 0.0253987819 0.0761132763 0.1624406899
## [29,] 0.32268912 0.1146186725 -0.0311444199 0.1232155237
## [30,] 0.08594030 -0.0257446308 0.0379580703 0.1003390098
## [31,] 0.15594135 0.0452616698 -0.0312607562 0.0428490104
## [32,] 0.02550008 0.0363498585 -0.0234468178 0.0004728809
## [33,] 0.20983179 -0.0607059149 0.0169743440 0.0355377638
## [34,] -0.07936328 -0.0117675063 0.3847501754 -0.1262380368
## [35,] -0.14092741 0.1758845160 -0.3047951445 -0.1020381938
## [36,] 0.19039209 0.3863029227 0.1683360100 -0.1707120650
## [37,] -0.14920803 0.1697382539 -0.1230099292 0.1449798100
## [38,] 0.02550008 0.0363498580 -0.0234468183 0.0004728808
## [39,] 0.19723926 -0.0202465056 0.0395901450 0.0580696931
# Cumulative variance
cumulative_variance <- cumsum(eigenvalues) / sum(eigenvalues)
cumulative_variance
## [1] 0.9990777 0.9995859 0.9997727 0.9998742 0.9999480 0.9999858 1.0000000
## [8] 1.0000000 1.0000000 1.0000000 1.0000000 1.0000000 1.0000000 1.0000000
## [15] 1.0000000 1.0000000 1.0000000 1.0000000 1.0000000 1.0000000 1.0000000
## [22] 1.0000000 1.0000000 1.0000000 1.0000000 1.0000000 1.0000000 1.0000000
## [29] 1.0000000 1.0000000 1.0000000 1.0000000 1.0000000 1.0000000 1.0000000
## [36] 1.0000000 1.0000000 1.0000000 1.0000000
# MDS 2 Dimensi
fit2 <- cmdscale(Jarak, k = 2)
colnames(fit2) <- c("Dimensi 1", "Dimensi 2")
rownames(fit2) <- visdat[,1]
fit2
## Dimensi 1 Dimensi 2
## Aceh 4.1057729 0.139696541
## Sumatera Utara -5.9330540 -0.031237599
## Sumatera Barat 14.1604065 0.108046448
## Riau 0.9247638 0.385264654
## Jambi -2.8914093 -0.115826372
## Sumatera Selatan 3.9251443 0.172882851
## Bengkulu -2.3614862 -0.082753774
## Lampung -3.5118761 0.033364297
## Kepulauan Bangka Belitung 16.2814886 0.177516938
## Kepulauan Riau 5.9253361 0.144935031
## DKI Jakarta 4.7494833 -0.804513380
## Jawa Barat 4.4448062 0.020176301
## Jawa Tengah 2.2514093 -0.135350121
## DI Yogyakarta 18.0819395 0.014211497
## Jawa Timur 10.2854714 -0.541440341
## Banten -6.4452872 -0.464132664
## Bali -2.2715097 -0.043528177
## Nusa Tenggara Barat -7.8993142 0.157473583
## Nusa Tenggara Timur -5.7027195 0.050100278
## Kalimantan Barat 6.8352251 0.028016260
## Kalimantan Tengah 4.1859911 0.227938429
## Kalimantan Selatan 12.8497540 0.122066321
## Kalimantan Timur 10.0281013 0.146451351
## Kalimantan Utara -1.5865092 0.356691018
## Sulawesi Utara -5.7834016 -0.141905987
## Sulawesi Tengah 3.3825975 -0.155078343
## Sulawesi Selatan 19.9324612 -0.257366922
## Sulawesi Tenggara 3.9950415 0.237557294
## Gorontalo 9.1475882 -0.053734485
## Sulawesi Barat -4.6626627 0.444724702
## Maluku -9.7750978 -0.018380315
## Maluku Utara -6.6194271 -0.133627658
## Papua Barat -2.4586479 0.277900412
## Papua Barat Daya -14.1869107 0.089774098
## Papua -7.5728085 0.008157846
## Papua Selatan -18.5511454 -0.139567132
## Papua Tengah -19.4013558 -0.066316437
## Papua Pegunungan -33.0823489 -0.027068814
## Indonesia 5.2041901 -0.131117630
# Plot MDS 2D
plot(fit2, type = "n", xlab = "Dimensi 1", ylab = "Dimensi 2", main = "Plot MDS 2 Dimensi (2024)")
abline(h = 0, v = 0, col = "gray", lty = 2)
points(fit2, pch = 16, col = "blue")
text(fit2, labels = rownames(fit2), pos = 4, col = "red", cex = 0.7)
# MDS 3 Dimensi
fit3 <- cmdscale(Jarak, k = 3)
colnames(fit3) <- c("Dimensi 1", "Dimensi 2", "Dimensi 3")
rownames(fit3) <- visdat[,1]
fit3
## Dimensi 1 Dimensi 2 Dimensi 3
## Aceh 4.1057729 0.139696541 0.246779286
## Sumatera Utara -5.9330540 -0.031237599 -0.114956907
## Sumatera Barat 14.1604065 0.108046448 -0.073678622
## Riau 0.9247638 0.385264654 0.115573938
## Jambi -2.8914093 -0.115826372 -0.059755477
## Sumatera Selatan 3.9251443 0.172882851 0.071429249
## Bengkulu -2.3614862 -0.082753774 -0.210629749
## Lampung -3.5118761 0.033364297 -0.272381900
## Kepulauan Bangka Belitung 16.2814886 0.177516938 -0.229158182
## Kepulauan Riau 5.9253361 0.144935031 -0.141928754
## DKI Jakarta 4.7494833 -0.804513380 0.028046616
## Jawa Barat 4.4448062 0.020176301 0.124282104
## Jawa Tengah 2.2514093 -0.135350121 -0.120444029
## DI Yogyakarta 18.0819395 0.014211497 -0.154781018
## Jawa Timur 10.2854714 -0.541440341 0.271591050
## Banten -6.4452872 -0.464132664 0.054739528
## Bali -2.2715097 -0.043528177 -0.289492576
## Nusa Tenggara Barat -7.8993142 0.157473583 0.112373267
## Nusa Tenggara Timur -5.7027195 0.050100278 -0.188534591
## Kalimantan Barat 6.8352251 0.028016260 -0.110346042
## Kalimantan Tengah 4.1859911 0.227938429 0.158817350
## Kalimantan Selatan 12.8497540 0.122066321 -0.063249140
## Kalimantan Timur 10.0281013 0.146451351 -0.076748382
## Kalimantan Utara -1.5865092 0.356691018 0.215820767
## Sulawesi Utara -5.7834016 -0.141905987 -0.066312578
## Sulawesi Tengah 3.3825975 -0.155078343 0.035703611
## Sulawesi Selatan 19.9324612 -0.257366922 0.108626302
## Sulawesi Tenggara 3.9950415 0.237557294 -0.051526800
## Gorontalo 9.1475882 -0.053734485 0.208909201
## Sulawesi Barat -4.6626627 0.444724702 0.222960989
## Maluku -9.7750978 -0.018380315 -0.064497086
## Maluku Utara -6.6194271 -0.133627658 0.127851071
## Papua Barat -2.4586479 0.277900412 -0.010820563
## Papua Barat Daya -14.1869107 0.089774098 0.005424223
## Papua -7.5728085 0.008157846 0.124791818
## Papua Selatan -18.5511454 -0.139567132 -0.016684770
## Papua Tengah -19.4013558 -0.066316437 -0.052581081
## Papua Pegunungan -33.0823489 -0.027068814 0.029673467
## Indonesia 5.2041901 -0.131117630 0.105114413
# Plot MDS 3D
plot_ly(
x = fit3[,1], y = fit3[,2], z = fit3[,3],
type = 'scatter3d', mode = 'markers+text',
text = rownames(fit3),
marker = list(color = 'blue', size = 5)
)
# Perhitungan STRESS
# STRESS 2 Dimensi
disparities2 <- as.matrix(dist(fit2))
stress2 <- sqrt(sum((Jarak - disparities2)^2) / sum(Jarak^2))
stress2
## [1] 0.001626474
# STRESS 3 Dimensi
disparities3 <- as.matrix(dist(fit3))
stress3 <- sqrt(sum((Jarak - disparities3)^2) / sum(Jarak^2))
stress3
## [1] 0.0009140784