从标题中提取年份

Extract year from title

你好,我想从数据框 movies$title 的标题中提取年份到 R 中的数据框 movies$year

实际:

Title
Movie1(2017)
Movie2(2018)  

预期:

title    year
Movie1   2017
Movie2   2018

抱歉,丑陋 post,但我无法做到更好。我搜索了包括 Whosebug 在内的网络,但似乎找不到解决方案。它适用于 10.000 多部电影的大型数据集。有人可以帮我吗?

试试这个解决方案:

玩具数据框

movies<-data.frame(Title=c("Movie1(2017)","Movie2(2018)"))
movies
         Title
1 Movie1(2017)
2 Movie2(2018)

你的输出:

movies$Year<-substr(movies$Title,nchar(as.character(movies$Title))-4,nchar(as.character(movies$Title))-1)
movies$Title<-paste0(substr(movies$Title,1,nchar(as.character(movies$Title))-6))
movies
   Title Year
1 Movie1 2017
2 Movie2 2018