如何從文本中提取數字？

Question

我有流動文本串：

string <- "['CBOE SHORT-TERM VIX FUTURE DEC 2016', 81.64],\n\n ['CBOE SHORT-TERM VIX FUTURE JAN 2017', 18.36]" 

有提取文本數字元素，而不必使用的一個簡單的方法：

​​

，然後選擇第n個元素，並繼續strsplit直到我有我所需要的。

的結果應該是：

result <- c(2016, 81, 64, 2017, 18, 36) 

謝謝。

Answer 1

通過將圖案指定爲一個或多個數字（[0-9]+），我們可以使用str_extract_all。輸出將是長度爲1的list，用[[提取矢量並將其轉換爲numeric。

library(stringr) 
as.numeric(str_extract_all(string, "[0-9]+")[[1]]) 
#[1] 2016 81 64 2017 18 36 

如果我們使用strsplit，由非數字字符

as.numeric(strsplit(string, "\\D+")[[1]][-1]) 
#[1] 2016 81 64 2017 18 36