Analisis Input-Output Akibat Perubahan Iklim di Indonesia (Final Test)

Author

Muh. Alfarabi - A032221013 

library(tidyverse)
── Attaching packages ─────────────────────────────────────── tidyverse 1.3.2 ──
✔ ggplot2 3.4.0      ✔ purrr   0.3.5 
✔ tibble  3.1.8      ✔ dplyr   1.0.10
✔ tidyr   1.2.1      ✔ stringr 1.4.1 
✔ readr   2.1.3      ✔ forcats 0.5.2 
── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
✖ dplyr::filter() masks stats::filter()
✖ dplyr::lag()    masks stats::lag()
library(leontief)
library(kableExtra)

Attaching package: 'kableExtra'

The following object is masked from 'package:dplyr':

    group_rows
library(readxl)
library(writexl)

Perubahan Input-Output Akibat Perubahan Iklim

Halaman ditujukan untuk membuat prediksi perubahan Input-Output pada sektor-sektor perekonomian Indonesia akibat perubahan Iklim terjadi dan dampaknya terhadap keseimbangan output di tahun 2022. Kondisi diperkirakan menyebabkan penurunan output pada setiap sektor, namun yang paling besar dampaknya pada sektor pertanian-kehutanan-perikanan (35%), pengadaan listrik & gas (20%), dan pengadaan air-limbah sampah-daur ulang (30%). Sementara sektor lainnya rata-rata mengalami penurunan sebesar 5%…

Input Matriks Input-Output

Berikut langkah-langkah memasukkan nilai dari sumber data pada tabel Input-Output….

A. Membuat Matriks Transaksi dari Tabel IO atas dasar harga dasar (17 Produk) tahun 2016

#Input Distribusi Produksi 2016
X <- as.matrix(read.table("matriks.csv", header = TRUE, sep = ",", row.names = "colum" ))

B. Memasukkan Total Output

d0 <- read.csv("finalTotalDemand.csv", header = FALSE, sep = ",")
d <- as.numeric(d0)

C. Memasukkan Input Primer atau Nilai tambah

##Total Produksi/Total Output
c <- as.numeric(read.csv("konsumsiRT.csv", header = FALSE, sep = ","))

D. Memasukkan label sektor dari Tabel IO

##Membuat Nama Sektor
sektorHor <- as.matrix(read.csv("labelData.csv", header = FALSE, sep = ","))
sektorVer <- matrix(sektorHor, nrow =17,byrow=FALSE) ##nilai nrow sesuaikan dengan jumlah label

nama_sektor <- as.character(sektorHor) 

blank <- matrix(NA, ncol = 1, nrow = 1)

E. Menyusun matriks teknologi 2016

A <- input_requirement(X, d)
##wow <- rbind(blank, sektorVer) guide untuk cbind sebelum kable
##gas <- rbind(sektorHor, A)

