Error: ssh failed plumber do_deploy_api

[fiorepalombina]

Dear all,
I have a problem to the last step to deploy a plumber api in DigitalOcean.

First i will report here my plumber.R

#
# This is a Plumber API. In RStudio 1.2 or newer you can run the API by
# clicking the 'Run API' button above.
#
# In RStudio 1.1 or older, see the Plumber documentation for details
# on running the API.
#
# Find out more about building APIs with Plumber here:
#
#    https://www.rplumber.io/
#

library(plumber)
library(tidyverse)
library(readxl)

#* @apiTitle Plumber Example API

#* Return the sum of two numbers
#* @param a give me the api key
#* @param product give me the product name
#* @post /sum
function(a, product){

  if (a==1) {

    data <- read_excel("C_17_dataset_6_download_itemDownload0_upFile.xlsx")

    data %>%
      dplyr::filter(PRODOTTO==product)

  } else {

    print("nope")

  }

}

and then i have use the follow code to deploy it.

ssh::ssh_key_info()

lapply(analogsea::keys(), '[[', "public_key")

mydrop <- plumberDeploy::do_provision()

rm(list = ls(envir = analogsea:::analogsea_sessions), envir = analogsea:::analogsea_sessions)

analogsea::droplet(mydrop$id)

library(plumber)
library(tidyverse)
library(readxl)

analogsea::install_r_package(mydrop, c("plumber", "tidyverse", "readxl"))

getwd()

plumberDeploy::do_deploy_api(mydrop,
                             path="XXX.XXX.XXX.XXX",
                             localPath=getwd(),
                             port=XXXX,
                             docs=TRUE,
                             overwrite = TRUE)

The error output is the follow one

Is quite strange that the problem is about the ssh failed cause i have to used in order to build the api in digital ocean and i have installed all the R packages.

I don't know how to solve this. Could you help me?