fisher 分类+c-means分类+感知器分类.rar

function new_fig_handle = shift_axis_to_origin( fig_handle ) % 本函数目的是把 matlab 做的图坐标轴移到图形的中间部分去(与数学的做图习惯一致) % 2008.10.10 in pku %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% figure('Name','shift_axis_to_origin','NumberTitle','off') % Create a new figure % 拷贝图形到一个新的窗口 new_fig_handle = copyobj( fig_handle , gcf ); xL=xlim ; yL=ylim ; xt=get(gca,'xtick') ; yt=get(gca,'ytick') ; set(gca,'XTick',[],'XColor','w') ; set(gca,'YTick',[],'YColor','w') ; % 把 x 和 y 坐标轴的两个方向各延长 10% （为了视觉上好看） extend_x = ( xL(2)-xL(1) ) * 0.1 ; extend_y = ( yL(2)-yL(1) ) * 0.1 ; xxL = xL + [ -extend_x extend_x] ; yyL = yL + [ -extend_y extend_y] ; set(gca,'xlim', xxL) ; set(gca,'ylim', yyL) ; pos = get(gca,'Position') ; box off; x_shift = abs( yyL(1)/(yyL(2)-yyL(1)) ) ; y_shift = abs( xxL(1)/(xxL(2)-xxL(1)) ) ; temp_1 = axes( 'Position', pos + [ 0 , pos(4) * x_shift , 0 , - pos(4)* x_shift*0.99999 ] ) ; xlim(xxL) ; box off ; set(temp_1,'XTick',xt,'Color','None','YTick',[]) ; set(temp_1,'YColor','w') ; temp_2 = axes( 'Position', pos + [ pos(3) * y_shift , 0 , -pos(3)* y_shift*0.99999 , 0 ] ) ; ylim(yyL) ; box off ; set(temp_2,'YTick',yt,'Color','None','XTick',[]) ; set(temp_2,'XColor','w') ; Base_pos = get(new_fig_handle,'Position') ; arrow_pos_in_x_dircetion = Base_pos(2) - Base_pos(4) * yyL(1)/(yyL(2)-yyL(1)) ; arrow_pos_in_y_dircetion = Base_pos(1) - Base_pos(3) * xxL(1)/(xxL(2)-xxL(1)) ; annotation('arrow',[Base_pos(1) , Base_pos(1)+Base_pos(3)] , [arrow_pos_in_x_dircetion , arrow_pos_in_x_dircetion ] , 'Color','k'); annotation('arrow',[arrow_pos_in_y_dircetion , arrow_pos_in_y_dircetion ] , [Base_pos(2) , Base_pos(2)+Base_pos(4)] , 'Color','k'); end % 本程序目的是把 matlab 做的图坐标轴移到图形的中间部分去(与数学的做图习惯一致) % 2008.10.08 %