Z <- cbind( rbind(blank, sektorVer), rbind(sektorHor,A))
kable(Z)
V1 V2 V3 V4 V5 V6 V7 V8 V9 V10 V11 V12 V13 V14 V15 V16 V17
NA Pertanian, Kehutanan, dan Perikanan Pertambangan dan Penggalian Industri Pengolahan Pengadaan Listrik dan Gas Pengadaan Air, Pengelolaan Sampah, Limbah dan Daur ulang Konstruksi Perdagangan Besar dan Eceran; Reparasi Mobil dan Sepeda Motor Transportasi dan Pergudangan Penyediaan Akomodasi Makan Minum Informasi dan Komunikasi Jasa Keuangan dan Asuransi Real Estate Jasa Perusahaan Adminstrasi Pemerintahan, Pertahanan, dan Jaminan Sosial Wajib Jasa Pendidikan Jasa Kesehatan dan Kegiatan Sosial Jasa Lainnya
Pertanian, Kehutanan, dan Perikanan 0.0491052631578947 2.56410256410256e-05 0.128085630498534 1.51515151515152e-05 0.00055 0.0184917525773196 0.000367219917012448 0.00159060402684564 0.13826043956044 1.35135135135135e-06 1e-04 1.94805194805195e-05 1.11111111111111e-05 0.00719342105263158 0.00167741935483871 0.0224034482758621 0.014755
Pertambangan dan Penggalian 2.10526315789474e-06 0.0705905982905983 0.0543513196480938 0.219318181818182 0.000166666666666667 0.0497910652920962 0 2.01342281879195e-06 0 0 0 0 1.42857142857143e-05 8.02631578947369e-05 0 0 0
Industri Pengolahan 0.0874726315789474 0.0473324786324786 0.180046480938416 0.0379545454545455 0.0852 0.20815704467354 0.0654892116182573 0.186923489932886 0.254087912087912 0.0290027027027027 0.0323830985915493 0.0144558441558442 0.0793746031746032 0.0736644736842105 0.0801806451612903 0.163368965517241 0.1002675
Pengadaan Listrik dan Gas 0.000821578947368421 0.00646923076923077 0.0106099706744868 0.441919696969697 0.0158666666666667 0.00668900343642612 0.00791991701244813 0.015706711409396 0.00469450549450549 0.0382216216216216 0.00460704225352113 0.00562077922077922 0.0072952380952381 0.0193486842105263 0.0138 0.0235172413793103 0.02532
Pengadaan Air, Pengelolaan Sampah, Limbah dan Daur ulang 4.94736842105263e-05 0.000570940170940171 0.000680205278592375 8.93939393939394e-05 0.0233 0.000106185567010309 0.000553112033195021 0.000948322147651007 0.000194505494505495 0.000218918918918919 0.00021830985915493 0.000101298701298701 0.00211111111111111 0.000973684210526316 0.000804838709677419 0.00473448275862069 0.0067075
Konstruksi 0.00545263157894737 0.0107213675213675 0.000958944281524927 0.000165151515151515 0.01715 0.015720618556701 0.00739668049792531 0.00468255033557047 0.000191208791208791 0.00232702702702703 0.0106760563380282 0.080012987012987 0.0080015873015873 0.0527592105263158 0.0188370967741935 0.00462068965517241 0.005915
Perdagangan Besar dan Eceran; Reparasi Mobil dan Sepeda Motor 0.0238936842105263 0.0211495726495726 0.0533760997067449 0.0109742424242424 0.0250166666666667 0.0789044673539519 0.0255290456431535 0.0588671140939597 0.0627483516483516 0.00882972972972973 0.0140830985915493 0.00696233766233766 0.0439920634920635 0.0302184210526316 0.0242612903225806 0.0451827586206897 0.0270925
Transportasi dan Pergudangan 0.00596315789473684 0.0600162393162393 0.0200120234604106 0.00276363636363636 0.02785 0.0558051546391753 0.0361900414937759 0.0639664429530201 0.0114483516483516 0.00991756756756757 0.0076169014084507 0.00461298701298701 0.0297174603174603 0.0927776315789474 0.022541935483871 0.0236827586206897 0.017225
Penyediaan Akomodasi Makan Minum 0.000267894736842105 0.000893162393162393 0.00175205278592375 0.000709090909090909 0.00116666666666667 0.0061914089347079 0.00730041493775934 0.0121825503355705 0.00066043956043956 0.00247702702702703 0.00267464788732394 0.00145454545454545 0.00953333333333333 0.0557894736842105 0.0282677419354839 0.0179448275862069 0.0323125
Informasi dan Komunikasi 0.000326842105263158 0.00397606837606838 0.00951994134897361 0.00371969696969697 0.00383333333333333 0.00656769759450172 0.0204298755186722 0.0323523489932886 0.00206043956043956 0.129725675675676 0.0335070422535211 0.0287337662337662 0.0761650793650794 0.0124552631578947 0.0153016129032258 0.0102206896551724 0.0239925
Jasa Keuangan dan Asuransi 0.0187694736842105 0.019417094017094 0.0131024926686217 0.0316606060606061 0.00571666666666667 0.00942989690721649 0.0421701244813278 0.0150181208053691 0.0106758241758242 0.0134662162162162 0.0738605633802817 0.0232597402597403 0.0333396825396825 0.00767763157894737 0.00454354838709677 0.0233724137931034 0.0364125
Real Estate 0 0.00889401709401709 0.00220806451612903 1.51515151515152e-06 0.00333333333333333 0.0107381443298969 0.027197510373444 0.00776912751677852 0.00530769230769231 0.0106108108108108 0.00934647887323944 0.00361298701298701 0.0143920634920635 0.00589210526315789 0.0180854838709677 0.0142724137931034 0.0486575
Jasa Perusahaan 0.00182210526315789 0.0286393162393162 0.00836466275659824 0.0177060606060606 0.0139833333333333 0.0290601374570447 0.0199186721991701 0.031510067114094 0.00287692307692308 0.0554662162162162 0.0427774647887324 0.0285363636363636 0.0372936507936508 0.0442052631578947 0.0399483870967742 0.0639448275862069 0.031075
Adminstrasi Pemerintahan, Pertahanan, dan Jaminan Sosial Wajib 0.000670526315789474 0.00270512820512821 0.00128944281524927 0.00126969696969697 0.00583333333333333 0.00065979381443299 0.0010344398340249 0.00738187919463087 0.00236263736263736 0.0168662162162162 0.00364084507042254 0.0101220779220779 0.00813809523809524 0.00307236842105263 0.00234354838709677 0.00216896551724138 0.000475
Jasa Pendidikan 0 0.000413675213675214 0.000367448680351906 0.000121212121212121 0.000733333333333333 0.000247079037800687 0.000534439834024896 0.00346174496644295 8.46153846153846e-05 4e-04 0.0066830985915493 0 0.00608253968253968 0.00168289473684211 0.0070241935483871 0.00364137931034483 0.002435
Jasa Kesehatan dan Kegiatan Sosial 2.68421052631579e-05 0.000794017094017094 0.000379178885630499 0 0 0 0.00109253112033195 0.0035241610738255 9.67032967032967e-05 1.35135135135135e-06 0.00260845070422535 0.00117922077922078 0.00223333333333333 2.89473684210526e-05 0.00275 0.00362413793103448 0.0032725
Jasa Lainnya 0.00055 0.000164102564102564 0.000932258064516129 0.000692424242424242 0.00216666666666667 0.00558831615120275 0.00138423236514523 0.00736442953020134 0.000175824175824176 0.0221283783783784 0.00092112676056338 0.00192987012987013 0.00333809523809524 0.00412236842105263 0.00745483870967742 0.0027 0.0144275

