正则表达式删除 r 中的 .csv

Question

这将是愚蠢的。

我有一个像这样的字符串:

word <- "dirtyboards.csv" 

我想删除 csv 部分并获得“dirtyboards”。

我正在尝试:

require(stringr)
str_extract(word, ".*[^.csv]")

我得到返回:“脏板”。 “.csv”之前的“s”丢失。

我知道我可以，

gsub(".csv", "", word)

Answer 1

尝试

library(stringr)
str_extract(word, '.*(?=\\.csv)')
#[1] "dirtyboards"

适用于所提供示例的另一个选项(不是很具体)

str_extract(word, '^[^.]+')
#[1] "dirtyboards" 

更新

包括'foo.csv.csv'，

word1 <- c("dirtyboards.csv" , "boardcsv.csv", "foo.csv.csv")
str_extract(word1, '.*(?=\\.csv$)')
#[1] "dirtyboards" "boardcsv"    "foo.csv"