R : 열의 문자열을 조건으로 두 번째 열로 대체하려면 어떻게합니까?

Question

는이 같은 작은 데이터 프레임이 있습니다

a<-c("green","green","green","green","green","green","green","green","green","green") 
b<-c("blue","red","blue","red","blue","red","blue","red","blue","red") 
df<-data.frame(a,b) 
df 
     a b 
1 green blue 
2 green red 
3 green blue 
4 green red 
5 green blue 
6 green red 
7 green blue 
8 green red 
9 green blue 
10 green red 

을 나는 "노란색"여기서 B == "빨간색"

내가 df[b=="red",] 이러한 행을 선택할 수 있습니다하여 "녹색"을 대체하고 싶습니다 그러나 교체가 작동하지 않습니다. 나는 시도 :

> df[b=="red",]$a<-gsub("green","yellow",df[b=="red",]) 
Fehler in `$<-.data.frame`(`*tmp*`, "a", value = c("c(1, 1, 1, 1, 1)", : 
    replacement has 2 rows, data has 5 

또는

> df$a[subset(df$a,df$b=="red")]<-"yellow" 
Warnmeldung: 
In `[<-.factor`(`*tmp*`, subset(df$a, df$b == "red"), value = c(NA, : 
    invalid factor level, NA generated 
> df 
     a b 
1 <NA> blue 
2 green red 
3 green blue 
4 green red 
5 green blue 
6 green red 
7 green blue 
8 green red 
9 green blue 
10 green red 

및

> df[b=="red",]$a<-"yellow" 
Warnmeldung: 
In `[<-.factor`(`*tmp*`, iseq, value = c("yellow", "yellow", "yellow", : 
    invalid factor level, NA generated 
> df 
     a b 
1 green blue 
2 <NA> red 
3 green blue 
4 <NA> red 
5 green blue 
6 <NA> red 
7 green blue 
8 <NA> red 
9 green blue 
10 <NA> red 

이 중에 내 문제에 대해 제대로 작동하지합니다. 가장 간단한 해결책은 무엇입니까? 많은 감사, Treppenlift.

Answer 1

어떤 기능을 사용할 수 있습니다. 일부 예는 http://www.endmemo.com/program/R/which.php을 참조하십시오.

df[which(df[,2]=="red"),1] <- "yellow"