code patterns in vector
On 19/02/2009 9:26 AM, Stefan Uhmann wrote:
Dear List,
I have this column/vector:
vec <- c("function", "missing", "string")
and want to compute a second column/vector:
- value if the pattern "unc" is found: 1
- value if the pattern "iss" is found: 2
- value if none of the patterns is found: 0
This should be the result:
> vec2
[1] 1 2 0 Any help? Tried it with grep, but the output is not as long as vec, so I'm lost a bit here.
vec2 <- rep(0, length(vec))
vec2[grep("iss", vec)] <- 2
vec2[grep("unc", vec)] <- 1
Note that an entry containing both "unc" and "iss" will get a 1
according to this scheme.
Duncan Murdoch