Good afternoon Monica, Relying on regular expressions, substituting nothing "" for everything starting with a space until the end of the "line" (i.e. with a dollar sign)
str1 <- sub(" .*$", "", str) Regards, Sean Monica Pisica wrote: > > > Hi everyone, > > I have a vector of strings, each string made up by different number of > words. I want to get a new vector which has only the first word of each > string in the first vector. I came up with this: > > str <- c('aaa bbb', 'cc', 'd eee aa', 'mmm o n') > str1 <- rep(1, length(str)) > for (i in 1:length(str)) { > str1[i] <- strsplit(str, " ")[[i]][1] > } > str1 > 'aaa' 'cc' 'd' 'mmm' > > Now, is there any way to do this simpler? > > Thanks, > > Monica > > _________________________________________________________________ > Get the power of Windows + Web with the new Windows Live. > > [[alternative HTML version deleted]] > > ______________________________________________ > R-help@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. > > -- View this message in context: http://www.nabble.com/spliting-strings-...-tp14316255p14316361.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ R-help@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.