add R script to describe how to use WaveQTL_preprocess