我正在使用Vagalume的API提取歌词。
这是我得到的结果:
library(vagalumeR)
library(tibble)
library(stringr)
set.seed(1234)
musicas = as.tibble(topLyrics(name = "seu-jorge",
message = TRUE))
musica = sample(musicas$id.top, 1)
letra = lyrics(identifier = musica,
type = "id",
artist = "seu-jorge",
key = key)
然而,letra
只是一大块文本,我想将它分成更小的段落。
str_split(string = as.character(letra),
"[[:upper:]]")
这是我得到的结果:
[1] "Pretinha" "aço tudo pelo nosso amor"
[3] "aço tudo pelo bem de nosso bem (meu bem)" " saudade é minha dor"
[5] "ue anda arrasando com meu coração" "ão"
[7] "uvide que um dia" "u te darei o céu"
[9] "eu amor junto com um anel" "ra gente se casar"
我相信大多数人不懂葡萄牙语,但请相信我,我使用大写字母作为分隔符。我该如何将大写字母包含在较小的块中?