R : 범위 조건에 따라 벡터 변경

Question

조건에 따라 벡터 요소를 변경하고 싶습니다. 예를 들어 : 나는 벡터 v<-c(-3,5,-1,7,8,1,10,11)을하고 난 결과로 (-1,1,0,1,1,0,1,1) 조건이

이

if the element is <-1 then set -1 
if the element is >1 then set 1 
otherwise 0 

내가 ifelse 문 세리 사용하여이를 달성 할 수있는 벡터 생성 할 :

v<-c(-3,5,-1,7,8,1,10,11) 
    res<-rep(0,8) 
    res<-ifelse(v<1,-1,res) 
    res<-ifelse(v>1,1,res) 

을 나는 그러나 이것을하는 더 우아하고 조밀 한 방법이 있어야 한 ㄴ다는 것을 생각한다. 제안 사항이 있으십니까?

감사

Answer 1

sign(v) * (abs(v) > 1) 
# [1] -1 1 0 1 1 0 1 1 

Answer 2

v[v >= -1 & v <= 1] = 0 
v = sign(v)