Added workflow R scripts