function shiyan

%#function fenbu_lisan
%#function fenbu_chouyang
%#function fenbu_lianxu
%#function zxjx
%#function norm_2
%#function ybtj

OldHandle = findobj( 'Type', 'figure', 'Tag', 'statistic' ) ;
if ishandle( OldHandle )
    close( OldHandle ) ;
end
fig = figure ;
init_figure(fig) ; 

%--------------------------------------------------------------------------
function init_figure(fig)

scnsize=get(0,'screensize');
font_size1=round(29*sqrt(scnsize(3)*scnsize(4)/(1024*768)));
font_size2=round(13*sqrt(scnsize(3)*scnsize(4)/(1024*768)));
set(fig,'units','normalized','position',[0.25,0.08,0.5,0.85],...
    'menubar','none','name','閥瞯參璸龜噴簍ボ╰參(