Menghitung Koefisien Tahun 2016

BL <-backward_linkage(A)
FL <-forward_linkage(A)
linkages <- cbind(BL,FL)
L<-leontief_inverse(A)
MPM <-multiplier_product_matrix(L)
OM <- output_multiplier(L)
OA <- output_allocation(X,d)
PD <- power_dispersion(L) # measures of interconnectedness, namely power of dispersion and sensitivity of dispersion
PDCV <- power_dispersion_cv(L)
SD <- sensitivity_dispersion(L)
SDCV <- sensitivity_dispersion_cv(L)
EO <-equilibrium_output(L,d)

Estimasi Matriks 2022

  • Pertama, gunakan kembali matriks transaksi 2016

  • Kedua, karena estimasilah tabel IO yang telah terkena dampak perubahan iklim (2016-2022)

  • Ketiga, kombinasikan keduanya untuk menentukan output setiap sektor yang dapat memenuhi perubahan output akibat perubahan output.

  • Keempat, estimasi matriks teknologi yang baru

#Input Distribusi Produksi 2022
X_2022 <- as.matrix(read.table("matriks2022.csv", header = TRUE, sep = ",", row.names = "colum" ))

d2 <- as.numeric(read.csv("finalTotalDemand2.csv", header = FALSE, sep = ",")) 
d22 <- read.csv("finalTotalDemand2.csv", header = FALSE, sep = ",")
##perubahan output

A_2022 <- input_requirement(X_2022,d2)

