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
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