Nothing
#' Delete users from the server
#' @param user_list comma seperated list of users
#' @param ... other arguments passed on to ohmage
#' @export
oh.user.delete <- function(user_list, ...){
xhr <- oh.call("/user/delete",user_list=user_list, ...);
message("User deleted!");
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.