按字符使用数据框中的值

Question

我有一个数据框，其中包含一个由NBA赛季格式化的文本列：

Year
2014-15
2013-14
2012-13
...
1999-00

我需要在第二年重新格式化。这是一个小数据集，我不介意手动修复1999-00值，但我无法弄清楚如何：

paste(data$Year[1:2],data$Year[6:7])

获得：

Year
2015
2014
2013
...
2000

Answer 1

我认为提取第一年并添加一个是最简单的：

as.numeric(substr(data$Year, 1, 4)) + 1
# [1] 2003 2002 2001 2000 1999

数据：

(data <- data.frame(Year=c("2002-03", "2001-02", "2000-01", "1999-00", "1998-99")))
#      Year
# 1 2002-03
# 2 2001-02
# 3 2000-01
# 4 1999-00
# 5 1998-99