#memberi Label
Z_2022 <- cbind(rbind(blank, sektorVer), rbind(sektorHor,A_2022))
kable(Z_2022)
V1 V2 V3 V4 V5 V6 V7 V8 V9 V10 V11 V12 V13 V14 V15 V16 V17
NA Pertanian, Kehutanan, dan Perikanan Pertambangan dan Penggalian Industri Pengolahan Pengadaan Listrik dan Gas Pengadaan Air, Pengelolaan Sampah, Limbah dan Daur ulang Konstruksi Perdagangan Besar dan Eceran; Reparasi Mobil dan Sepeda Motor Transportasi dan Pergudangan Penyediaan Akomodasi Makan Minum Informasi dan Komunikasi Jasa Keuangan dan Asuransi Real Estate Jasa Perusahaan Adminstrasi Pemerintahan, Pertahanan, dan Jaminan Sosial Wajib Jasa Pendidikan Jasa Kesehatan dan Kegiatan Sosial Jasa Lainnya
Pertanian, Kehutanan, dan Perikanan 0.0467124029455835 1.8233122739635e-05 0.106428599375207 1.25118996345417e-05 0.000544547190607635 0.0141925076015224 0.000259450965618694 0.00120078611581856 0.103102893727937 9.68691692671257e-07 6.94303623633653e-05 1.34462319087235e-05 8.61924516441586e-06 0.00506634111480479 0.00121160128842847 0.0167598326991482 0.0105278453522895
Pertambangan dan Penggalian 3.15894711070784e-06 0.0738784328971226 0.0660051816011507 0.252743263747038 0.000232693892497889 0.0558525517974385 8.57337928595442e-09 2.33366469014972e-06 4.47933655007018e-07 0 0 3.18125214040714e-08 1.5356988762369e-05 8.23308216335009e-05 0 7.91711410299854e-08 0
Industri Pengolahan 0.121614647410646 0.0495372941691628 0.218651641844288 0.0437390291568268 0.124940732558118 0.233497137137947 0.0676563682460071 0.206271763633374 0.27692790755428 0.0302941935124743 0.0330330647318098 0.0147539793642588 0.0844549262362097 0.0758339430415845 0.0846474177899321 0.178612126222934 0.104560109009143
Pengadaan Listrik dan Gas 0.000962158067391135 0.00570137535153361 0.0108504367631835 0.428859963852804 0.019585004104877 0.00631843285965934 0.00689005275721446 0.0145957952391421 0.00430827304476856 0.0336201866698802 0.00395802564066466 0.00483089211215849 0.00653598817699153 0.0167733434518669 0.0122678926552424 0.0216511252023607 0.0222356605822797
Pengadaan Air, Pengelolaan Sampah, Limbah dan Daur ulang 5.06005380561597e-05 0.000440277728796701 0.000608623644882175 7.55415509374995e-05 0.0251756421112256 8.79026101116472e-05 0.000420942093408632 0.00077119048362684 0.0001560760713283 0.000168672855937906 0.000164395980815268 7.57724029548026e-05 0.00165525080309659 0.000738299024263768 0.000625933587019006 0.00381318494689435 0.00515358136767931
Konstruksi 0.00758069961026774 0.0112203761153735 0.00116451091288248 0.000160109380306017 0.0185257477496601 0.0176342908580892 0.00764128491933717 0.00516731278165181 0.000208622105610595 0.00243128695504296 0.0108909122452385 0.0816650382478791 0.00851348863424032 0.0543135052740226 0.0198865133658792 0.0050506777013559 0.00616709885528673
Perdagangan Besar dan Eceran; Reparasi Mobil dan Sepeda Motor 0.0332199151558175 0.0221343236910622 0.0648208147857402 0.0106500145735707 0.0270367970232184 0.0885099502020721 0.0263739879151135 0.0649601858187243 0.0683888684222977 0.0092225063378918 0.0143664208757332 0.0071058038434204 0.0468074650398196 0.0311081728834262 0.0256131502513806 0.0494002585261979 0.0282528544532186
Transportasi dan Pergudangan 0.0082908143832972 0.0628113985195666 0.0243029986851657 0.00268165052853365 0.0300931376472895 0.0625985203538757 0.0373877839015045 0.0705876926854866 0.0124770326683057 0.0103590700944344 0.00776944311148048 0.00470836716267092 0.0316191227997033 0.0955105610563873 0.023796884774163 0.0258945314870577 0.0179618520441699
Penyediaan Akomodasi Makan Minum 0.000372161581381363 0.000935029926636957 0.00212764461602977 0.000688662954737493 0.00125312505048128 0.00694512793260996 0.00754180628480638 0.01344390530203 0.000719416182764788 0.0025871865126077 0.00272803636220104 0.0014848428089264 0.0101429609014419 0.0574330226929039 0.0298429791810833 0.0196199094159759 0.0336967711936971
Informasi dan Komunikasi 0.000454372503072564 0.00416169342260032 0.0115612544582335 0.00361050990202998 0.00413710649876258 0.00736716306679159 0.0211058992585834 0.0357012482074655 0.00224558602955218 0.135504177142036 0.0341798746682471 0.0293270289895971 0.0810396133394904 0.0128225598433185 0.0161533256734893 0.0111760961020852 0.0250187683100253
Jasa Keuangan dan Asuransi 0.0260955923006807 0.02032185252719 0.0159119360438815 0.0307249562620476 0.0061717552394266 0.0105777988550206 0.0435656105521567 0.0165723446426396 0.011636018068093 0.0140666694596348 0.0753420855368251 0.0237401656759614 0.0354730750712538 0.00790342294875032 0.00479653859017819 0.0255515583340614 0.0379715660228324
Real Estate 0 0.00930843520528396 0.00268151625759764 2.16586571026507e-06 0.00360122615221598 0.0120453641353347 0.0280976439584374 0.00857363152332085 0.00578527753977459 0.0110832536475888 0.00953402016804794 0.00368769820250787 0.0153136335156387 0.00606629331178477 0.019092477220973 0.015605261496084 0.0507404149708621
Jasa Perusahaan 0.00253325093679209 0.0299732848215753 0.0101581136191745 0.017182503756847 0.0151022118407401 0.0325976916125345 0.0205779685662508 0.0347715468561978 0.00313577991249731 0.0579375398089549 0.0436352548315334 0.0291256994713263 0.0396804964830281 0.0455071103936001 0.0421731622477901 0.0699126943754395 0.032406468034524
Adminstrasi Pemerintahan, Pertahanan, dan Jaminan Sosial Wajib 0.000932011599226451 0.00283093402368526 0.00156585468438076 0.00123175267880351 0.00630123174044574 0.000740200625934528 0.00106880290069729 0.00814611837181314 0.00257527837415661 0.017617107345567 0.00371333085477498 0.0103315073548811 0.00865913091763543 0.00316229948351451 0.00247409984568751 0.00237130385569544 0.000495437390685478
Jasa Pendidikan 0 0.0004327291765298 0.000446223282094234 0.000116933222318085 0.000800380540449396 0.000277309641632523 0.00055216206287743 0.0038201268899742 9.1753340578697e-05 0.00041833551397777 0.0068178122763088 1.06041738013571e-08 0.0064709584624356 0.00173218191648513 0.00741596017522937 0.00398127162886621 0.00254004311033066
Jasa Kesehatan dan Kegiatan Sosial 3.76168622006389e-05 0.000831307669866375 0.000460415412114859 6.07265810142209e-07 4.82677733664352e-06 1.67296665209676e-07 0.00112850448469297 0.00388915107767882 0.000105057209669119 1.58940026635546e-06 0.00266130241048418 0.00120378448440833 0.00237666838786979 3.0190180361749e-05 0.00290312973722832 0.00396371448582922 0.0034137958324366
Jasa Lainnya 0.000764642283302485 0.000171681919532437 0.00113219101266462 0.00067162128224464 0.00233399898735189 0.00626864305112053 0.00142986948331837 0.00812695210443251 0.00019185573332064 0.023113599295279 0.000939576800533593 0.00196937534586664 0.003551267762591 0.00424382937307732 0.00786938715953018 0.00295201663504172 0.0150457513142345
  • Terakhir, estimasi koefisien untuk tahun 2022 setelah perubahan iklim
