1234567891011121314151617181920212223242526272829303132333435363738394041424344 |
- function output=creat_cont_orth_card_model
- % this function returns a what remains of a continuous models after being
- % orthogonalized from the cardinal model
- clear all;
- a=creatcontmodel;
- b=creat_u_d_model;
- c=creat_l_r_model;
- d=b+c;
- a=zscore(a)
- d=zscore(d)
- e1(:,1)=(a(:))
- e1(:,2)=(d(:))
- f1=spm_orth(e1)
- g1=reshape(f1(:,2),16,16)
- e2(:,2)=(a(:))
- e2(:,1)=(d(:))
- f2=spm_orth(e2)
- g2=reshape(f2(:,2),16,16)
- % figure;
- % subplot(1,3,1)
- % imagesc(d)
- % title('1')
- %
- % subplot(1,3,2)
- % imagesc(a)
- % title('2')
- %
- % subplot(1,3,3)
- % imagesc(g2)
- % title('output')
- output=g2
- end
|