fid_pos_in = fopen(\'E:\coupling_FC_SC_ASD\child_adol_2514\adol\test_pos_in.txt\',\'w\');
fid_pos_ex = fopen(\'E:\coupling_FC_SC_ASD\child_adol_2514\adol\test_pos_ex.txt\',\'w\');
fid_neg_in = fopen(\'E:\coupling_FC_SC_ASD\child_adol_2514\adol\test_neg_in.txt\',\'w\');
fid_neg_ex = fopen(\'E:\coupling_FC_SC_ASD\child_adol_2514\adol\test_neg_ex.txt\',\'w\');
for t = 1 : size(col,1)
    zVal = v(t,1);
    r_c_val = {};
    if zVal > 0
        r_c_val = [row_net(t,:),col_net(t,:)];
        if strcmp(r_c_val(1,1), r_c_val(1,4))
            fprintf(fid_pos_in,\'%s %d %d %s %d %d\r\n\',r_c_val{1,:});
        else
            fprintf(fid_pos_ex,\'%s %d %d %s %d %d\r\n\',r_c_val{1,:});
        end
    elseif zVal < 0
        r_c_val = [row_net(t,:),col_net(t,:)];
        if strcmp(r_c_val(1,1), r_c_val(1,4))       
            fprintf(fid_neg_in,\'%s %d %d %s %d %d\r\n\',r_c_val{1,:});
        else
            fprintf(fid_neg_ex,\'%s %d %d %s %d %d\r\n\',r_c_val{1,:});
        end
    end
end
fclose(fid_pos_in);
fclose(fid_pos_ex);
fclose(fid_neg_in);
fclose(fid_neg_ex);