BL_2022 <-backward_linkage(A_2022)
FL_2022 <-forward_linkage(A_2022)
linkages_2022 <- cbind(BL_2022,FL_2022)
L_2022 <-leontief_inverse(A_2022)
MPM_2022 <- multiplier_product_matrix(L_2022)
OM_2022  <- output_multiplier(L_2022)
OA_2022  <- output_allocation(X,d2)
PD_2022  <- power_dispersion(L_2022) # measures of interconnectedness, namely power of dispersion and sensitivity of dispersion
PDCV_2022 <- power_dispersion_cv(L_2022)
SD_2022   <- sensitivity_dispersion(L_2022)
SDCV_2022 <- sensitivity_dispersion_cv(L_2022)
EO_2022   <-equilibrium_output(L_2022,d)

Membandingkan Koefisien IO tahun 2016 dan tahun 2022

Kali ini kita akan melihat bagaimana komparasi antara koefisien IO sebelum dan setelah dampak perubahan iklim.

Backward Linkages

Koefisien ini menggambarkan dampak sektor tertentu terhadap sektor-sektor lain yang outputnya digunakan sebagai input antara untuk setiap unit perubahan final demand. Perubahan Iklim menyebabkan sektor pertanian-kehutanan-perikanan , pengadaan listrik & gas , dan pengadaan air-limbah sampah-daur ulang berkurang output/produksinya. Oleh karenanya sektor-sektor ini mengalami peningkatan ketergantungan input secara umum yang cukup besar dibanding sektor lain jika dilihat dari nilai keterkaian kebelakang (backward linkage). Dengan kata lain sektor ini membutuhkan input yang lebih besar dari sektor lainnya.

