Manually change the annotation of L-L and R-R pairs
checkLL_RR(input.data)
input.data
preprocessed table
data(input.data) checked.input.data <- checkLL_RR(input.data)