Look at the help docs and examples for textcat and sapply:
print(as.character(data$x[sapply(data$x, textcat)=="english"]))
Although textcat defaults classify "This book is amazing" as dutch, so
you may want to read the help for textcat and change the profile db
("p") or "method".
On 19/11/20
Hi all,
How is it possible to subset English text from a df containing German and
English texts using textcat package?
> library(textcat)
> dput(data)
structure(list(x = structure(c(2L, 6L, 5L, 3L, 1L, 4L), .Label = c("Dieses
Buch ist erstaunlich",
"I love this book", "ich
2 matches
Mail list logo
