Это может быть достигнуто просто с помощью регулярных выражений и семейства grep:
cleanFun <- function(htmlString) { return(gsub("<.*?>", "", htmlString)) }
Это также будет работать с несколькими тегами html в одной строке!