Merge pull request #139 from yanturgeon/patch-1

Update getMembers.R
pablobarbera · Jul 12, 2017 · c7cd323 · c7cd323
2 parents 0271880 + 70c993b
commit c7cd323
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/Rfacebook/R/getMembers.R b/Rfacebook/R/getMembers.R
@@ -41,6 +41,8 @@ getMembers <- function(group_id, token, n=5000, api=NULL){
   # if data, return a data frame
   df <- data.frame(
     name = unlist(lapply(content$data, '[[', 'name')),
+    first_name = unlist(lapply(content$data, '[[', 'first_name')),
+    last_name = unlist(lapply(content$data, '[[', 'last_name')),
     id = unlist(lapply(content$data, '[[', 'id')),
     administrator = unlist(lapply(content$data, '[[', 'administrator')),
     stringsAsFactors=F)