Displaying 1 result from an estimated 1 matches for "getstem".
Did you mean:
getsrem
2010 Mar 16
0
FW: How to parse a string (by a "new" markup) with R ?
..."A"
# You can make a list with
lapply(apply(x,2,list),FUN=function(x) as.list(unlist(x)))
###################################################
### chunk number 14: splitSeq
###################################################
splitSeq <- function(Seq,Str){
#
# Functions
#
getStem <- function(pattern,Seq=Seq,Str=Str){
(id <- gregexpr(pattern,Str))
X <- sapply(id,FUN=function(x,Seq) substring(Seq,x,x+attr(x,"match.length")-1),Seq=Seq)
str <- sapply(id,FUN=function(x,Seq) substring(Seq,x,x+attr(x,"match.length")-1),Seq=Str)
str <- str[!X==&qu...