library(httr) username <- 'my_user_name'password <- 'my_password'POST(url = "https://api.m.com/v1/clients", config = authenticate(username, password), add_headers("Content-Type: application/json"), body = upload_file('./my_file.json'), encode = 'json')