0byt3m1n1
Path:
C:
/
Program Files
/
R
/
R-4.2.2
/
library
/
vroom
/
bench
/
all_character-long
/
[
Home
]
File: readr-dplyr.R
({ library(readr); library(dplyr) }) x <- read_tsv(file, trim_ws = FALSE, quote = "", na = character()) print(x) a <- head(x) b <- tail(x) c <- sample_n(x, 100) d <- filter(x, X1 == "helpless_sheep") e <- group_by(x, X1) %>% summarise(avg_nchar = mean(nchar(X2)))