Thanks a lot,
it was very helpful, I did something like that:
EV <- ifelse(sprd > mediaSDP & sprd_d <= mediaSDP_d, -1, 0)
SV <- ifelse(sprd > media & sprd_d <= media_d, -17, 0)
EC <- ifelse(sprd < mediaSDN & sprd_d >= mediaSDN_d,1,0)
SC <- ifelse(sprd < media & sprd_d >= media_d,17,0)
in order t
Look at ?ifelse. You'll need to nest them however. If you are feeling a little
more ambitious this can be done with ?switch, but for clarity, I'd rather see
pre-allocation followed by assignments Something along this pattern:
out <- numeric(50)
x <- sample(3, 50, TRUE)
out[x==3] <- "A"
out[x==2
2 matches
Mail list logo
