“url last”from url as string

Question

我想返回“blah”。

url <- "https://www.example.com/apples/pears/blah.csv" 

我可以得到等等，但我觉得我正在写更多的代码行比我应该。例如，要获得blah.csv我可以这样做：

url_split <- str_split(url, "/") 
dirname <- url_split[[1]][length(url_split[[1]])] 

这给了我“blah.csv”，在那里我能做到如上一个非常类似的代码块再次调用str_split得到“嗒嗒”。

是否有更复杂的一个班轮，以获得url中的最后一个目录减“.csv”？

Answer 1

fn <- basename("https://www.example.com/apples/pears/blah.csv") 
gsub("\\..*$", "", fn)