added rdoc to the code

generated groupsites.R with devtoos::document()