R-gsub在每个char之后输出不需要的空间

Question

我之前在stackoverflow上看到过类似的问题，但无法再找到它。 我想删除一种＆＃34; _＆＃34;对于数据帧的每一行。但我在下面得到了不受欢迎的输出。

虽然适用于角色

s="PUERTO PRINCESA CITY (CAPITAL)"

gsub("\\W*"," ",s)

"PUERTO PRINCESA CITY CAPITAL "

我将使用以下数据说明我的观点：

关键在于，当我在stackoverflow上复制gsub时，我想删除的字符消失。

而且我不知道角色的名字。让我们假装有一个角色＆＃34; _＆＃34;那个\ W会删除。

 df <-data.frame(col1= c("OCCIDENTAL_MINDORO", "ORIENTAL_MINDORO", "PALAWAN_*",     "PUERTO_PRINCESA_CITY_(CAPITAL)"))


temp2 <- gsub("\\W+"," ",as.matrix(df))

 temp2
     col1                                                 
[1,] " O C C I D E N T A L M I N D O R O "                
[2,] " O R I E N T A L M I N D O R O "                    
[3,] " P A L A W A N "                                    
[4,] " P U E R T O P R I N C E S A C I T Y C A P I T A L "

期望的结果：

temp2 <- gsub("\\W*"," ",as.matrix(df))
     col1                           
[1,] "OCCIDENTAL MINDORO"           
[2,] "ORIENTAL MINDORO"             
[3,] "PALAWAN "                     
[4,] "PUERTO PRINCESA CITY CAPITAL "