Я не уверен насчет самого очищенного содержимого, но вы можете заменить цикл на
for (i in 1:length(allreadurls)) {
allcollegeurls$Specialization[i] <- html_nodes(allreadurls[i][],'td:nth-child(1)')
}
Одной из проблем вашего подхода было несоответствие роли i
:принимает значения в allreadurls
, но затем используется для подмножества Specialization
и allreadurls
.Другая проблема заключалась во всех лишних пробелах в
'td:nth-
child(1)'
Наконец, поскольку allreadurls
- это список, вы хотите задать для него значение [[i]]
, а не [i]
(который снова возвращает список).Наконец, нет необходимости в []
.