Skip to main content
本文に 125 文字追加
ソース リンク
user9156
user9156

"STARThogehogeENDpogepogeEND"とあった場合にはどうしたら"hogehoge"を取り出せますか?

既に回答が付いていますが、別の方法で処理してみます。

R の sub()gsub() では perl の正規表現(肯定的先読み・後読みなど)を使う事ができます。

> ?sub
sub(pattern, replacement, x, ignore.case = FALSE, perl = FALSE, ...
gsub(pattern, replacement, x, ignore.case = FALSE, perl = FALSE, ...
regexpr(pattern, text, ignore.case = FALSE, perl = FALSE, ...
                 :
perl: logical. Should perl-compatible regexps be used?
                 :

ここでは regexpr() を使ってみます。

> txt <- "STARThogehogeENDpogepogeEND"
> m <- regexpr("(?<=START).*?(?=END)", txt, perl=T)
> substr(txt, m, m + attr(m, "match.length") - 1)
[1] "hogehoge"

その他、strsplit() を使う方法もあります。

> unlist(strsplit("STARThogehogeENDpogepogeEND", "START|END"))[2]
[1] "hogehoge"

"STARThogehogeENDpogepogeEND"とあった場合にはどうしたら"hogehoge"を取り出せますか?

既に回答が付いていますが、別の方法で処理してみます。

R の sub()gsub() では perl の正規表現(肯定的先読み・後読みなど)を使う事ができます。

> ?sub
sub(pattern, replacement, x, ignore.case = FALSE, perl = FALSE, ...
gsub(pattern, replacement, x, ignore.case = FALSE, perl = FALSE, ...
regexpr(pattern, text, ignore.case = FALSE, perl = FALSE, ...
                 :
perl: logical. Should perl-compatible regexps be used?
                 :

ここでは regexpr() を使ってみます。

> txt <- "STARThogehogeENDpogepogeEND"
> m <- regexpr("(?<=START).*?(?=END)", txt, perl=T)
> substr(txt, m, m + attr(m, "match.length") - 1)
[1] "hogehoge"

"STARThogehogeENDpogepogeEND"とあった場合にはどうしたら"hogehoge"を取り出せますか?

既に回答が付いていますが、別の方法で処理してみます。

R の sub()gsub() では perl の正規表現(肯定的先読み・後読みなど)を使う事ができます。

> ?sub
sub(pattern, replacement, x, ignore.case = FALSE, perl = FALSE, ...
gsub(pattern, replacement, x, ignore.case = FALSE, perl = FALSE, ...
regexpr(pattern, text, ignore.case = FALSE, perl = FALSE, ...
                 :
perl: logical. Should perl-compatible regexps be used?
                 :

ここでは regexpr() を使ってみます。

> txt <- "STARThogehogeENDpogepogeEND"
> m <- regexpr("(?<=START).*?(?=END)", txt, perl=T)
> substr(txt, m, m + attr(m, "match.length") - 1)
[1] "hogehoge"

その他、strsplit() を使う方法もあります。

> unlist(strsplit("STARThogehogeENDpogepogeEND", "START|END"))[2]
[1] "hogehoge"
ソース リンク
user9156
user9156

"STARThogehogeENDpogepogeEND"とあった場合にはどうしたら"hogehoge"を取り出せますか?

既に回答が付いていますが、別の方法で処理してみます。

R の sub()gsub() では perl の正規表現(肯定的先読み・後読みなど)を使う事ができます。

> ?sub
sub(pattern, replacement, x, ignore.case = FALSE, perl = FALSE, ...
gsub(pattern, replacement, x, ignore.case = FALSE, perl = FALSE, ...
regexpr(pattern, text, ignore.case = FALSE, perl = FALSE, ...
                 :
perl: logical. Should perl-compatible regexps be used?
                 :

ここでは regexpr() を使ってみます。

> txt <- "STARThogehogeENDpogepogeEND"
> m <- regexpr("(?<=START).*?(?=END)", txt, perl=T)
> substr(txt, m, m + attr(m, "match.length") - 1)
[1] "hogehoge"