# NOT RUN {
login_data <- list('phone_id' = "012345678901-99thisisatest99",
'_csrftoken' = "012345678901-99thisisatest99",
'username' = "testuser",
'guid' = "012345678901-99thisisatest99",
'device_id' = "012345678901-99thisisatest99",
'password' = "testpassword",
'login_attempt_count' = 0)
signed_body <- generate_signed_body(login_data)
# }
Run the code above in your browser using DataLab