使用R替換字符

Question

我有一個csv文件，其中有1列地址。它具有像值：

A <- structure(list(Address = structure(1:3, .Label = c("&2340 P St", 
"&5656 N St", "456 B Street"), class = "factor")), .Names = "Address", 
row.names = c(NA, 3L), class = "data.frame") 
A 
##  Address 
## 1 &2340 P St 
## 2 &5656 N St 
## 3 456 B Street 

我需要清理數據 - 以刪除所有字符（或空格替換）如果有「&」。 我在我的2.csv文件期待這樣的結果：

##  Address 
## 1 456 B Street 

下面的代碼：

A <-read.csv("U:/161/1.csv", header=T,sep=",") 
B<-gsub("&", " ", A$ADDRESS1, ignore.case = TRUE) 
write.table(B, file = "U:/161/2.csv", sep = "," 
, col.names = NA, qmethod = "double") 

它不僅能消除「&」。我如何刪除剩餘的地址？

Answer 1

使用grep或grepl，以確定哪些行包含&然後排除這些行

B <- droplevels(A[!grepl('&', A$Address), ,drop=FALSE]) 
B 
##  Address 
## 3 456 B Street 

通知我包裹[呼叫droplevels，以確保未使用的水平（那些&）被丟棄 也，因爲在這種情況下結果將只有1行，我包括drop=FALSE保持B作爲data.frame

要使用grep（它返回索引）您將使用-

B <- droplevels(A[-grep('&', A$Address), ,drop=FALSE]) 
B