group sites, in R