Input Data Nilai Ekspor dan Impor

library(readxl)
data2 <- read_excel("data1.xlsx")
## New names:
## • `` -> `...3`
## • `` -> `...4`
## • `` -> `...5`
## • `` -> `...6`
## • `` -> `...7`
## • `` -> `...8`
## • `` -> `...9`
## • `` -> `...10`
## • `` -> `...11`
## • `` -> `...12`
## • `` -> `...13`
## • `` -> `...14`
## • `` -> `...15`
## • `` -> `...16`
## • `` -> `...17`
## • `` -> `...18`
## • `` -> `...19`
## • `` -> `...20`
## • `` -> `...21`
## • `` -> `...22`
## • `` -> `...23`
## • `` -> `...24`
## • `` -> `...25`
## • `` -> `...26`
## • `` -> `...27`
## • `` -> `...28`
## • `` -> `...29`
## • `` -> `...30`
## • `` -> `...31`
## • `` -> `...32`
## • `` -> `...33`
## • `` -> `...34`
## • `` -> `...35`
## • `` -> `...36`
## • `` -> `...37`
## • `` -> `...38`
## • `` -> `...39`
## • `` -> `...40`
## • `` -> `...41`
## • `` -> `...42`
## • `` -> `...43`
## • `` -> `...44`
## • `` -> `...45`
## • `` -> `...46`
## • `` -> `...47`
## • `` -> `...48`
## • `` -> `...49`
## • `` -> `...50`
## • `` -> `...51`
## • `` -> `...52`
## • `` -> `...53`
## • `` -> `...54`
## • `` -> `...55`
## • `` -> `...56`
## • `` -> `...57`
## • `` -> `...58`
## • `` -> `...59`
## • `` -> `...60`
## • `` -> `...61`
## • `` -> `...62`
## • `` -> `...63`
## • `` -> `...64`
## • `` -> `...65`
## • `` -> `...66`
## • `` -> `...67`
## • `` -> `...68`
## • `` -> `...69`
## • `` -> `...70`
## • `` -> `...71`
## • `` -> `...72`
## • `` -> `...73`
## • `` -> `...74`
## • `` -> `...75`
## • `` -> `...76`
## • `` -> `...77`
## • `` -> `...78`
## • `` -> `...79`
## • `` -> `...80`
## • `` -> `...81`
## • `` -> `...82`
## • `` -> `...83`
## • `` -> `...84`
## • `` -> `...85`
## • `` -> `...86`
## • `` -> `...87`
## • `` -> `...88`
## • `` -> `...89`
## • `` -> `...90`
## • `` -> `...91`
## • `` -> `...92`
## • `` -> `...93`
## • `` -> `...94`
## • `` -> `...95`
## • `` -> `...96`
## • `` -> `...97`
## • `` -> `...98`
## • `` -> `...99`
## • `` -> `...100`
## • `` -> `...101`
## • `` -> `...102`
## • `` -> `...103`
## • `` -> `...104`
## • `` -> `...105`
## • `` -> `...106`
## • `` -> `...107`
## • `` -> `...108`
## • `` -> `...109`
## • `` -> `...110`
## • `` -> `...111`
## • `` -> `...112`
## • `` -> `...113`
## • `` -> `...114`
## • `` -> `...115`
## • `` -> `...116`
## • `` -> `...117`
## • `` -> `...118`
## • `` -> `...119`
## • `` -> `...120`
## • `` -> `...121`
## • `` -> `...122`
## • `` -> `...123`
## • `` -> `...124`
## • `` -> `...125`
## • `` -> `...126`
## • `` -> `...127`
## • `` -> `...128`
## • `` -> `...129`
## • `` -> `...130`
## • `` -> `...131`
## • `` -> `...132`
## • `` -> `...133`
## • `` -> `...134`
## • `` -> `...135`
## • `` -> `...136`
## • `` -> `...137`
## • `` -> `...138`
## • `` -> `...139`
## • `` -> `...140`
## • `` -> `...141`
## • `` -> `...142`
## • `` -> `...143`
## • `` -> `...144`
## • `` -> `...145`
## • `` -> `...146`
## • `` -> `...147`
## • `` -> `...148`
## • `` -> `...149`
## • `` -> `...150`
## • `` -> `...151`
## • `` -> `...152`
## • `` -> `...153`
## • `` -> `...154`
## • `` -> `...155`
## • `` -> `...156`
## • `` -> `...157`
## • `` -> `...158`
## • `` -> `...159`
## • `` -> `...160`
## • `` -> `...161`
## • `` -> `...162`
## • `` -> `...163`
## • `` -> `...164`
## • `` -> `...165`
## • `` -> `...166`
## • `` -> `...167`
## • `` -> `...168`
## • `` -> `...169`
## • `` -> `...170`
## • `` -> `...171`
## • `` -> `...172`
## • `` -> `...173`
## • `` -> `...174`
## • `` -> `...175`
## • `` -> `...176`
## • `` -> `...177`
## • `` -> `...178`
## • `` -> `...179`
## • `` -> `...180`
## • `` -> `...181`
## • `` -> `...182`
## • `` -> `...183`
## • `` -> `...184`
## • `` -> `...185`
## • `` -> `...186`
## • `` -> `...187`
## • `` -> `...188`
## • `` -> `...189`
## • `` -> `...190`
## • `` -> `...191`
## • `` -> `...192`
## • `` -> `...193`
## • `` -> `...194`
## • `` -> `...195`
## • `` -> `...196`
## • `` -> `...197`
## • `` -> `...198`
## • `` -> `...199`
## • `` -> `...200`
## • `` -> `...201`
## • `` -> `...202`
## • `` -> `...203`
## • `` -> `...204`
## • `` -> `...205`
## • `` -> `...206`
## • `` -> `...207`
## • `` -> `...208`
## • `` -> `...209`
## • `` -> `...210`
## • `` -> `...211`
## • `` -> `...212`
## • `` -> `...213`
## • `` -> `...214`
## • `` -> `...215`
## • `` -> `...216`
## • `` -> `...217`
data2
## # A tibble: 4 × 217
##   `Nilai Ekspor dan Impor` Nilai Ekspor dan Impo…¹ ...3  ...4  ...5  ...6  ...7 
##   <chr>                    <chr>                   <chr> <chr> <chr> <chr> <chr>
## 1 <NA>                     2007                    <NA>  <NA>  <NA>  <NA>  <NA> 
## 2 <NA>                     Januari                 Febr… Maret April Mei   Juni 
## 3 Ekspor (juta US $)       312.97                  266.… 316.… 267.… 312.… 255.…
## 4 Impor (juta US $)        565.5                   327.… 514.… 644.… 657.… 550.…
## # ℹ abbreviated name: ¹​`Nilai Ekspor dan Impor (Juta US $)`
## # ℹ 210 more variables: ...8 <chr>, ...9 <chr>, ...10 <chr>, ...11 <chr>,
## #   ...12 <chr>, ...13 <chr>, ...14 <chr>, ...15 <chr>, ...16 <chr>,
## #   ...17 <chr>, ...18 <chr>, ...19 <chr>, ...20 <chr>, ...21 <chr>,
## #   ...22 <chr>, ...23 <chr>, ...24 <chr>, ...25 <chr>, ...26 <chr>,
## #   ...27 <chr>, ...28 <chr>, ...29 <chr>, ...30 <chr>, ...31 <chr>,
## #   ...32 <chr>, ...33 <chr>, ...34 <chr>, ...35 <chr>, ...36 <chr>, …
library(readxl)
data3 <- read_excel("data2.xlsx")
## New names:
## • `` -> `...3`
## • `` -> `...4`
## • `` -> `...5`
## • `` -> `...6`
## • `` -> `...7`
## • `` -> `...8`
## • `` -> `...9`
## • `` -> `...10`
## • `` -> `...11`
## • `` -> `...12`
## • `` -> `...13`
## • `` -> `...14`
## • `` -> `...15`
## • `` -> `...16`
## • `` -> `...17`
## • `` -> `...18`
## • `` -> `...19`
## • `` -> `...20`
## • `` -> `...21`
## • `` -> `...22`
## • `` -> `...23`
## • `` -> `...24`
## • `` -> `...25`
## • `` -> `...26`
## • `` -> `...27`
## • `` -> `...28`
## • `` -> `...29`
## • `` -> `...30`
## • `` -> `...31`
## • `` -> `...32`
## • `` -> `...33`
## • `` -> `...34`
## • `` -> `...35`
## • `` -> `...36`
## • `` -> `...37`
data3
## # A tibble: 27 × 37
##    `Pintu Masuk`  Jumlah Kunjungan Wisataw…¹ ...3  ...4  ...5  ...6  ...7  ...8 
##    <chr>          <chr>                      <chr> <chr> <chr> <chr> <chr> <chr>
##  1 <NA>           2016                       <NA>  <NA>  <NA>  <NA>  <NA>  <NA> 
##  2 <NA>           Januari                    Febr… Maret April Mei   Juni  Juli 
##  3 Soekarno-Hatta 153503                     1643… 2026… 1883… 1875… 1509… 2174…
##  4 Ngurah Rai     343663                     3670… 3547… 3673… 3944… 4056… 4822…
##  5 Kualanamu      10080                      14851 15730 13280 15515 12746 17999
##  6 Batam          108888                     1203… 1253… 1255… 1324… 1212… 1036…
##  7 Sam Ratulangi  625                        1535  1297  1427  1018  1295  7677 
##  8 Juanda         11674                      14955 17894 18186 18386 14755 20424
##  9 Entikong       1050                       2307  1937  1426  2046  1515  2360 
## 10 Adi Sumarmo    465                        605   642   548   644   806   685  
## # ℹ 17 more rows
## # ℹ abbreviated name:
## #   ¹​`Jumlah Kunjungan Wisatawan Mancanegara per bulan ke Indonesia Menurut Pintu Masuk, 2008 - 2017 (Kunjungan)`
## # ℹ 29 more variables: ...9 <chr>, ...10 <chr>, ...11 <chr>, ...12 <chr>,
## #   ...13 <chr>, ...14 <chr>, ...15 <chr>, ...16 <chr>, ...17 <chr>,
## #   ...18 <chr>, ...19 <chr>, ...20 <chr>, ...21 <chr>, ...22 <chr>,
## #   ...23 <chr>, ...24 <chr>, ...25 <chr>, ...26 <chr>, ...27 <chr>, …
data4 <- read.csv("datacsv.csv", stringsAsFactors = TRUE)
data4
##                                                      Pintu.Masuk
## 1                                                               
## 2                                                               
## 3                                                 Soekarno-Hatta
## 4                                                     Ngurah Rai
## 5                                                      Kualanamu
## 6                                                          Batam
## 7                                                  Sam Ratulangi
## 8                                                         Juanda
## 9                                                       Entikong
## 10                                                   Adi Sumarmo
## 11                                                   Minangkabau
## 12                                                 Tanjung Priok
## 13                                                Tanjung Pinang
## 14                                  Bandara Internasional Lombok
## 15                                                    Hasanuddin
## 16                                                     Sepinggan
## 17                                        Sultan Syarif Kasim II
## 18                                                   Adi Sucipto
## 19                                           Husein Sastranegara
## 20                                                  Tanjung Uban
## 21                                         Tanjung Balai Karimun
## 22 Wisman Khusus (wisman lansia, rohaniawan, diklat, riset, dll)
## 23                                        Pos Lintas Batas (PLB)
## 24                                                       Lainnya
## 25                                                         Total
## 26                                                              
## 27                                                       Catatan
##                                   Jumlah.Kunjungan.Wisatawan.Mancanegara.per.bulan.ke.Indonesia.Menurut.Pintu.Masuk..2008...2017..Kunjungan.
## 1                                                                                                                                       2016
## 2                                                                                                                                    Januari
## 3                                                                                                                                     153503
## 4                                                                                                                                     343663
## 5                                                                                                                                      10080
## 6                                                                                                                                     108888
## 7                                                                                                                                        625
## 8                                                                                                                                      11674
## 9                                                                                                                                       1050
## 10                                                                                                                                       465
## 11                                                                                                                                      3378
## 12                                                                                                                                      5066
## 13                                                                                                                                      5971
## 14                                                                                                                                      5162
## 15                                                                                                                                       755
## 16                                                                                                                                       656
## 17                                                                                                                                      1523
## 18                                                                                                                                      6415
## 19                                                                                                                                     10964
## 20                                                                                                                                     21484
## 21                                                                                                                                      6735
## 22                                                                                                                                     37992
## 23                                                                                                                                     35741
## 24                                                                                                                                     42513
## 25                                                                                                                                    814303
## 26                                                                                                                                          
## 27 Sejak tahun 2016, penghitungan jumlah wisman mancanegara memperhitungkan variabel wisatawan khusus dan wisatawan melalui POS Lintas Batas
##           X    X.1    X.2    X.3    X.4     X.5     X.6       X.7     X.8
## 1                                                                        
## 2  Februari  Maret  April    Mei   Juni    Juli Agustus September Oktober
## 3    164317 202669 188369 187545 150956  217452  270496    229964  237914
## 4    367024 354778 367370 394443 405686  482201  437929    442304  423140
## 5     14851  15730  13280  15515  12746   17999   15890     19221   21300
## 6    120351 125324 125573 132410 121253  103647   99724    115052  114020
## 7      1535   1297   1427   1018   1295    7677    7904      5965    3791
## 8     14955  17894  18186  18386  14755   20424   19029     19907   20819
## 9      2307   1937   1426   2046   1515    2360    2319      2148    1494
## 10      605    642    548    644    806     685     251       192     722
## 11     3892   4428   4063   4854   2104    4094    4224      3329    4980
## 12     6824   5393   4897   5205   5061    4253    4862      4102    4356
## 13     8407   8656   8042   8162   7930    6932    6166      8474    6800
## 14     6184   7356   5407   7634   4452    9653    9127      8756    9500
## 15      876   1180   1056   1196    869    1370    1287      1511    2593
## 16     1150    714    555    749    576    1675    2502       451     405
## 17     1912   2090   1786   2494   1751    2654    2362      2822    3279
## 18     7899   6805   7223  10919   6853   11177   11718     10696   11267
## 19     8402  15828  30806  16699   8881    9453   12500     14995   17340
## 20    27642  25577  23018  23338  31465   20389   29491     25051   23145
## 21     8985   7820   8201   8466   5201    7599    6674      7668    6724
## 22    37956  34026  23628  23696  21496   36522   25566     23829   26288
## 23    36433  28767  22151  18976  21094   25735   24087     21752   33591
## 24    45802  46108  44083  30811  30906   38790   37878     38464   67183
## 25   888309 915019 901095 915206 857651 1032741 1031986   1006653 1040651
## 26                                                                       
## 27                                                                       
##         X.9     X.10    X.11     X.12    X.13    X.14    X.15    X.16    X.17
## 1                       2017                                                 
## 2  November Desember Januari Februari   Maret   April     Mei    Juni    Juli
## 3    219246   193629  185776   176958  208663  212502  206169  162588  274974
## 4    396150   437946  452106   446976  421688  474592  486579  503663  591032
## 5     21083    26252   17676    14687   20010   18500   18163   17802   19441
## 6    106953   159277  129318    94755  126771  134219  112300  125924  117324
## 7      4270     3820    7669     5117    5144    5887    5588    4678    7300
## 8     23126    21415   16417    11370   15386   20652   19703   19031   23504
## 9      1610     3433    2066     1321    2192    1708    1912    2137    1088
## 10      196        0      42      468     710     656     417     354     595
## 11     5115     5225    3997     4010    4955    4581    4121    2987    4086
## 12     5584     4719    3823     5555    4871    4943    5508    4011    5784
## 13     6854    10855   10770     6204    7810    9143    7239    8666    9756
## 14     7813     9694    9371     8740   11268   13169   11761    9167   12404
## 15     2263     1941    1677     1194    1491    1149    1103    1224    2030
## 16      800      762     409      320     402     356     370     281     447
## 17     3280     3973    3007     2662    3379    3249    3327    3288    3273
## 18    10209    10877    9005     8767   11690   12872   11487    7325   13493
## 19    12755    22410    8274    12945   17078   15811   15066    8027   11483
## 20    21984    32820   26535    21664   25198   28158   25230   34484   31971
## 21     6254     8780    7847     5859    7363    7751    6482    6324    6047
## 22    23294    20871   30141    24823   24474   27194   24687   21464   36122
## 23    47658    56845  125718   115365   89152  121645  128194  147312  147021
## 24    75836    77784   56324    53628   50082   52649   53182   53264   51416
## 25  1002333  1113328 1107968  1023388 1059777 1171386 1148588 1144001 1370591
## 26                                                                           
## 27                                                                           
##       X.18      X.19    X.20     X.21     X.22    X.23     X.24  X.25  X.26
## 1                                                 2018                     
## 2  Agustus September Oktober November Desember Januari Februari Maret April
## 3   273112    213721  216010   217201   215450       -        -     -     -
## 4   599302    549680  462135   358012   307321       -        -     -     -
## 5    24490     18480   20091    22670    25351       -        -     -     -
## 6   119772    118200  112788   120108   192796       -        -     -     -
## 7     8873      6298    7683     6443     8587       -        -     -     -
## 8    24318     21083   19570    23607    22422       -        -     -     -
## 9     1255      2026    1070     1078     2792       -        -     -     -
## 10     633       621     617      715      716       -        -     -     -
## 11    5178      4349    4841     4652     8568       -        -     -     -
## 12    5398      5347    5031     6655     5802       -        -     -     -
## 13   11572     10769   10574    10503    14378       -        -     -     -
## 14   12169      9998   10037     7698     7201       -        -     -     -
## 15    1661      1571    1399     1512     1689       -        -     -     -
## 16     419       452     411      417      379       -        -     -     -
## 17    3325      2800    2752     3052     3002       -        -     -     -
## 18   15609     13684   12948    11646    14031       -        -     -     -
## 19   14794     13706   13755    15170    17766       -        -     -     -
## 20   36941     31178   32119    30584    44525       -        -     -     -
## 21    6541      7024    6306     6918     9826       -        -     -     -
## 22   25503     23639   26637    23206    24393       -        -     -     -
## 23  147678    139383  141327   132280   154974       -        -     -     -
## 24   54700     56222   53464    57903    65062       -        -     -     -
## 25 1393243   1250231 1161565  1062030  1147031 1039639  1201059     -     -
## 26                                                                         
## 27                                                                         
##    X.27 X.28 X.29    X.30      X.31    X.32     X.33     X.34
## 1                                                            
## 2   Mei Juni Juli Agustus September Oktober November Desember
## 3     -    -    -       -         -       -        -        -
## 4     -    -    -       -         -       -        -        -
## 5     -    -    -       -         -       -        -        -
## 6     -    -    -       -         -       -        -        -
## 7     -    -    -       -         -       -        -        -
## 8     -    -    -       -         -       -        -        -
## 9     -    -    -       -         -       -        -        -
## 10    -    -    -       -         -       -        -        -
## 11    -    -    -       -         -       -        -        -
## 12    -    -    -       -         -       -        -        -
## 13    -    -    -       -         -       -        -        -
## 14    -    -    -       -         -       -        -        -
## 15    -    -    -       -         -       -        -        -
## 16    -    -    -       -         -       -        -        -
## 17    -    -    -       -         -       -        -        -
## 18    -    -    -       -         -       -        -        -
## 19    -    -    -       -         -       -        -        -
## 20    -    -    -       -         -       -        -        -
## 21    -    -    -       -         -       -        -        -
## 22    -    -    -       -         -       -        -        -
## 23    -    -    -       -         -       -        -        -
## 24    -    -    -       -         -       -        -        -
## 25    -    -    -       -         -       -        -        -
## 26                                                           
## 27