从 R 中的特殊字符中删除引号

Question

当我在 r 中打印模式程序时，

 char<-c("#","@")
m<- matrix(paste(char[1]),nrow  =4, ncol = 4)
print(m)

我的输出是

 [,1] [,2] [,3] [,4]
[1,] "#"  "#"  "#"  "#" 
[2,] "#"  "#"  "#"  "#" 
[3,] "#"  "#"  "#"  "#" 
[4,] "#"  "#"  "#"  "#" 

但我想要的输出是#不带引号。 我尝试了 char 方法，我尝试了 vector 并尝试了noquote函数。 但没有一个对我有用。 如果有人知道解决方案，请帮我解决。

Answer 1

双引号实际上不是数据的一部分，只是 R 呈现输出的方式； 但是，如果您已经知道这一点并且正在询问如何在没有双引号的情况下打印它，那么请使用noquote

noquote(m)

给予：

     [,1] [,2] [,3] [,4]
[1,] #    #    #    #   
[2,] #    #    #    #   
[3,] #    #    #    #   
[4,] #    #    #    #   

print也有一个quote=FALSE参数给出相同的输出：

print(m, quote = FALSE)