年周格式 R

Question

我有一個包含許多列的 dataframe (df_malaria)，其中兩列代表案例的年份和星期。

年	星期
2010	1個
2010	4個
2010	5個
2010	6個

我想要的是一個額外的列，日期顯示為年 - 周

年周
2010 - 01
2010 - 04
2010 - 05
2010 - 06

我嘗試使用下面的代碼來實現這一點，但沒有成功。

df_malaria$date <- as.Date(with(df_malaria, paste(Year, Week, sep="-")), "%Y-%W")

有什么建議么？

Answer 1

在基數 R 中：

transform(df,Year_Week= sprintf('%d - %02d',Year, Week))

  Year Week Year_Week
1 2010    1 2010 - 01
2 2010    4 2010 - 04
3 2010    5 2010 - 05
4 2010    6 2010 - 06

您還可以使用tidyr中的unite ：

library(tidyverse)
unite(df,'Year-Week',  Year, Week, sep = ' - ')

  Year-Week
1  2010 - 1
2  2010 - 4
3  2010 - 5
4  2010 - 6