Generating an OAuth Token - Steps using R

[BxWill]

Appreciate some timely insight!

Novice - first time attempting to extract data via an API.

I obtained a API Key and the Secret.

Converted to base64.

Now perplexed as to the next step where the instructions that I have state that I should "Enter the generated base64value in the header and request body and call the token URI as shown below;

Authorization: Basic {base64value} 
Content-Type: application/x-[URL unfurl="true"]www-form-urlencoded[/URL] 
POST [URL unfurl="true"]https://api.destination.com/oauth/token[/URL]
grant_type=client_credentials

Any insight as to if R can be used to obtain the OAuth Token?

If so, what are the required packages that I need to install?


Thanks in advance.

 

[BxWill]

Any insight as to the resolution of a status code of 401 using the R code below?

Attempting to generate an oauth token.

Thanks in advance.

library(httr)

base64_value <-
  "123456789="
  

response16 <-
  httr::POST (url = "[URL unfurl="true"]https://api.precisely.com/oauth/token"[/URL] , 
             httr::add_headers(Authorization = paste("Basic", base64_value, sep = "")),
             body = list(grant_type = "client_credentials"),
             encode = "form"
             )

#verbose(data_out = true, data_in = False, info = false, ssl = false)


warn_for_status(response16)
stop_for_status(response16)