Analisis Peramalan Jumlah Kecelakaan di Indonesia Tahun 2009–2017 menggunakan Metode Fuzzy Time Series dengan Model Chen pada R

Assalamu’alaikum Warahmatullahi Wabarakatuh.

Pada kesempatan kali ini, penulis akan menjelaskan mengenai analisis peramalan pada data runtun waktu atau time series. Peramalan merupakan suatu kegiatan yang dilakukan oleh peneliti dalam memprediksi kejadian di masa mendatang. Metode yang digunakan pun amat sangat banyak, salah satunya yaitu Metode Fuzzy Time Series model Chen.

Fuzzy Time Series (FTS) ialah metode peramalan data yang menggunakan prinsip-prinsip fuzzy sebagai dasarnya. Sistem peramalannya menangkap pola dari data yang telah lalu kemudian digunakan untuk memproyeksikan data yang akan datang. Himpunan fuzzy dapat diartikan sebagai suatu kelas bilangan dengan batasan samar. Nilai-nilai yang digunakan dalam peramalan Fuzzy Time Series adalah himpunan fuzzy dari bilangan-bilangan real atas himpunan semesta yang sudah ditentukan. Himpunan fuzzy digunakan untuk menggantikan data historis yang akan diramalkan.

Diatas merupakan sedikit penjelasan mengenai Fuzzy Time Series.

Selanjutnya yaitu pengaplikasian metode Fuzzy Time Series model Chen pada data jumlah kecelakaan di Indonesia tahun 2009–2017. Analisis menggunakan bantuan software R. Langkah-langkah sebagai berikut :

library(AnalyzeTS)
datafuzzy=read.csv(“E:\\Kuliah\\ARW\\jml kecelakaan.csv”, sep=”;”)
datafuzzy
minimal=min(datafuzzy$Jumlah.kecelakaan)
minimal
maksimal=max(datafuzzy$Jumlah.kecelakaan)
maksimal
n=1+3.332*log10(9)
n
n=5
fuzzy.ts=ts(datafuzzy$Jumlah.kecelakaan, start=2009)
fuzzy.ts
plot(fuzzy.ts)
library(tseries)
library(forecast)
chen=Gfuzzy.ts1(fuzzy.ts,n=4,type=”Chen”,plot=TRUE,grid=TRUE)
chen

Berikut merupakan keseluruhan dari syntax yang akan digunakan dalam analisis peramalan menggunakan metode Fuzzy Time Series model Chen.

Install Package

Untuk langkah pertama yaitu menginstall package AnalyzeTS. Pastikan package sudah terinstal, jika belum maka lakukan dengan cara seperti dibawah ini

library(AnalyzeTS)
Input Data

Pembaca dapat menginput data dengan cara dibawah ini. Pastikan lokasi penyimpanan sesuai dengan letak data yang akan digunakan

datafuzzy=read.csv(“E:\\Kuliah\\ARW\\jml kecelakaan.csv”, sep=”;”)
datafuzzy

Maka data akan terinput seperti dibawah ini :

Tahun Jumlah.kecelakaan
1 2009 4381000
2 2010 4613000
3 2011 4508000
4 2012 4457000
5 2013 3631000
6 2014 3472000
7 2015 4313000
8 2016 3777000
9 2017 4011000

Dari output tersebut data yang telah terinput sudah sesuai dengan data yang akan kita analisis. Maka langkah berikutnya yaitu menentukan nilai minimal dan maksimal dari data tersebut.

Menentukan Nilai Minimal, Maksimal dan Banyak Kelas
minimal=min(datafuzzy$Jumlah.kecelakaan)
minimal
maksimal=max(datafuzzy$Jumlah.kecelakaan)
maksimal

Dari syntax tersebut didapat hasil :

> minimal=min(datafuzzy$Jumlah.kecelakaan)
> minimal
[1] 3472000
> maksimal=max(datafuzzy$Jumlah.kecelakaan)
> maksimal
[1] 4613000

Dari hasil tersebut tidak perlu dilakukan penghitungan ulang untuk nilai maksimal dan minimal karena hasil dari nilai yang didapat sudah bulat. Maka selanjutnya dilanjutkan menentukan banyak kelas yaitu dengan cara :

n=1+3.332*log10(9)
n

Maka didapat hasil seperti dibawah ini :

> n
[1] 4.179536
Peramalan

Setelah mendapat nilai dari banyaknya kelas, pembaca dapat melakukan peramalan dengan menggunakan nilai n=4. Cara yang dapat digunakan seperti dibawah ini :

library(tseries)
library(forecast)
chen=Gfuzzy.ts1(fuzzy.ts,n=4,type=”Chen”,plot=TRUE,grid=TRUE)
chen

Maka didapatlah hasil peramalan adalah

> library(tseries)
> library(forecast)
> chen=Gfuzzy.ts1(fuzzy.ts,n=4,type=”Chen”,plot=TRUE,grid=TRUE)
> chen
Time Series:
Start = 2009 
End = 2017 
Frequency = 1 
[1] NA 4042500 4042500 4042500 4042500 3899875 3899875 3899875 3899875

Dengan plot seperti gambar dibawah ini :

Dari hasil peramalan tersebut, titik persegi pada gambar menunjukkan data asli dari penulis. Kemudian untuk titik segitiga merupakan data peramalan metode Fuzzy Time Series dengan model Chen.

Demikian sedikit pemaparan yang dapat saya sampaikan mengenai metode Fuzzy Time Series dengan model Chen. Jika ada pertanyaan, masukkan maupun saran silahkan komentar dibawah ini.

Terimakasih

Wassalamu’alaikum Warahmatullahi Wabarakatuh