여러 ifelse 문

Question

나는

 var1 var2 a1 a2 
1 a b  y  z 
2 b a  z  y 
3 b b  z  z 

다음 코드에서 생성 df라고 (가)

help <- data.frame(var1 = c("a", "b", "b"), var2 = c("b", "a", "b"), a1 = c(y, z, z), a2 = c(z, y, z)) 

내 의도가 I (1) 모든 A1 값을 대체 할 수 있어요 ifelse 문을 만드는 것입니다 아래에있다 (2) var2가 'a'일 때 모든 a2 값을 'bp'로 바꿉니다. var1 또는 var2가 'a'가 아닌 경우 값을 변경하고 싶지 않습니다.

ifelse 명령은이 문제를 해결하는 가장 좋은 방법이 아닙니까? help$a1[help$a1 == "a"] <- "bp"을 사용하여 수동으로 각각 하나씩 작업하기 시작했습니다. 그러나 여러 변수와 대형 데이터 세트를 가지고 있기 때문에 약간 시간이 걸릴 것입니다. 어떤 도움이라도 좋을 것입니다.

감사합니다.

Answer 1

표준 하위 집합을 사용할 수 있습니다. a1 및 a2이

df 
# var1 var2 a1 a2 
#1 a b y z 
#2 b a z y 
#3 b d z z 

df[,3:4][df[,1:2]=="a"]<-"bp" 

df 
# var1 var2 a1 b2 
#1 a b bp z 
#2 b a z bp 
#3 b d z z 

또한 두 경우 모두 같은

sel<-paste0("var",1:2) 
mut<-paste0("a",1:2) 
df[,mut][df[,sel]=="a"]<-"bp" 

의 내부를 명명 규칙을 활용할 수

, 예를 들어, 다음, "문자"클래스의 것을 질문 편집 당 가정 df[,sel]=="a"은 과 동일한 모양 (따라서 df[,mut]과 동일한 모양) 인 TRUE과 같은 모양의 논리 행렬을 반환합니다. 여기서 "a"가있는 부분 만이 반환됩니다. 외부 부분, 예를 들어. df[,mut][...]은 해당 논리 매트릭스를 사용하여 할당 대상 서브 세트를 나타냅니다.