A sample package in R