3

我有一个像下面这样的向量

vec <- c("abc\edw\www", "nmn\ggg", "rer\qqq\fdf"......)

我想在遇到第一个斜杠后立即删除所有内容，如下所示

newvec <- c("abc","nmn","rer")

谢谢你。

我的原始向量如下（只有头部）

[1] "peoria ave\nste \npeoria"                      [2]   "wood dr\nphoenix"                                  
"central ave\nphoenix"                            
[4] "southern ave\nphoenix"                         [5]   "happy valley rd\nste   
\nglendaleaz "               "the americana at brand\n americana way\nglendale"

这里的问题是我的原始 csv 文件不包含反斜杠，但是当我阅读它时出现反斜杠。原始csv文件如下

[1] "peoria ave               [2] "wood dr
     nste                          nphoenix"       
     npeoria"

如您所见，它们实际上由“ENTER”分隔，但是当我使用 read.csv() 在 R 中读取它时，它们被反斜杠替换。

4

3 回答 3

4

另一个解决方案：

 sub("\\\\.*", "", x)
于 2013-06-19T09:28:44.930 回答
1 
vec <- c("abc\\edw\\www", "nmn\\ggg", "rer\\qqq\\fdf")
sub("([^\\\\])\\\\.*","\\1", vec)
[1] "abc" "nmn" "rer"
于 2013-06-19T09:25:36.183 回答
1

strssplit(vec, "\\\\")应该做的工作。

选择第[[1]][1]2 个元素[[1]][2]

于 2013-06-19T09:25:46.560 回答