Create drift_mutation.R