kable(linkages <-cbind(nama_sektor,BL,BL_2022))
nama_sektor
Pertanian, Kehutanan, dan Perikanan 0.195194210526316 0.249624045124826
Pertambangan dan Penggalian 0.28277264957265 0.294708660288258
Industri Pengolahan 0.486036217008798 0.538877956998671
Pengadaan Listrik dan Gas 0.769080303030303 0.7931517978802
Pengadaan Air, Pengelolaan Sampah, Limbah dan Daur ulang 0.231866666666667 0.285840165104704
Konstruksi 0.502147766323024 0.55551075963836
Perdagangan Besar dan Eceran; Reparasi Mobil dan Sepeda Motor 0.264507468879668 0.271698146923404
Transportasi dan Pergudangan 0.453251677852349 0.496602085398067
Penyediaan Akomodasi Makan Minum 0.495926373626374 0.49205614391859
Informasi dan Komunikasi 0.339660810810811 0.348426343243267
Jasa Keuangan dan Asuransi 0.245704225352113 0.249802986857061
Real Estate 0.210614285714286 0.214023444115422
Jasa Perusahaan 0.361033333333333 0.382318022765373
Adminstrasi Pemerintahan, Pertahanan, dan Jaminan Sosial Wajib 0.411942105263158 0.418327406811786
Jasa Pendidikan 0.287822580645161 0.300770453543234
Jasa Kesehatan dan Kegiatan Sosial 0.4294 0.456315642286168
Jasa Lainnya 0.3903425 0.396188017843695

Forward Linkages

Forward Linkages menggambarkan dampak suatu sektor “X” terhadap sektor lain yang menggunakan hasil produksinya sebagai input antara untuk setiap unit perubahan final demand. Perubahan Iklim menyebabkan ketiga sektor ini mengalami penurunan nilai koefisien secara umum yang cukup besar dibanding sektor lain. Oleh karenanya ketiga sektor ini mengalami penurunan kemampuan untuk mendorong sektor ekonomi lainnya. Karena berkurang, maka yang menggunakan output sektor ini sebagai input produksinya akan menurun aktivitasnya.

kable(linkages <-cbind(nama_sektor,FL,FL_2022))
nama_sektor
Pertanian, Kehutanan, dan Perikanan 0.382652933944114 0.306130017930469
Pertambangan dan Penggalian 0.394316499273794 0.448815871848141
Industri Pengolahan 1.72536162790442 1.949026281619
Pengadaan Listrik dan Gas 0.648427888161222 0.619944606532018
Pengadaan Air, Pengelolaan Sampah, Limbah dan Daur ulang 0.0423622825848069 0.0401818878010345
Konstruksi 0.245588807713708 0.258221475712124
Perdagangan Besar dan Eceran; Reparasi Mobil dan Sepeda Motor 0.561081443868752 0.617971489798705
Transportasi dan Pergudangan 0.49210728975932 0.528850861903092
Penyediaan Akomodasi Makan Minum 0.181577778168294 0.191562588900315
Informasi dan Komunikasi 0.412887873044573 0.435566277415381
Jasa Keuangan dan Asuransi 0.381892595622005 0.406422946130634
Real Estate 0.190319247739136 0.201218313171163
Jasa Perusahaan 0.497128451321537 0.526410777568806
Adminstrasi Pemerintahan, Pertahanan, dan Jaminan Sosial Wajib 0.0700339946171261 0.0742164020475848
Jasa Pendidikan 0.0339126544411195 0.0359141918442617
Jasa Kesehatan dan Kegiatan Sosial 0.0216113750433579 0.0230118289749193
Jasa Lainnya 0.0760404313977203 0.080776259543442

Index Perubahan Koefisien

Multilplier Output

