如何將數據框中的年份值轉換為兩位數的值？

Question

我嘗試使用此公式將數據框“年”中提到的年份轉換為2位數字的值

yr <- format((Yr[,]), format = "%y")

注意：Yr是一個由年份值viz組成的data.frame。 2015、2012、1998等。我嘗試將這些值分別以以下格式15、12、98加載到變量yr中。

Answer 1

sprintf("%02d", Year %% 100)怎么樣？

Year <- 1960:2016
sprintf("%02d", Year %% 100)
# [1] "60" "61" "62" "63" "64" "65" "66" "67" "68" "69" "70" "71" "72" "73" "74"
#[16] "75" "76" "77" "78" "79" "80" "81" "82" "83" "84" "85" "86" "87" "88" "89"
#[31] "90" "91" "92" "93" "94" "95" "96" "97" "98" "99" "00" "01" "02" "03" "04"
#[46] "05" "06" "07" "08" "09" "10" "11" "12" "13" "14" "15" "16"

另一種方法是使用substr ，如@alistaire所述：

substr(Year, 3, 4)
# [1] "60" "61" "62" "63" "64" "65" "66" "67" "68" "69" "70" "71" "72" "73" "74"
#[16] "75" "76" "77" "78" "79" "80" "81" "82" "83" "84" "85" "86" "87" "88" "89"
#[31] "90" "91" "92" "93" "94" "95" "96" "97" "98" "99" "00" "01" "02" "03" "04"
#[46] "05" "06" "07" "08" "09" "10" "11" "12" "13" "14" "15" "16"