dplyr更新在data.frame細胞

Question

df <-data.frame(x=c(1:5),y=c(letters[1:5])) 

比方說，我想修改的最後一排，

update.row<-filter(df,x==5) %>% mutate(y="R") 

如何更新此行到data.frame？ 唯一的辦法，我發現雖然一個奇怪的方法是做一個反連接並追加結果。

df <-anti_join(df,update.row,by="x") %>% 
    bind_rows(update.row) 

但是，它似乎是一個非常簡單的任務的方式。 任何想法，非常感謝...

Answer 1

與data.table，我們可以分配（:=）的值，其中i是TRUE。這是非常有效的，因爲分配工作已經完成。

library(data.table) 
setDT(df)[x==5, y:="R"] 
df 
# x y 
#1: 1 a 
#2: 2 b 
#3: 3 c 
#4: 4 d 
#5: 5 R 

由於對最後一行中提到的OP，一個更普遍的方式是

setDT(df)[.N, y:= "R"] 

或者像@thelatemail提到的，如果我們要替換的任何行剛剛提到在i即行索引這種情況下5。

setDT(df)[5, y:="R"] 

Answer 2

如果你在dplyr insistant，也許

df <-data.frame(x=c(1:5),y=c(letters[1:5])) 

library(dplyr) 
df %>% 
    mutate(y = as.character(y)) %>% 
    mutate(y = ifelse(row_number()==n(), "R", y)) 

# x y 
#1 1 a 
#2 2 b 
#3 3 c 
#4 4 d 
#5 5 R