根據條件替換值

我試圖替換此表中顯示的值。根據條件替換值

如果A是NA也B和C設置A到Unknown。
如果A是NA和B或C得到了一個值，設置A到Missing Value

 A   B  C 
1 NA  NA NA 
2 NA  200 NA 


       A  B  C  
1 NotImportant  NA  NA 
2  Unknown  200  NA

我試過一番，

if(is.na(ColumnA)) ColumnB[is.na(ColumnB)] <= "Not Important" 
if(is.na(ColumnA)) ColumnB[!is.na(ColumnB)] <= "Unknown"

，但我沒有得到任何結果。

有人能幫我解決這個問題嗎？我希望我能很好地描述我的問題。

來源

2017-04-23 Beginner

你可以試試這個地方df是你的數據：

df[rowSums(is.na(df))==3,]$A <- "NotImportant" 
df[with(df, is.na(A) & (!is.na(B) | !is.na(C))),]$A <- "Unknown" 

#    A B C 
#1 NotImportant NA NA 
#2  Unknown 200 NA

來源

2017-04-23 23:02:15 989

下面介紹如何在使用做case_when從dplyr：

df <- structure(list(A = c(NA, NA), B = c(NA, 200L), C = c(NA, NA)), .Names = c("A", 
"B", "C"), class = "data.frame", row.names = c("1", "2")) 

library(dplyr) 
df%>% 
mutate(A=case_when(
is.na(.$A)&is.na(.$B)&is.na(.$C) ~ "Not Important", 
is.na(.$A)&(is.na(.$B)|is.na(.$C)) ~ "Unknown") 
) 

       A B C 
1 Not Important NA NA 
2  Unknown 200 NA

來源

2017-04-23 23:32:34

df$A <- ifelse(!is.na(df$A), 
         df$A, 
         ifelse(is.na(df$B) & is.na(df$C), 
          "Not Important", 
          "Missing Value")) 

# A B C 
# 1 Not Important NA NA 
# 2 Missing Value 200 NA

來源

2017-04-23 23:50:52 epi99

根據條件替換值

回答

相關問題