twojetsurf.m

来自「超声图像实时消噪实验程序」· M 代码 · 共 10 行

    a = zeros(33); a(16,16)=1;
    [L, Lx, Ly, Lxx, Lxy, Lyy] = g2Jet( a, 5 ); colormap copper;
    subplot( 'position', [1/3 2/3 1/3 1/3] );	surfl(L);   shading interp; axis off; %text(1/2, 2/3, 'L');
    subplot( 'position', [1/6 1/3 1/3 1/3] );	surfl(Lx);  shading interp; axis off; %text(1/3, 1/3, 'Lx');
    subplot( 'position', [3/6 1/3 1/3 1/3] );	surfl(Ly);  shading interp; axis off; %text(2/3, 1/3, 'Ly');
    subplot( 'position', [0   0 1/3 1/3] );		surfl(Lxx); shading interp; axis off; %text(1/6, 0, 'Lxx');
    subplot( 'position', [1/3 0 1/3 1/3] );		surfl(Lxy); shading interp; axis off; %text(1/2, 0, 'Lxy');
    subplot( 'position', [2/3 0 1/3 1/3] );		surfl(Lyy); shading interp; axis off; %text(5/6, 0, 'Lyy');
	
	print -depsc2 ../figures/Gauss2Jet.eps