2つの文字変数（オブジェクトの名前）があり、共通の部分文字列を抽出したい。私は、結果として、次のことをしたい2つの文字変数間の共通部分文字列を見つける
a <- c('blahABCfoo', 'blahDEFfoo')
b <- c('XXABC-123', 'XXDEF-123')
：
a <- c('textABCxx', 'textDEFxx')
b <- c('zzABCblah', 'zzDEFblah')
これらの例は、代表的なものである：
[1] "ABC" "DEF"
これらのベクターの入力としては、同じ結果を与える必要があります。文字列には識別要素が含まれており、各ベクトル要素のテキストの残りは共通ですが、未知です。
ベースR
推奨パッケージ
パッケージ
（優先順に）次のいずれかの場所での解決策は、あります
想定複製への回答は、nこれらの要件を満たすことはできません。
バイオコンダクターパッケージの使用を気にしない場合は、Rlibstreeを使用できます。インストールはかなり簡単です。
source("http://bioconductor.org/biocLite.R")
biocLite("Rlibstree")
次に、あなたが行うことができます：
require(Rlibstree)
ll <- list(a,b)
lapply(data.frame(do.call(rbind, ll), stringsAsFactors=FALSE),
function(x) getLongestCommonSubstring(x))
# $X1
# [1] "ABC"
# $X2
# [1] "DEF"
をサイドノートでは：私はRlibstreeがlibstree 0.42またはlibstree 0.43を使用している場合はかなりよく分かりません。両方のライブラリがソースパッケージに存在します。私はperlの巨大な配列のメモリリーク（したがってエラー）に遭遇したことを覚えています。これはlibstree 0.42を使用していました。ただ頭を上げる。
私は私が行うにはしたくない、あまりにも多くのものを持っているので、私が代わりにこれをしなかった：
Rgames> for(jj in 1:100) {
+ str2<-sample(letters,100,rep=TRUE)
+ str1<-sample(letters,100,rep=TRUE)
+ longs[jj]<-length(lcstring(str1,str2)[[1]])
+ }
Rgames> table(longs)
longs
2 3 4
59 39 2
誰もが統計を行うには気に一致する文字列の実際の分布の見積もり？ （lcstringは単なるブルートフォースのホームロール関数です;出力にはすべての最大文字列が含まれているため、最初のリスト要素のみを参照します）
この質問をチェックしてください：http://stackoverflow.com/questions/ 1429476/longest-common-substring-problem – dave
これもhttp://finzi.psych.upenn.edu/R/Rhelp02a/archive/68013.html –
http://svitsrv25.epfl.ch/R-doc/library /Biostrings/html/pmatchPattern.html、およびhttp://www.emoticode.net/r/longest-common-substring.html –