data preprocess by r