%%?切割出對應字符的二值化圖像（但是因為預處理操作，導致字符的缺失）
%%?切割出數字框對應的字符，直接完整的切開
%%?step1?讀取定位框圖像
clear;clc;close?all
[fnpnfi]=uigetfile（‘*.jpg‘‘選擇圖片‘）;
I=imread（[pn?fn]）;figureimshow（I）;title（‘原始圖像‘）;%顯示原始圖像
copy_I=I;
%%?step2?改進的Berson法對圖像進行二值化
max_I=max（max（I））;
min_I=min（min（I））;
T=0.350*（max_I+min_I）;
%?I=rgb2gray（I）;
[mn]=size（I）;
for?i=1:1:m
????for?j=1:1:n
????????if?I（ij）>=T
????????????b（ij）=0;
????????else
????????????b（ij）=1;
????????end
????end
end
imshow（b）
title（‘Berson法二值化圖像‘）;
I2=b;
%%?Step3?計算數字框水平投影，并對水平投影進行峰谷分析
histcol1=sum（I2）;??????%計算垂直投影
histrow=sum（I2‘）;??????%計算水平投影
figure（16）subplot（211）bar（histcol1）;title（‘垂直投影（含邊框）‘）;%輸出垂直投影
subplot（212）bar（histrow）;title（‘水平投影（含邊框）‘）;%輸出水平投影
figure（17）subplot（211）bar（histrow）;?????title（‘水平投影（含邊框）‘）;