使用 R 进行 Web 抓取：截断问题 [重复]

Question

作为初学者，我目前正在使用“rvest”包使用 R 进行网络抓取。我的目标是从“www.musixmatch.com”获取任何歌曲的歌词。这是我的尝试：

library(rvest)
url <- "https://www.musixmatch.com/lyrics/Red-Hot-Chili-Peppers/Can-t-Stop"
musixmatch <- read_html(url)
lyrics <- musixmatch%>%html_nodes(".mxm-lyrics__content")%>%html_text()

此代码创建一个包含歌词的 2 行矢量“歌词”：

[1] "Can't stop addicted to the shindig\nChop top he says I'm gonna win big\nChoose not a life of imitation" 
[2] "Distant cousin to the reservation\n\nDefunkt the pistol that you pay for\nThis punk the feeling that you stay for\nIn time I want to be your best friend\nEastside love is living on the Westend\n\nKnock out but boy you better come to\nDon't die you know the truth is some do\nGo write your message on the pavement\nBurn so bright I wonder what the wave meant\n\nWhite heat is screaming in the jungle\nComplete the motion if you stumble\nGo ask the dust for any answers\nCome back strong with 50 belly dancers\n\nThe world I love\nThe tears I drop\nTo be part of\nThe wave can't stop\nEver wonder if it's all for you\nThe world I love\nThe trains I hop\nTo be part of\nThe wave can't stop\n\nCome and tell me when it's time to\n\nSweetheart is bleeding in the snow cone\nSo smart she's leading me to ozone\nMusic the great communicator\nUse two sticks to make it in the nature\nI'll get you into penetration\nThe gender of a generation\nThe birth of every other nation\nWorth your weight the gold ... <truncated>

问题是第二行在某些时候被截断。根据我对 rvest 的了解，没有调整截断的参数。另外，我在互联网上找不到有关此问题的任何信息。有人知道如何调整/禁用此功能的截断吗？提前非常感谢！

最好的问候，

一月

Answer 1

我认为最好将歌词复制并粘贴到记事本或写字板中。另存为 .txt 文件

然后使用readLines 函数，它会打印我们的警告消息，但我能够将整个歌词放在 84x1 字符向量中，您可以清理或做任何您想做的事情。

words <- readLines("redhot.txt")
> head(words)
  [1] "Can't stop addicted to the shindig"     
  [2] "Chop top he says I'm gonna win big"     
  [3] "Choose not a life of imitation"         
  [4] "Distant cousin to the reservation"      
  [5] "Defunkt the pistol that you pay for"    
  [6] "This punk the feeling that you stay for"

这里没有截断问题。