for dir in *; do
cd $dir;
export num_strongly=$(grep "0$(printf '\t')0$" "${dir}_properties.tsv" | wc -l);
export num_weakly=export num_weakly=$(($(grep -P "0$(printf '\t')0$" "${dir}_properties.tsv" | wc -l) + $(grep -P "1$(printf '\t')0$" "${dir}_properties.tsv" | wc -l)));
export num_weakly_non=$(grep arr_num_weakly_non_scrambled "${dir}_summary.tsv" | awk '{print $2}');
export num_strongly_non=$(grep arr_num_strongly_non_scrambled "${dir}_summary.tsv" | awk '{print $2}');
sed -i "s/arr_num_weakly_non_scrambled$(printf '\t')${num_weakly_non}/arr_num_weakly_scrambled$(printf '\t')${num_weakly}/" "${dir}_summary.tsv";
sed -i "s/arr_num_strongly_non_scrambled$(printf '\t')${num_strongly_non}/arr_num_strongly_scrambled$(printf '\t')${num_strongly}/" "${dir}_summary.tsv";
echo '' >> "${dir}_properties.tsv";
sed -i ':a;N;$!ba;s/1\t1\n/x\tx\n/g' "${dir}_properties.tsv";
sed -i ':a;N;$!ba;s/0\t0\n/1\t1\n/g' "${dir}_properties.tsv";
sed -i ':a;N;$!ba;s/x\tx\n/0\t0\n/g' "${dir}_properties.tsv";
sed -i 's/weakly_non_scrambled/weakly_scrambled/g' "${dir}_properties.tsv";
sed -i 's/strongly_non_scrambled/strongly_scrambled/g' "${dir}_properties.tsv";
for feature in gaps prec_fragments prec_hsp prec_intervals prec_pointers prod_hsp prod_intervals prod_pointers; do filename="${dir}_${feature}.bed"; echo '' >> $filename; sed -i ':a;N;$!ba;s/_1_1\t/_x_x\t/g' $filename; sed -i ':a;N;$!ba;s/_0_0\t/_1_1\t/g' $filename; sed -i ':a;N;$!ba;s/_x_x\t/_0_0\t/g' $filename; sed -i 's/weakly-non-scrambled/weakly-scrambled/' $filename; sed -i 's/strongly-non-scrambled/strongly-scrambled/' $filename; done;
cd ..;
done