drake_script function

Write an example _drake.R script to the current working directory.