Не совсем уверен, как вы хотите обрабатывать эту страницу, потому что это действительно беспорядочно. Как мы повторно узнали в этом известном вопросе о stackoverflow , делать регулярное выражение в html - не лучшая идея, поэтому вам определенно захочется проанализировать это с помощью пакета XML.
Вот пример для начала:
require(RCurl)
require(XML)
webpage <- getURL("http://www.haaretz.com/")
webpage <- readLines(tc <- textConnection(webpage)); close(tc)
pagetree <- htmlTreeParse(webpage, error=function(...){}, useInternalNodes = TRUE)
# parse the tree by tables
x <- xpathSApply(pagetree, "//*/table", xmlValue)
# do some clean up with regular expressions
x <- unlist(strsplit(x, "\n"))
x <- gsub("\t","",x)
x <- sub("^[[:space:]]*(.*?)[[:space:]]*$", "\\1", x, perl=TRUE)
x <- x[!(x %in% c("", "|"))]
В результате получается вектор символов, состоящий в основном из текста веб-страницы (вместе с некоторым javascript):
> head(x)
[1] "Subscribe to Print Edition" "Fri., December 04, 2009 Kislev 17, 5770" "Israel Time:Â 16:48Â (EST+7)"
[4] "Â Â Make Haaretz your homepage" "/*check the search form*/" "function chkSearch()"
Лучшим выбором может быть пакет XML - см., Например, этот предыдущий вопрос .
Я знаю, что вы просили R. Но, может быть, python + beautifullsoup - это путь вперед? Тогда проведите свой анализ с помощью R: вы соскребли экран с помощью beautifullsoup?