function ratahistrogram
baris=6;
kolom=6;
derajatkeabuan=15;
awal=zeros(baris,kolom);
akhir=zeros(baris,kolom);
kemunculan=zeros(1,derajatkeabuan);
probkemunculan=zeros(1,derajatkeabuan);
sumprobkemunculan=zeros(1,derajatkeabuan);
awal=[2 8 9 8 10 12;12 6 6 7 10 11;5 8 9 8 7 7;6 7 11 12 11 12;9 9 12 10 10 9;5 6 5 6 5 5]
for i=1:baris;
for j=1:kolom;
switch awal(i,j);
case 0
kemunculan(0)=kemunculan(0)+1;
probkemunculan(0)=kemunculan(0)/(baris*kolom);
case 1
kemunculan(1)=kemunculan(1)+1;
probkemunculan(1)=kemunculan(1)/(baris*kolom);
case 2
kemunculan(2)=kemunculan(2)+1;
probkemunculan(2)=kemunculan(2)/(baris*kolom);
case 3
kemunculan(3)=kemunculan(3)+1;
probkemunculan(3)=kemunculan(3)/(baris*kolom);
case 4
kemunculan(4)=kemunculan(4)+1;
probkemunculan(4)=kemunculan(4)/(baris*kolom);
case 5
kemunculan(5)=kemunculan(5)+1;
probkemunculan(5)=kemunculan(5)/(baris*kolom);
case 6
kemunculan(6)=kemunculan(6)+1;
probkemunculan(6)=kemunculan(6)/(baris*kolom);
case 7
kemunculan(7)=kemunculan(7)+1;
probkemunculan(7)=kemunculan(7)/(baris*kolom);
case 8
kemunculan(8)=kemunculan(8)+1;
probkemunculan(8)=kemunculan(8)/(baris*kolom);
case 9
kemunculan(9)=kemunculan(9)+1;
probkemunculan(9)=kemunculan(9)/(baris*kolom);
case 10
kemunculan(10)=kemunculan(10)+1;
probkemunculan(10)=kemunculan(10)/(baris*kolom);
case 11
kemunculan(11)=kemunculan(11)+1;
probkemunculan(11)=kemunculan(11)/(baris*kolom);
case 12
kemunculan(12)=kemunculan(12)+1;
probkemunculan(12)=kemunculan(12)/(baris*kolom);
case 13
kemunculan(13)=kemunculan(13)+1;
probkemunculan(13)=kemunculan(13)/(baris*kolom);
case 14
kemunculan(14)=kemunculan(14)+1;
probkemunculan(14)=kemunculan(14)/(baris*kolom);
otherwise
kemunculan(15)=kemunculan(15)+1;
probkemunculan(15)=kemunculan(15)/(baris*kolom);
end
end
end
kemunculan
probkemunculan
for i=1:derajatkeabuan
if i==1
sumprobkemunculan(i)=probkemunculan(i);
else
sumprobkemunculan(i)=sumprobkemunculan(i-1)+probkemunculan(i);
end
end
sumprobkemunculan
for i=1:derajatkeabuan
sumprobkemunculan(i)=sumprobkemunculan(i)*derajatkeabuan;
end
for i=1:baris;
for j=1:kolom;
switch awal(i,j)
case 0
akhir(i,j)=ceil(sumprobkemunculan(0));
case 1
akhir(i,j)=ceil(sumprobkemunculan(1));
case 2
akhir(i,j)=ceil(sumprobkemunculan(2));
case 3
akhir(i,j)=ceil(sumprobkemunculan(3));
case 4
akhir(i,j)=ceil(sumprobkemunculan(4));
case 5
akhir(i,j)=ceil(sumprobkemunculan(5));
case 6
akhir(i,j)=ceil(sumprobkemunculan(6));
case 7
akhir(i,j)=ceil(sumprobkemunculan(7));
case 8
akhir(i,j)=ceil(sumprobkemunculan(8));
case 9
akhir(i,j)=ceil(sumprobkemunculan(9));
case 10
akhir(i,j)=ceil(sumprobkemunculan(10));
case 11
akhir(i,j)=ceil(sumprobkemunculan(11));
case 12
akhir(i,j)=ceil(sumprobkemunculan(12));
case 13
akhir(i,j)=ceil(sumprobkemunculan(13));
case 14
akhir(i,j)=ceil(sumprobkemunculan(14));
otherwise
akhir(i,j)=ceil(sumprobkemunculan(15));
end
end
end
akhir
This is dummy text. It is not meant to be read. Accordingly, it is difficult to figure out when to end it. But then, this is dummy text. It is not meant to be read. Period.
ConversionConversion EmoticonEmoticon