## Not run:
# ## NSE
# dd <- api("http://httpbin.org/post")
# dd %>% api_body(body_value = NULL) %>% http("POST")
# dd %>% api_body(body_value = "") %>% http("POST")
#
# ## other named parameters are passed as form values
# dd %>% api_body(x = hello) %>% http("POST")
#
# # upload a file
# file <- "~/some_test.txt"
# cat("hello, world", file = file)
# dd %>% api_body(x = upload_file("~/some_test.txt")) %>% http("POST")
#
# # A named list
# dd %>% api_body(x = hello, y = stuff) %>% http("POST")
#
# ## SE
# dd %>% api_body_(x = "hello", y = "stuff") %>% http("POST")
# ## End(Not run)
Run the code above in your browser using DataLab