Как упомянуто @sonny, вы можете сохранить zip-файл локально, используя любую нижеприведенную функцию -
readr::write_tsv(df, file.path(getwd(), "mtcars.tsv.gz"))
ИЛИ
readr::write_csv(mtcars, file.path(dir, "mtcars.csv.gz"))
, а затем используйте приведенный ниже код для перехода на S3-
system(paste0("aws s3 cp ",file_path, " ", s3_path))
** Примечание- file_path
должно содержать полное местоположение файла с именем файла.