Самый простой способ - записать df во временный файл и загрузить его. Вы можете заключить это в функцию, если хотите автономное решение.
upload_csv <- function(df, name=deparse(substitute(df)), container)
{
f <- tempfile()
write.csv(df, f)
on.exit(unlink(f))
storage_upload(container, f, name)
}
upload_csv(mydf, "df.csv", mycontainer)
Поверьте мне, это проще, чем работать с соединением.