Ini sebenernya tugas kuliah kecerdasan buatan. berhubung saya sudah selesai dengan ini daripada numpuk aja di drive mending di share. Lebih bermanfaat buat teman-teman yang lain.
Aplikasi ini di buat berdasarkan contoh kasus. Terdapat penyelesaian dalam bentuk manual sekaligus implementasinya ke bahasa pemograman C#
Screenshot aplikasinya :
Contoh Kasus :
Sebuah perusahaan makanan kaleng akan memproduksi makanan
jenis ABC. Dari data 1 bulan terakhir, PERMINTAAN TERBESAR mencapai 5000
kemasan/hari, dan PERMINTAAN TERKECIL 1000 kemasan/hari. PERSEDIAAN TERBANYAK
digudang sampai 600 kemasan/hari, dan PERSEDIAAN TERKECIL mencapai 100
kemasan/hari. Dengan segala keterbatasan kemampuan PRODUKSI TERBANYAK adalah
7000 kemasan/hari, dan agar efisien PRODUKSI TERKECIL adalah 2000 kemasan/hari.
Dalam produksi perusahaan menggunakan aturan :
R1 : JIKA permintaan TURUN
dan persediaan BANYAK maka produksi BERKURANG
R2 : JIKA permintaan TURUN
dan persediaan SEDIKIT maka produksi BERKURANG
R3 : JIKA permintaan NAIK
dan persediaan BANYAK maka produksi BERTAMBAH
R4 : JIKA permintaan NAIK
dan persediaan SEDIKIT maka produksi BERTAMBAH
Berapa harus diproduki jika PERMINTAAN 4000 kemasan dan
PERSEDIAAN 300 kemasan.
Masalah di atas bisa di selesaikan menggunakan aplikasi yang saya bagikan ini. tapi sebelumnya mari kita bahas proses penyelesaian secara manual dulu, sehingga nantinya kita menentukan seberapa besar tingkat akurasi dari program yang kita buat ini. Berikut penyelesaiannya menggunakan metode fuzzy mamdani :
Terdapat 3 variabel fuzzy yaitu (1) permintaan, (2)
persediaan, dan (3) produksi
·
PERMINTAAN
Terdiri dari 2 himpunan
fuzzy, yaitu (1) TURUN, dan (2) NAIK
Diketahui :
Permintaan terendah adalah
1000 kemasan/hari
Permintaan tertinggi
adalah 5000 kemasan/hari
Permintaan permasalahan =
4000 kemasan
·
·
PERSEDIAAN
Terdiri dari 2 himpunan fuzzy, yaitu (1) SEDIKIT, dan (2) BANYAK
Diketahui :
Persediaan terendah adalah 100 kemasan/hari
Persediaan tertinggi adalah 600 kemasan/hari
Persediaan permasalahan = 300 kemasan
·
PRODUKSI
Terdiri dari 2 himpunan fuzzy, yaitu (1) BERKURANG, dan (2) BERTAMBAH
Diketahui :
Produksi terendah adalah 2000 kemasan/hari
Produksi tertinggi adalah 7000 kemasan/hari
Produksi permasalahan = ditanyakan ?? kemasan
Cari Nilai Produksi Z, dengan fungsi implikasi MIN
·
Permintaan x
·
Persediaan y
Didapat fungsi keanggotaan
hasil komposisi sbb :
Defuzzifikasi
Dengan Metode
Centroid hitung momen tiap area :
Hitung luas masing2
area
Sehingga
Untuk penjelasannya silahkan di pahami masing-masing. Selanjutnya berikut adalah source code aplikasinya :
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
namespace WindowsFormsApplication4
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
private void Form1_Load(object sender, EventArgs e)
{
}
private void button1_Click(object sender, EventArgs e)
{
double PmMax, PmMin, Prm, MaxPro, MinPro;
double uTrn, uNak;
{
PmMax = double.Parse(PemMax.Text);
PmMin = double.Parse(PemMin.Text);
Prm = double.Parse(Permintaan.Text);
uTrn = rumus.turun(PmMax, PmMin, Prm);
uTurun.Text = uTrn.ToString();
uNak = rumus.naik(PmMax, PmMin, Prm);
uNaik.Text = uNak.ToString();
}
double PrMax, PrMin, Pers;
double uSdk, uByk;
{
PrMax = double.Parse(PerMax.Text);
PrMin = double.Parse(PerMin.Text);
Pers = double.Parse(Persediaan.Text);
uSdk = rumus.sedikit(PrMax, PrMin, Pers);
uByk = rumus.banyak(PrMax, PrMin, Pers);
uSedikit.Text = uSdk.ToString();
uBanyak.Text = uByk.ToString();
}
double p1, p2, p3, p4, max1, max2, max, Min1, Min2, Min, a1, a2;
double m1, m2, m3, AA1, AA2, AA3, z;
// Mencari a-predikat 1 - 4
p1 = Math.Min(Math.Round(uTrn, 2), Math.Round(uByk, 2));
p2 = Math.Min(Math.Round(uTrn, 2), Math.Round(uSdk, 2));
p3 = Math.Min(Math.Round(uNak, 2), Math.Round(uByk, 2));
p4 = Math.Min(Math.Round(uNak, 2), Math.Round(uSdk , 2));
// Mencari Min
Min1 = Math.Min(p1, p2);
Min2 = Math.Min(p3, p4);
Min = Math.Min(Min1, Min2);
// Mencari Max
max1 = Math.Max(p1, p2);
max2 = Math.Max(p3, p4);
max = Math.Max(max1, max2);
// Mencari a1 dan a2
MinPro = double.Parse(MinPd.Text);
MaxPro = double.Parse(MaxPd.Text);
a1 = (Min * (MaxPro - MinPro)) + (MaxPro - PmMax); // Mencari batas area 1
a2 = (max * (MaxPro - MinPro)) + (MaxPro - PmMax); // Mencari batas area 2
ta1.Text = a1.ToString();
ta2.Text = a2.ToString();
// Defuzzyfikasi
m1 = Math.Round((Min / 2) * (Math.Pow(a1, 2)), 2);
m2 = Math.Round((((1 / (MaxPro - MinPro)) / 2) * (Math.Pow(a2, 3))) - ((MinPro / (MaxPro-MinPro)) / 2) * Math.Pow(a2, 2)) - (((1 / (MaxPro - MinPro)) / 3) * (Math.Pow(a1, 3))) - (((MinPro / (MaxPro - MinPro)) / 2 * (Math.Pow(a1, 2))));
m3 = Math.Round(((max * Math.Pow(MaxPro, 2)) / 2) - (max * (MaxPro - MinPro) / 2) * (MaxPro - MinPro), 2);
TM1 .Text = m1.ToString();
TM2.Text = m2.ToString();
TM3.Text = m3.ToString();
// Mencari Luas Area A1,A2,A3
AA1 = a1 * Min;
AA2 = (Min + max) * (a2 - a1) / 2;
AA3 = (MaxPro - (MaxPro - MinPro)) * max;
A_1.Text = AA1.ToString();
A_2.Text = AA2.ToString();
A_3.Text = AA3.ToString();
z = (m1 + m2 + m3) / (AA1 + AA2 + AA3); // Titik Pusat
Hasil.Text = z.ToString();
}
private void uSedikit_TextChanged(object sender, EventArgs e)
{
}
}
}
public partial class rumus
{
public static double turun(double PmMax, double PmMin, double Prm)
{
double u;
if (Prm <= PmMin) { u = 1; }
else if ((PmMin <= Prm) && (Prm <= PmMax)) { u = (PmMax - Prm) / (PmMax - PmMin); }
else { u = 0; }
return u;
}
public static double naik(double PmMax, double PmMin, double Prm)
{
double u;
if (Prm <= PmMin) { u = 1; }
else if ((PmMin <= Prm) && (Prm <= PmMax)) { u = (Prm - PmMin) / (PmMax - PmMin); }
else { u = 0; }
return u;
}
public static double sedikit(double PrMax, double PrMin, double Pers)
{
double u;
if (Pers <= PrMin) { u = 1; }
else if ((PrMin <= Pers) && (Pers <= PrMax)) { u = (PrMax - Pers) / (PrMax - PrMin); }
else { u = 0; }
return u;
}
public static double banyak(double PrMax, double PrMin, double Pers)
{
double u;
if (Pers <= PrMin) { u = 0; }
else if ((PrMin <= Pers) && (Pers <= PrMax)) { u = (Pers - PrMin) / (PrMax - PrMin); }
else { u = 0; }
return u;
}
}
Untuk Source Codenya, bisa di dowload disini :
via google drive ==> Klik Disini
