как устранить сообщение об ошибке функции write_csv()

Question

Я работаю над Rstudio Cloud.write_csvне будет работать и продолжает возвращать это сообщение:

«Внимание: невозможно открыть файл «cloud/project/covid.csv»: такого файла или каталога нет. Ошибка в файле (file, ifelse(append, «a», «w»)): невозможно открыть соединение.

Это весь код, приводящий к этой ошибке:

      library(httr)
library(rvest)

get_wiki_covid19_page <- function(wiki_base_url, parameters) {
  wiki_base_url <<- "https://en.wikipedia.org/w/index.php"
  parameters <<- list(title="Template:COVID-19_testing_by_country")
  response <<- GET(wiki_base_url, query=parameters)
  return(response)
}

get_wiki_covid19_page(wiki_base_url="https://en.wikipedia.org/w/index.php", 
                      parameters=list(title="Template:COVID-19_testing_by_country"))

      root_html_node <- read_html(response)
table_node <- html_nodes(root_html_node, "table")
covid_data_table <- html_table(table_node[2])
data_frame <- as.data.frame(covid_data_table)

      preprocess_covid_data_frame <- function(data_frame) {
  shape <- dim(data_frame)
  data_frame <- data_frame[!(data_frame$`Country.or.region`=="World"), ]
  data_frame <- data_frame[1:172, ]
  data_frame["Ref."] <- NULL
  data_frame["Units.b."] <- NULL
  names(data_frame) <- c("country", "date", "tested", "confirmed",
                         "confirmed.tested.ratio", "tested.population.ratio", 
                         "confirmed.population.ratio")
  data_frame$country <- as.factor(data_frame$country)
  data_frame$date <- as.factor(data_frame$date)
  data_frame$tested <- as.numeric(gsub(", ", "", data_frame$tested))
  data_frame$confirmed <- as.numeric(gsub(", ", "", data_frame$confirmed))
  data_frame$'confirmed.tested.ratio' <- 
    as.numeric(gsub(", ", "", data_frame$`confirmed.tested.ratio`))
  data_frame$'tested.population.ratio' <-
    as.numeric(gsub(", ", "", data_frame$`tested.population.ratio`))
  data_frame$'confirmed.population.ratio' <- 
    as.numeric(gsub(", ", "", data_frame$`confirmed.population.ratio`))
  return(data_frame)
}

processed_data_frame <- preprocess_covid_data_frame(data_frame)

и, наконец, это строка, которая выдает ошибку

      write.csv(processed_data_frame, file="cloud/project/covid.csv")

результат getwd() — «облако/проект»

это также не работает в моем локальном приложении Rstudio