Angka pengganda output (output multiplier), yaitu multiplier yang dapat mengestimasi perubahan faktor eksogen terhadap output sektor-sektor yang ada pada perekonomian. Semakin besar angka pengganda output semakin penting peranan sektor tersebut dalam output perekonomian sehingga bisa disebut sektor unggulan

Sektor energi yakni listrik dan gas memiliki pengganda output tertinggi

perubahanOM <- output_multiplier <-cbind(nama_sektor,OM,OM_2022)
kable(perubahanOM)
nama_sektor
Pertanian, Kehutanan, dan Perikanan 1.30764871942427 1.42688209488232
Pertambangan dan Penggalian 1.46027986284354 1.50245332124596
Industri Pengolahan 1.76523429899704 1.91529890574201
Pengadaan Listrik dan Gas 2.67165966969941 2.74322482406384
Pengadaan Air, Pengelolaan Sampah, Limbah dan Daur ulang 1.40043284141207 1.5296539731741
Konstruksi 1.82895975062451 1.97402938022852
Perdagangan Besar dan Eceran; Reparasi Mobil dan Sepeda Motor 1.43144713749241 1.46322890719007
Transportasi dan Pergudangan 1.77209177657207 1.8929604374132
Penyediaan Akomodasi Makan Minum 1.78826580601589 1.85337845857423
Informasi dan Komunikasi 1.58545813215127 1.61331644241951
Jasa Keuangan dan Asuransi 1.38626470000944 1.40648037462632
Real Estate 1.35843410232861 1.38254517213984
Jasa Perusahaan 1.58808691516017 1.64903060972093
Adminstrasi Pemerintahan, Pertahanan, dan Jaminan Sosial Wajib 1.71978109244244 1.77043144581474
Jasa Pendidikan 1.49151384436545 1.53863820728745
Jasa Kesehatan dan Kegiatan Sosial 1.72373044209657 1.81219237788333
Jasa Lainnya 1.64908327617222 1.68786141086045 
##kable(output_multiplier <-cbind(nama_sektor,OM,OM_2022))
write_xlsx(as.data.frame(perubahanOM),"multipier_output.xlsx")

Indeks Daya Penyebaran

Mengukur indeks keterkaitan saja dianggap tidak cukup karena belum mencerminkan keragaman pengaruh ganda antar sektor, untuk itu indeks penyebaran perlu dihitung guna mengetahui keragaman ketergantungan antar sektor.

Indeks penyebaran yang tinggi pada sektor i berarti sektor i hanya tergantung pada satu atau beberapa sektor saja. Sedangkan bila indeks penyebaran sektor i rendah, ini menggambarkan bahwa sektor i tergantung secara merata terhadap seluruh sektor dalam perekonomian

Sektor listrik dan gas memiliki nilai yang paling tinggi, karena indeks penyebaran berkiatan dengan backward lingkages maka sektor ini hanya tergantung pada satu atau beberapa sektor saja (termasuk dirinya sendiri).

power_dispersion <-cbind(nama_sektor,PD,PD_2022)
write_xlsx(as.data.frame(power_dispersion),"power_dispersion.xlsx")
kable(power_dispersion)
nama_sektor
Pertanian, Kehutanan, dan Perikanan 0.795965763326647 0.831812737867238
Pertambangan dan Penggalian 0.888872338903475 0.875867610327256
Industri Pengolahan 1.07449810134802 1.11653936392746
Pengadaan Listrik dan Gas 1.62623921604693 1.59918563676287
Pengadaan Air, Pengelolaan Sampah, Limbah dan Daur ulang 0.8524434575159 0.891724455705915
Konstruksi 1.11328778315976 1.15077678056762
Perdagangan Besar dan Eceran; Reparasi Mobil dan Sepeda Motor 0.871321859250954 0.853001413208317
Transportasi dan Pergudangan 1.07867224788404 1.10351696875761
Penyediaan Akomodasi Makan Minum 1.08851737945575 1.08044232628621
Informasi dan Komunikasi 0.965068350264469 0.940496185233782
Jasa Keuangan dan Asuransi 0.843819309976157 0.819919386030946
Real Estate 0.826878825427214 0.805966161456121
Jasa Perusahaan 0.966668490457483 0.961316054927422
Adminstrasi Pemerintahan, Pertahanan, dan Jaminan Sosial Wajib 1.04683073494185 1.03208767804383
Jasa Pendidikan 0.907884463164774 0.896961889409978
Jasa Kesehatan dan Kegiatan Sosial 1.04923470403951 1.05643255935144
Jasa Lainnya 1.00379697483705 0.983952792135977

