Add LICENSE and a R script.

Modify the sms.R file to include the header.