create function documentation template in R

create function documentation template in R

 prompt(monitor, file = 'monitor.Rd', force.function = TRUE)