我有一个字符串,需要将时间戳与该字符串分开。我使用strsplit
函数进行字符串拆分。在这里附上我的代码。
string <- "10:00:in(XXXX),10:47:out(XXXX),12:36:in(XXXX),13:12:out(XXXX)"
splt <- strsplit(string,split = ",")[[1]]
> splt
[1] "10:00:in(XXXX)" "10:47:out(XXXX)" "12:36:in(XXXX)" "13:12:out(XXXX)"
以下是我的预期输出
[1] "10:00" "10:47" "12:36" "13:12"
我需要在strsplit
函数中添加哪些修改。你能帮我弄清楚这个问题吗?
提前致谢
答案 0 :(得分:2)
我不确定您可以添加到strsplit
的内容,但是您可以将其包含在substr
来电中,因为您的时间是标准长度,这将有效。
string <- "10:00:in(XXXX),10:47:out(XXXX),12:36:in(XXXX),13:12:out(XXXX)"
splt <- substr(strsplit(string,split = ",")[[1]], 1, 5)
splt
[1] "10:00" "10:47" "12:36" "13:12"