function PlotResults2(Nodes,Elements,gNTu,SF) % 2级子程序,结果显示 figure % global gNdt gElt gNTu %调整单元标号顺序 gElt_plot = zeros(size(Elements,1),size(Elements,2)); for i = 1:1:4 gElt_plot(:,2*i-1) = Elements(:,i); gElt_plot(:,2*i) = Elements(:,i+4); end dFau = SF ; % 变形图放大系数 %% 绘制变形前网格 trisurf( gElt_plot , Nodes( : , 1 ) , Nodes( : , 2 ) , zeros(size(Nodes,1),1)) view(2); axis equal; axis off; axis tight; alpha(0.5); hold on %% 获取变形后数据 DDisp = Nodes + gNTu * dFau; % pause( 3.0 ); trisurf( gElt_plot , DDisp( : , 1 ) , DDisp( : , 2 ) , zeros(size(DDisp,1),1)); view(2); axis equal; axis off; axis tight;alpha(0.5);