ฉันต้องการทำสิ่งที่ xml2::xml_text() หรือ rvest::html_text() ทำอย่างแน่นอน แต่คงแท็กไว้แทนที่จะแทนที่ เช่น <br> กับ \n วัตถุประสงค์คือเพื่อเช่น ขูดหน้าเว็บ แยกโหนดที่ฉันต้องการ และจัดเก็บ HTML ธรรมดาในตัวแปร เหมือนกับที่ write_html() จะเก็บไว้ในไฟล์
ฉันจะทำเช่นนี้ได้อย่างไร?
น่าแปลกที่ปรากฎว่า as.character() ใช้งานได้ดี
ดังนั้น:
library(rvest)
html <- read_html("http://stackoverflow.com")
res <– html %>%
html_node("h1") %>%
as.character()
> res
[1] "<h1 class=\"-title\">Learn, Share, Build</h1>"
นี่คือผลลัพธ์ที่ต้องการในกรณีการใช้งานปัจจุบันของฉัน
ในทางกลับกัน หากต้องการเปรียบเทียบหากต้องการถอดแท็ก:
res <- html %>%
html_node("h1") %>%
html_text()
> res
[1] "Learn, Share, Build"
xml2โดยไม่ต้องละทิ้งแท็กหรือสิ่งที่ฟังก์ชันอื่นทำเฉพาะกับเอาต์พุตไปยังตัวแปรอื่นแทนที่จะเป็นไฟล์ภายนอก - person Harold Cavendish schedule 14.09.2018xml2แล้วรับเอาต์พุตของส่วนเฉพาะเป็นสตริงดิบที่ไม่ได้แยกวิเคราะห์ - person divibisan schedule 14.09.2018