(x <- gsub("<[^>]*?>", "", scan("http://www.linguistics.ucsb.edu/faculty/stgries/research/overview-research.html", what=character(0), sep="\n", quote="", comment.char=""), perl=T))
or this (to print it into a file called <res.txt>):
x <- gsub("<[^>]*?>", "", scan("http://www.linguistics.ucsb.edu/faculty/stgries/research/overview-research.html", what=character(0), sep="\n", quote="", comment.char=""), perl=T) cat(x, file="res.txt", sep="\n")
Cf. <http://www.linguistics.ucsb.edu/faculty/stgries/research/qclwr/other_5.pdf> for a more detailed application.
HTH, STG -- Stefan Th. Gries ----------------------------------------------- University of California, Santa Barbara http://www.linguistics.ucsb.edu/faculty/stgries -----------------------------------------------