Daya Kepekeaan

Sektor yang memiliki daya kepekaan paling tinggi berarti sektor tersebut akan terkena pengaruh yang paling besar dari perubahan output secara keseluruhan.

Pada kasus ini industri pengolahan yang memiliki daya kepekaan terbesar, penurunan output keseluruhan akan menyebabkan sektor ini terkontraksi dan sebagai akibatnya akan mempengaruhi penurunan lanjutan pada sektor lain yang juga membutuhkan hasil produksinya.

sensitivity_dispersion<-cbind(nama_sektor,SD,SD_2022)
 write_xlsx(as.data.frame(sensitivity_dispersion),"sensitivity_dispersion.xlsx")
kable(sensitivity_dispersion)
nama_sektor
Pertanian, Kehutanan, dan Perikanan 1.11687809771574 1.01768703518202
Pertambangan dan Penggalian 1.17328709703624 1.2257161716509
Industri Pengolahan 2.36032245979336 2.60958256543296
Pengadaan Listrik dan Gas 1.42801450954172 1.32848568267474
Pengadaan Air, Pengelolaan Sampah, Limbah dan Daur ulang 0.639392375185959 0.610846538835585
Konstruksi 0.805515545180389 0.787318166362834
Perdagangan Besar dan Eceran; Reparasi Mobil dan Sepeda Motor 1.1794893133964 1.22992757054785
Transportasi dan Pergudangan 1.07613518308124 1.0952482984236
Penyediaan Akomodasi Makan Minum 0.748389435745946 0.728698885508019
Informasi dan Komunikasi 1.01923157862897 1.02051547193457
Jasa Keuangan dan Asuransi 1.00216469026065 1.00292465865983
Real Estate 0.775129120034819 0.759387835551588
Jasa Perusahaan 1.05877869203614 1.05821366639464
Adminstrasi Pemerintahan, Pertahanan, dan Jaminan Sosial Wajib 0.675228042355919 0.653697951087471
Jasa Pendidikan 0.638410420989915 0.614309744037661
Jasa Kesehatan dan Kegiatan Sosial 0.62786626411845 0.603472542204828
Jasa Lainnya 0.675767174898144 0.653967215510897

Output Allocation

m<-as.data.frame<-cbind(nama_sektor,OM,OM_2022)
m<-as_tibble(m)
Warning: The `x` argument of `as_tibble.matrix()` must have unique column names if
`.name_repair` is omitted as of tibble 2.0.0.
ℹ Using compatibility `.name_repair`.
##write_xlsx(as.data.frame(m),"output_allocation.xlsx")
kable(m)
nama_sektor V2 V3
Pertanian, Kehutanan, dan Perikanan 1.30764871942427 1.42688209488232
Pertambangan dan Penggalian 1.46027986284354 1.50245332124596
Industri Pengolahan 1.76523429899704 1.91529890574201
Pengadaan Listrik dan Gas 2.67165966969941 2.74322482406384
Pengadaan Air, Pengelolaan Sampah, Limbah dan Daur ulang 1.40043284141207 1.5296539731741
Konstruksi 1.82895975062451 1.97402938022852
Perdagangan Besar dan Eceran; Reparasi Mobil dan Sepeda Motor 1.43144713749241 1.46322890719007
Transportasi dan Pergudangan 1.77209177657207 1.8929604374132
Penyediaan Akomodasi Makan Minum 1.78826580601589 1.85337845857423
Informasi dan Komunikasi 1.58545813215127 1.61331644241951
Jasa Keuangan dan Asuransi 1.38626470000944 1.40648037462632
Real Estate 1.35843410232861 1.38254517213984
Jasa Perusahaan 1.58808691516017 1.64903060972093
Adminstrasi Pemerintahan, Pertahanan, dan Jaminan Sosial Wajib 1.71978109244244 1.77043144581474
Jasa Pendidikan 1.49151384436545 1.53863820728745
Jasa Kesehatan dan Kegiatan Sosial 1.72373044209657 1.81219237788333
Jasa Lainnya 1.64908327617222 1.68786141086045