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)
www.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)
> www.PLessThan.com
>
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
http://www.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: https://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