Update reverse_complement.R

Modified probability vectors (lines 18 & 20)