第七色在线视频,2021少妇久久久久久久久久,亚洲欧洲精品成人久久av18,亚洲国产精品特色大片观看完整版,孙宇晨将参加特朗普的晚宴

為了賬號(hào)安全,請(qǐng)及時(shí)綁定郵箱和手機(jī)立即綁定
已解決430363個(gè)問題,去搜搜看,總會(huì)有你想問的

在R中的所有括號(hào)內(nèi)提取信息

在R中的所有括號(hào)內(nèi)提取信息

在R中的所有括號(hào)內(nèi)提取信息我有一個(gè)字符串以及在多個(gè)括號(hào)內(nèi)提取信息的內(nèi)容。目前,我可以使用下面的代碼從最后一個(gè)括號(hào)中提取信息。我該怎么做才能提取多個(gè)括號(hào)并作為向量返回?j <- "What kind of cheese isn't your cheese? (wonder) Nacho cheese! (groan) (Laugh)"                                                          sub("\\).*", "", sub(".*\\(", "", j))目前的輸出是:[1] "Laugh"期望的輸出是:[1] "wonder" "groan"  "Laugh"
查看完整描述

3 回答

?
慕虎7371278

TA貢獻(xiàn)1802條經(jīng)驗(yàn) 獲得超4個(gè)贊

這是一個(gè)例子:

> gsub("[\\(\\)]", "", regmatches(j, gregexpr("\\(.*?\\)", j))[[1]])[1] "wonder" "groan"  "Laugh"

我認(rèn)為這應(yīng)該運(yùn)作良好:

> regmatches(j, gregexpr("(?=\\().*?(?<=\\))", j, perl=T))[[1]][1] "(wonder)" "(groan)"  "(Laugh)"

但結(jié)果包括括號(hào)......為什么?

這有效:

regmatches(j, gregexpr("(?<=\\().*?(?=\\))", j, perl=T))[[1]]

感謝@MartinMorgan的評(píng)論。


查看完整回答
反對(duì) 回復(fù) 2019-08-27
?
蕪湖不蕪

TA貢獻(xiàn)1796條經(jīng)驗(yàn) 獲得超7個(gè)贊

使用rex可以使這種類型的任務(wù)更簡(jiǎn)單一些。

matches <- re_matches(j,
  rex(
    "(",
    capture(name = "text", except_any_of(")")),
    ")"),
  global = TRUE)matches[[1]]$text#>[1] "wonder" "groan"  "Laugh"


查看完整回答
反對(duì) 回復(fù) 2019-08-27
  • 3 回答
  • 0 關(guān)注
  • 1940 瀏覽

添加回答

舉報(bào)

0/150
提交
取消
微信客服

購課補(bǔ)貼
聯(lián)系客服咨詢優(yōu)惠詳情

幫助反饋 APP下載

慕課網(wǎng)APP
您的移動(dòng)學(xué)習(xí)伙伴

公眾號(hào)

掃描二維碼
關(guān)注慕課網(wǎng)微信公眾號(hào)