errorhandler.R

library("httr")

httr::set_config(config(http_version = 2)) # set the HTTP version to 1.1 (none, 1.0, 1.1, 2)

sendMail <- function(e){
  
  body <- list(secret = 'sfsdf£$4500dfdd__$$', body=e["message"]) # create a list that will be serialized to JSON
  result <- POST(url = "https://prod-10.westeurope.logic.azure.com/workflows/8934jadajada999"
                 , body = body  , encode = "json", handle = NULL)

  
}

myProcess <- function(){
  stop("error")
}

tryCatch(myProcess(), error = sendMail)