以字符一個字符的左側

Question

鑑於一些數據

hello <- c('13.txt','12.txt','14.txt') 

我想只取號，並轉換爲數字，即除去.TXT

Answer 1

您可以使用原始帖子中「hello」對象上的函數gsub使用正則表達式執行此操作。

hello <- c('13.txt','12.txt','14.txt') 
as.numeric(gsub("([0-9]+).*","\\1",hello)) 
#[1] 13 12 14 

Answer 2

你想file_path_sans_ext從tools包

library(tools) 
hello <- c('13.txt','12.txt','14.txt') 
file_path_sans_ext(hello) 
## [1] "13" "12" "14" 

Answer 3

另一個正則表達式的解決方案

hello <- c("13.txt", "12.txt", "14.txt") 
as.numeric(regmatches(hello, gregexpr("[0-9]+", hello))) 
## [1] 13 12 14 

Answer 4

如果你知道你的擴展都.txt那麼你可以使用substr()

> hello <- c('13.txt','12.txt','14.txt') 
> as.numeric(substr(hello, 1, nchar(hello) - 3)) 
#[1] 13 12 14