unlist(lapply(posText, function(x) { str_split(x, "\n") })) gives error

[ncdingari]

When I run the line 22, unlist(lapply(posText, function(x) { str_split(x, "\n") })) gives error

Error in substring(string, start, end) :
invalid multibyte string at '<96> a <6e>ice , harmless date film . . .