add usuage of funcition
add library(plyr)