0001 function vb_plot_corpus( V,F,Iremove,Vindx )
0002
0003
0004
0005
0006
0007
0008
0009 fclr = [0.8 0.7 0.6];
0010 eclr = 'none';
0011
0012 angl = [ 35 20; -35 20];
0013
0014
0015 NL = F.NdipoleL;
0016 FL = F.F3L;
0017 FR = F.F3R;
0018 NV = size(V,1);
0019
0020 Lmax = max(V(1:NL,:));
0021 Lmin = min(V(1:NL,:));
0022 Rmax = max(V((NL+1):end,:));
0023 Rmin = min(V((NL+1):end,:));
0024
0025 FLremove = vb_patch_select(Iremove,FL,NV);
0026 FLmodel = vb_patch_select(Vindx,FL,NV);
0027
0028 FRremove = vb_patch_select(Iremove,FR,NV);
0029 FRmodel = vb_patch_select(Vindx,FR,NV);
0030
0031 light_mode = 1;
0032 NX=2;
0033 NY=1;
0034
0035 subplot(NY,NX,1);
0036 vb_plot_surf(V,FLmodel,fclr,eclr,light_mode);
0037 hold on;
0038 vb_plot_surf(V,FLremove,'r');
0039
0040 view(angl(1,:));
0041 title('Corpus region in left brain')
0042
0043 xlim([Lmin(1) Lmax(1)]);
0044 ylim([Lmin(2) Lmax(2)]);
0045 zlim([Lmin(3) Lmax(3)]);
0046
0047 subplot(NY,NX,2);
0048 vb_plot_surf(V,FRmodel,fclr,eclr,light_mode);
0049 hold on;
0050 vb_plot_surf(V,FRremove,'r');
0051
0052 view(angl(2,:));
0053 title('Corpus region in right brain')
0054
0055 xlim([Rmin(1) Rmax(1)]);
0056 ylim([Rmin(2) Rmax(2)]);
0057 zlim([Rmin(3) Rmax(3)]);