使用GoogleDrive将电子表格标签转换为数据框

时间:2019-06-24 07:14:43

标签: r dplyr tidyverse

我想使用googledrive软件包将google docs电子表格转换为数据框(不再维护googlesheets,并且googledrive软件包似乎具有更广泛的功能)。

我阅读了googledrive软件包的文档,其中显示了如何获取工作表的名称,但没有说明如何将工作表本身放入数据框:https://googledrive.tidyverse.org/

library(googlesheets) #no longer maintained
sheet1 <- gs_title("Sheet")
tab1 <- as.data.frame(sheet1(for_gs, ws = "mytab", skip=1)) #I want this tab
#How to do the same thing in googledrive?
library(googledrive)
drive_find(type = "spreadsheet")
#Get name
x<-drive_get(id = "id_of_sheet") #this provides the id of the sheet1
#How to I get mytab from sheet1 and convert it into a dataframe?

我希望能够获取sheet1并将其转换为数据框(如googlesheets示例中所示),但是googledrive文档中没有任何内容显示如何执行此操作。

2 个答案:

答案 0 :(得分:0)

install.packages("devtools")    
devtools::install_github("tidyverse/googlesheets4")
library(googledrive)
library(googlesheets4)

drive_find(type = "spreadsheet")
#Get name
x<-drive_get(id = "id_of_sheet") #this provides the id of the sheet1
read_sheet(x)

https://github.com/tidyverse/googlesheets4

答案 1 :(得分:0)

我也遇到了同样的问题,并且能够使用read_sheet()'googlesheets4'中的'googledrive'来解决此问题,如上一个答案所示。但是,仅使用read_sheet(x)不会选择特定的“标签”。为了从Google工作表中选择特定的“标签”,您必须添加“范围”参数read_sheet(x, range = "mytab")

完整示例:

install.packages("devtools")    
devtools::install_github("tidyverse/googlesheets4")
library(googledrive)
library(googlesheets4)

drive_find(type = "spreadsheet")
#Get name
x<-drive_get(id = "id_of_sheet") #this provides the id of the sheet1
read_sheet(x) # only returns the first 'tab' in the google sheet
read_sheet(x, range = "mytab") # returns the tab you are interested  in

https://googlesheets4.tidyverse.org/