| 123456789101112 |
- function corr_pval=vassarp(vector_r,num_cells)
- %corr_pval=vassarp(vector_r,num_cells)
- % 2017 A.Leo
- tdist=nan(length(vector_r),1);
- corr_pval=nan(length(vector_r),1);
- tdist=vector_r./(sqrt(((1-(vector_r.^2))./(num_cells-2))));
- corr_pval=1-tcdf(tdist,num_cells-1);
- end
|
