diff --git a/dev/articles/example-sheets.html b/dev/articles/example-sheets.html
index eb9dadd50..dce340528 100644
--- a/dev/articles/example-sheets.html
+++ b/dev/articles/example-sheets.html
@@ -101,8 +101,6 @@
world-readable, so we do gs4_deauth()
.
library(googlesheets4)
-#> Error in get(paste0(generic, ".", class), envir = get_method_env()) :
-#> object 'type_sum.accel' not found
gs4_deauth()
-library(googlesheets4)
-#> Error in get(paste0(generic, ".", class), envir = get_method_env()) :
-#> object 'type_sum.accel' not found
library(googlesheets4)
library(googlesheets4)
-#> Error in get(paste0(generic, ".", class), envir = get_method_env()) :
-#> object 'type_sum.accel' not found
library(googledrive)
#>
#> Attaching package: 'googledrive'
@@ -132,29 +130,29 @@ Create a private She
Put the iris data into a csv file.
(iris_tempfile <- tempfile(pattern = "iris-", fileext = ".csv"))
-#> [1] "/tmp/RtmpVyw7BG/iris-22457a06110d.csv"
+#> [1] "/tmp/RtmpwQ9Zeb/iris-224dc0deec.csv"
write.csv(iris, iris_tempfile, row.names = FALSE)
Use googledrive::drive_upload()
to upload the csv and
simultaneously convert to a Sheet.
(iris_ss <- drive_upload(iris_tempfile, type = "spreadsheet"))
#> Local file:
-#> • /tmp/RtmpVyw7BG/iris-22457a06110d.csv
+#> • /tmp/RtmpwQ9Zeb/iris-224dc0deec.csv
#> Uploaded into Drive file:
-#> • iris-22457a06110d <id: 1U4OD779UHssHKQSKUq1_aDHERYRQSuGBRpfh4SMwbT4>
+#> • iris-224dc0deec <id: 1BB4z6VE4XeGtbx4O7HeEgULP5eZ6BjLL2Y41zkyie04>
#> With MIME type:
#> • application/vnd.google-apps.spreadsheet
#> # A dribble: 1 × 3
-#> name id drive_resource
-#> <chr> <drv_id> <list>
-#> 1 iris-22457a06110d 1U4OD77… <named list [35]>
+#> name id drive_resource
+#> <chr> <drv_id> <list>
+#> 1 iris-224dc0deec 1BB4z6V… <named list [35]>
# visit the new Sheet in the browser, in an interactive session!
drive_browse(iris_ss)
Read data from the private Sheet into R.
read_sheet(iris_ss, range = "B1:D6")
-#> ✔ Reading from iris-22457a06110d.
+#> ✔ Reading from iris-224dc0deec.csv.
#> ✔ Range B1:D6.
#> # A tibble: 5 × 3
#> Sepal.Width Petal.Length Petal.Width
@@ -171,12 +169,12 @@ Create a local xlsx
Download the Sheet as an Excel workbook.
(iris_xlsxfile <- sub("[.]csv", ".xlsx", iris_tempfile))
-#> [1] "/tmp/RtmpVyw7BG/iris-22457a06110d.xlsx"
+#> [1] "/tmp/RtmpwQ9Zeb/iris-224dc0deec.xlsx"
drive_download(iris_ss, path = iris_xlsxfile, overwrite = TRUE)
#> File downloaded:
-#> • iris-22457a06110d <id: 1U4OD779UHssHKQSKUq1_aDHERYRQSuGBRpfh4SMwbT4>
+#> • iris-224dc0deec <id: 1BB4z6VE4XeGtbx4O7HeEgULP5eZ6BjLL2Y41zkyie04>
#> Saved locally as:
-#> • /tmp/RtmpVyw7BG/iris-22457a06110d.xlsx
+#> • /tmp/RtmpwQ9Zeb/iris-224dc0deec.xlsx
sheets_
pre
#> Error in get(paste0(generic, ".", class), envir = get_method_env()) :
-#> object 'type_sum.accel' not found