3 回答

TA貢獻(xiàn)1850條經(jīng)驗(yàn) 獲得超11個(gè)贊
使用dplyr 0.7.0,您可以使用pull從a獲取向量tbl。
library("dplyr")
#>
#> Attaching package: 'dplyr'
#> The following objects are masked from 'package:stats':
#>
#> filter, lag
#> The following objects are masked from 'package:base':
#>
#> intersect, setdiff, setequal, union
db <- src_sqlite(tempfile(), create = TRUE)
iris2 <- copy_to(db, iris)
vec <- pull(iris2, Species)
head(vec)
#> [1] "setosa" "setosa" "setosa" "setosa" "setosa" "setosa"

TA貢獻(xiàn)2080條經(jīng)驗(yàn) 獲得超4個(gè)贊
您還可以使用unlist
我發(fā)現(xiàn)更容易閱讀的內(nèi)容,因?yàn)槟恍枰貜?fù)列的名稱或指定索引。
iris2 %>% select(Species) %>% unlist(use.names = FALSE)
- 3 回答
- 0 關(guān)注
- 693 瀏覽
添加回答
舉報(bào)