clear?all;
clc;
load（‘USPStrainingdata.mat‘）;%讀入訓練樣本數據庫
[charNumbersdimension]=size（traindata）;%獲得樣本數據庫中樣本中個數charNumbers和每個字符向量維數dimension
image=zeros（1616）;%初始化歸一化圖像
P=mat2gray（traindata）;%轉換為灰度圖像
fid?=?fopen（‘usps.bin‘‘wb‘）;
startx=0;
overx=0;
len=0;
for?k=1:50
????class=find（traintarg（k:）==1）-1;%獲取當前字符的類別
????for?i=1:16
????????for?j=1:16
????????????image（ij）=P（k（i-1）*16+j）;
????????end
????end
????th=?graythresh（image）;%求灰度圖像的閾值th
????I=im2bw（imageth）;%二值化字符圖像
????I=~I;
????%??????g=bwmorph（I‘thin‘1）;%細化二值化圖形
????%??????subplot（510k）imshow（~I）;%顯示字符圖像
????fwrite（fidclass‘uchar‘）;?%記錄字符圖像的類別
????fwrite（fid255‘uchar‘）;?%記錄字符圖像的類別
????fwrite（fid255‘uchar‘）;?%記錄字符圖像的類別
????for?i=1:16
????????for?j=1:16
????????????pixel=I（ij）;
????????????if?（~startx?&?~overx?&?pixel==0）
????????????????beginx?=?j-1;
????????????????beginy?=?i-1;
????????????????startx?=?1;
????????????end
????????????%遇到第一個白色像素
????????????if?（~overx?&?startx?&&?pixel==1）

????????????????endx?=?j-1;
????????????????overx?=?1;
????????????end
????????????%已經到了行尾
????????????if?（~overx?&?startx?&?pixel==0?&&?j==16）

????????????????endx?=?j-1;
????????????????overx?=?1;
????????????end
????????????if?（startx==1?&&?overx==1）
????????????????length?=?endx?-?beginx;
????????????????startx?=?0;
????????????????overx?=?0;
????????????????fwrite（fidbeginx‘uchar‘）;?%寫入圖象的寬度和高度
????????????????fwrite（fidbeginy‘uchar‘）;?%寫入圖象的寬度和高度
????????????????fwrite（fidlength‘uchar‘）;?%寫入圖象的寬度和高度
????????????????length=0;
????????????????found=1;
????????????end
????????end
????end
????%寫入結束標志
????if?（found==1）
????????fwrite（fid0‘uchar‘）;?%寫入圖象的寬度和高度
????????fwrite（fid0‘uchar‘）;?%寫入圖象的寬度和高度
????????fwrite（fid0‘uchar‘）;?%寫入圖象的寬度和高度
????end
end
fclose（fid）;

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

?????文件???????4698??2014-03-19?19:49??Iris.txt

?????文件??????20832??2006-12-11?16:40??leuk72_3k.txt

?????文件???????1203??2014-03-19?19:47??Wine?Description.txt

?????文件??????10958??2014-03-19?19:47??wine.txt

?????文件??????96458??2014-03-19?20:36??yeast.txt

?????文件???????2216??2004-05-23?17:29??UCI_arff\accuracy.txt

?????文件?????143336??1999-04-07?14:33??UCI_arff\arff\anneal.arff

?????文件?????129637??2004-05-23?12:20??UCI_arff\arff\artificial.arff

?????文件??????45903??1999-04-07?14:33??UCI_arff\arff\audiology.arff

?????文件??????13356??2004-05-22?17:16??UCI_arff\arff\auto-mpg.arff

?????文件??????30676??1999-03-11?08:31??UCI_arff\arff\autos.arff

?????文件???????8714??1999-04-07?14:34??UCI_arff\arff\balance-scale.arff

?????文件???????3412??2004-05-22?17:42??UCI_arff\arff\balloons.arff

?????文件??????29418??1999-04-07?14:34??UCI_arff\arff\breast-cancer.arff

?????文件??????19167??1999-03-11?08:31??UCI_arff\arff\breast-w.arff

?????文件??????11330??2004-05-23?14:52??UCI_arff\arff\bridges2.arff

?????文件?????322654??2004-05-22?23:06??UCI_arff\arff\clean1.arff

?????文件??????63983??1999-04-07?14:35??UCI_arff\arff\colic.arff

?????文件????5971512??2004-05-23?14:29??UCI_arff\arff\connect-4.arff

?????文件??????34315??1999-03-11?08:31??UCI_arff\arff\credit-a.arff

?????文件?????162249??1999-03-11?08:31??UCI_arff\arff\credit-g.arff

?????文件??????37419??1999-03-11?08:31??UCI_arff\arff\diabetes.arff

?????文件???????9964??2004-05-23?12:39??UCI_arff\arff\echocardiogram.arff

?????文件??????17325??2004-05-23?14:32??UCI_arff\arff\flag.arff

?????文件??????17823??1999-03-11?08:31??UCI_arff\arff\glass.arff

?????文件???????8231??2004-05-22?18:36??UCI_arff\arff\hayes-roth.arff

?????文件??????35596??1999-04-07?14:37??UCI_arff\arff\heart-c.arff

?????文件??????31259??1999-04-07?14:38??UCI_arff\arff\heart-h.arff

?????文件??????13151??1999-03-11?08:31??UCI_arff\arff\heart-statlog.arff

?????文件??????17135??1999-03-11?08:31??UCI_arff\arff\hepatitis.arff

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