Colleagues R: 2.12.2 OS X I have a set of text objects in the form (I am showing 3 of what is more likely to be 20 or so): OBJECTS <- c("abcSOMETHINGCOMMONegf", "xSOMETHINGCOMMONyz", "SOMETHINGCOMMONnme") As you can see, all contain "SOMETHINGCOMMON" and the position varies. But, I don't know what that "SOMETHINGCOMMON" is. Is there an efficient means to find the common string of characters between all of the objects? Dennis Dennis Fisher MD P < (The "P Less Than" Company) Phone: 1-866-PLessThan (1-866-753-7784) Fax: 1-866-PLessThan (1-866-753-7784) PLessThan.com
Try this: intersect2 <- function (x, y) { y <- as.vector(y) y[match(as.vector(x), y, 0L)] } paste(Reduce(intersect2, strsplit(OBJECTS, NULL)), collapse = '') On Fri, Mar 25, 2011 at 2:27 PM, Dennis Fisher <fisher at plessthan.com> wrote:> Colleagues > > R: 2.12.2 > OS X > > I have a set of text objects in the form (I am showing 3 of what is more likely to be 20 or so): > ? ? ? ?OBJECTS <- c("abcSOMETHINGCOMMONegf", "xSOMETHINGCOMMONyz", "SOMETHINGCOMMONnme") > > As you can see, all contain "SOMETHINGCOMMON" and the position varies. ?But, I don't know what that "SOMETHINGCOMMON" is. > > Is there an efficient means to find the common string of characters between all of the objects? > > Dennis > > Dennis Fisher MD > P < (The "P Less Than" Company) > Phone: 1-866-PLessThan (1-866-753-7784) > Fax: 1-866-PLessThan (1-866-753-7784) > PLessThan.com > > ______________________________________________ > R-help at r-project.org mailing list > stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide R-project.org/posting-guide.html > and provide commented, minimal, self-contained, reproducible code. >-- Henrique Dallazuanna Curitiba-Paran?-Brasil 25? 25' 40" S 49? 16' 22" O
On Fri, Mar 25, 2011 at 1:27 PM, Dennis Fisher <fisher at plessthan.com> wrote:> Colleagues > > R: 2.12.2 > OS X > > I have a set of text objects in the form (I am showing 3 of what is more likely to be 20 or so): > ? ? ? ?OBJECTS <- c("abcSOMETHINGCOMMONegf", "xSOMETHINGCOMMONyz", "SOMETHINGCOMMONnme") > > As you can see, all contain "SOMETHINGCOMMON" and the position varies. ?But, I don't know what that "SOMETHINGCOMMON" is. > > Is there an efficient means to find the common string of characters between all of the objects? >See: stat.ethz.ch/pipermail/r-help/2006-November/117379.html -- Statistics & Software Consulting GKX Group, GKX Associates Inc. tel: 1-877-GKX-GROUP email: ggrothendieck at gmail.com