Displaying 1 result from an estimated 1 matches for "charstreamnew".
2008 Jun 25
0
Memory allocation failed: Copying Node
...,"&qu\r\not;","&quo\r\nt;",""\r\n;")
amp <- c("&\r\namp;", "&a\r\nmp;","&am\r\np;","&\r\n;")
xmlDoc<-NULL
charStream <- readChar(filename, file.info(filename)$size)
charStreamNew <- gsubfn("<[^>]*>", ~ gsub("[\r\n]", "", x), charStream)
for(k in quotes) {
if(length(grep(k, charStreamNew)) > 0) {
charStreamNew <- sub(k, """, charStreamNew)
}
}
for(...