Unable to resolve error in seq.default(which(text == "")[1] + 1,
length(text), 1):
wrong sign in 'by' argument
I am trying to run this code
get.msg <- function(path) {
con <- file(path, open = "rt", encoding = "latin1")
text <- readLines(con)
# The message always begins after the first full line break
msg <- text[seq(which(text == "")[1] + 1,length(text),1)]
close(con)
return(paste(msg, collapse = "\n"))
Kindly help
[[alternative HTML version deleted]]
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
