using?System;
using?System.Collections;
using?System.Linq;
using?System.Text;
using?System.Data;

namespace?實驗二
{
????class?Fano
????{/**Fano算法?
?????*??
?????*?1.信源符號按概率遞減的方式排列?
?????*?2.將排列好的符號分成兩組，使每組的概率之和接近相等并對賦于0和1?
?????*?3.將每一大組再分組，同2?
?????*?4.依次下去，直到只剩一個信源符號?
?????*?5.信源符號所對應的碼字即為費諾碼?
?????*/
??????//?Data?data;//符號集??
????????//double?prob;//概率??
????????int?codelength;//碼長??
????????/*費諾碼的實現*/
????????public?ArrayList?isFano（double[]?px）
????????{
????????????ArrayList?list?=?new?ArrayList（）;
????????????double[]?arr?=?new?double[px.Length];
????????????for?（int?i?=?0;?i?????????????{
????????????????//data?=?（Data）list.get（i）;//得到每一個符號??
????????????????//prob?=?data.getProb（）;//取出符號概率??
????????????????arr[i]?=?px[i];//將概率存放在一個數組中??
????????????}
????????????String[]?codeword?=?getGroup（arr?0?arr.Length?-?1）;//符號編碼??
????????????for?（int?i?=?0;?i?????????????{
???????????????//?data?=?（Data）list.get（i）;//得到每一個符號??
????????????????//data.setCodeword（codeword[i]）;//加上碼字??
????????????????//data.setCodeLength（codeword[i].Length（））;//加上碼長??
????????????????//list.set（i?data）;//加上符號?
????????????????list.Add（codeword[i]）;
????????????}


????????????return?list;//返回改變的列表??
????????}
????????/*用分組法求出符號的編碼*/
????????public?static?String[]?getGroup（double[]?a?int?i?int?j）
????????{

????????????String[]?p?=?new?String[a.Length];?//返回的字符編碼??
????????????for?（int?t?=?0;?t?????????????{
????????????????p[t]?=?““;//初始化??
????????????}
????????????int?flag?=?0;//分組間隔點??
????????????if?（i?????????????{
????????????????//采用遞歸法將數組分為兩半??
????????????????double?sum?=?10;//比較中間量??
????????????????for?（int?k?=?i;?k?<=?j;?k++）
????????????????{
????????????????????//取累和間距最小量??
????????????????????if?（Math.Abs（sumGroup（a?i?k）?-?sumGroup（a?k?+?1?j））?????????????????????{
????????????????????????//以flag為中間點分別累加左邊和右邊然后比較??
????????????????????????sum?=?Math.Abs（sumGroup（a?i?k）?-?sumGroup（a?k?+?1?j））;
????????????????????????flag?=?k;//取出中間點??
????????????????????}
????????????????}
????????????????String[]?p1?=?getGroup（a?i?flag）;//遞歸第一組（左邊）??
????????????????String[]?p2?=?getGroup（a?flag?+?1?j）;//遞歸第二組（右邊）??
????????????????for?（int?m?=?i;?m?<=?flag;?m++）
????????????????{
????????????????????p[m]?=?“0“?+?p1[m];//第一組賦值0??
????????????????}
????????????????for?（int?m?=?flag?+?1;?m?<=?j;?m++）
????????????????{
????????????????????p[m]?=?“1“?+?p2[m];//第二組賦值1??
????????????????}
????????????}

????????????return?p;//得到分組后的碼字??
????????}
????????/*求數組第i位到第j位的和*/
????????public?static?double?sumGroup（double[]?a?int?i?int?j）
????????{
????????????double?total?=?0;
????????????for?（int?k?=?i;?k?<=?j;?k++）
????????????{
????????????????total?=?total?+?a[k];
????????????}
????????????return?total;
????????}??
????}
}

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件??????16896??2018-12-23?15:31??實驗二\實驗二\bin\Debug\實驗二.exe

?????文件??????38400??2018-12-23?15:31??實驗二\實驗二\bin\Debug\實驗二.pdb

?????文件??????11600??2018-12-23?23:02??實驗二\實驗二\bin\Debug\實驗二.vshost.exe

?????文件????????490??2018-04-12?07:35??實驗二\實驗二\bin\Debug\實驗二.vshost.exe.manifest

?????文件???????3478??2018-12-17?15:13??實驗二\實驗二\Fano.cs

?????文件???????5420??2018-12-09?15:52??實驗二\實驗二\obj\x86\Debug\DesignTimeResolveAssemblyReferences.cache

?????文件???????6356??2018-12-23?15:31??實驗二\實驗二\obj\x86\Debug\DesignTimeResolveAssemblyReferencesInput.cache

?????文件????????774??2018-12-23?23:02??實驗二\實驗二\obj\x86\Debug\實驗二.csproj.FileListAbsolute.txt

?????文件????????979??2018-12-17?09:24??實驗二\實驗二\obj\x86\Debug\實驗二.csproj.GenerateResource.Cache

?????文件???????9214??2018-12-16?19:30??實驗二\實驗二\obj\x86\Debug\實驗二.csprojResolveAssemblyReference.cache

?????文件??????16896??2018-12-23?15:31??實驗二\實驗二\obj\x86\Debug\實驗二.exe

?????文件??????38400??2018-12-23?15:31??實驗二\實驗二\obj\x86\Debug\實驗二.pdb

?????文件????????180??2018-12-17?15:13??實驗二\實驗二\obj\x86\Debug\實驗二.Properties.Resources.resources

?????文件????????180??2018-12-17?15:13??實驗二\實驗二\obj\x86\Debug\實驗二.實驗二.resources

?????文件????????494??2018-12-05?15:22??實驗二\實驗二\Program.cs

?????文件???????1350??2018-12-05?15:21??實驗二\實驗二\Properties\AssemblyInfo.cs

?????文件???????2870??2018-12-05?15:21??實驗二\實驗二\Properties\Resources.Designer.cs

?????文件???????5612??2018-12-05?15:21??實驗二\實驗二\Properties\Resources.resx

?????文件???????1096??2018-12-05?15:21??實驗二\實驗二\Properties\Settings.Designer.cs

?????文件????????249??2018-12-05?15:21??實驗二\實驗二\Properties\Settings.settings

?????文件??????10317??2018-12-21?18:07??實驗二\實驗二\實驗二.cs

?????文件???????3732??2018-12-17?15:13??實驗二\實驗二\實驗二.csproj

?????文件??????15898??2018-12-17?09:24??實驗二\實驗二\實驗二.Designer.cs

?????文件???????5817??2018-12-17?09:24??實驗二\實驗二\實驗二.resx

?????文件????????869??2018-12-05?15:21??實驗二\實驗二.sln

????..A..H.?????19456??2018-12-23?23:06??實驗二\實驗二.suo

?????目錄??????????0??2018-12-05?15:21??實驗二\實驗二\obj\x86\Debug\TempPE

?????目錄??????????0??2018-12-23?15:31??實驗二\實驗二\obj\x86\Debug

?????目錄??????????0??2018-12-09?15:52??實驗二\實驗二\bin\Debug

?????目錄??????????0??2018-12-05?15:22??實驗二\實驗二\bin\Release

............此處省略9個文件信息