if (FALSE) {
# first sign in user and get the 'id_token':
user <- sign_in(email = "user@gmail.com", password = "password")
id_token <- user$idToken
# delete user account:
response <- delete_account(id_token = id_token)
response
}
Run the code above in your browser using DataLab