Sélectionnez le dernier enfant avec la classe en r

nested_html %>%
	html_nodes(".text:last-child")
Successful Salmon