删除字符串中空格后的所有内容

Question

我想删除字符串中空格后的所有内容。

例如：

"my string is sad"

应该返回

"my"

我一直在尝试找出如何使用 sub/gsub 来执行此操作，但到目前为止尚未成功。

Answer 1

您可以使用正则表达式，例如

sub(" .*", "", x)

请参阅正则表达式演示。

在这里，sub 将仅执行单个搜索和替换操作，.* 模式将查找第一个空格（因为正则表达式引擎从左到右搜索字符串）并且.* 匹配任何零个或多个字符（在 TRE 正则表达式风格中，甚至包括换行符，使用 perl=TRUE 时要小心，否则情况并非如此）尽可能，直到字符串末端。

一些变化：

sub("[[:space:]].*", "", x) # \s or [[:space:]] will match more whitespace chars
sub("(*UCP)(?s)\\s.*", "", x, perl=TRUE) # PCRE Unicode-aware regex
stringr::str_replace(x, "(?s) .*", "")   # (?s) will force . to match any chars

请参阅在线 R 演示。

Answer 2

strsplit("my string is sad"," ")[[1]][1]

Answer 3

或者，将第一个空格后面的所有内容替换为空：

gsub(' [A-z ]*', '' , 'my string is sad')

并且用数字：

gsub('([0-9]+) .*', '\\1', c('c123123123 0320.1'))

Answer 4

Stringr 是你的朋友。

library(stringr)
word("my string is sad", 1)

Answer 5

如果你想用正则表达式来做到这一点：

gsub('([A-z]+) .*', '\\1', 'my string is sad')