initail commit with motif_find_R script