0
library(tsibble)
#> 
#> Attaching package: 'tsibble'
#> The following objects are masked from 'package:base':
#> 
#>     intersect, setdiff, union

(yw <- yearweek("2020-01-01"))
#> <yearweek[1]>
#> [1] "2020 W01"
#> # Week starts on: Monday
format(yw, "%Y-%m-%d")
#> [1] "2020-12-30"

Created on 2021-05-12 by the reprex package (v2.0.0)

sagrules
  • 31
  • 1
  • 7

1 Answers1

0

Because it operates as documented. Using the fine documentation in base R under help(strptime):

 ‘%U’ Week of the year as decimal number (00-53) using Sunday as    
      the first day 1 of the week (and typically with the first     
      Sunday of the year as day 1 of week 1).  The US convention.        

 ‘%V’ Week of the year as decimal number (01-53) as defined in ISO 
      8601.  If the week (starting on Monday) containing 1 January 
      has four or more days in the new year, then it is considered 
      week 1.  Otherwise, it is the last week of the previous year,
      and the next week is week 1.  (Accepted but ignored on       
      input.)                                                      
                                                                   
 [...]      

 ‘%W’ Week of the year as decimal number (00-53) using Monday as   
      the first day of week (and typically with the first Monday of
      the year as day 1 of week 1).  The UK convention.

Which we can then test using %Y-W following by the option:

> strftime(as.Date("2020-01-01"), "%Y-W%U")      
[1] "2020-W00"                                
> strftime(as.Date("2020-01-01"), "%Y-W%V")   
[1] "2020-W01"                                
> strftime(as.Date("2020-01-01"), "%Y-W%W")   
[1] "2020-W00"                                
>

What you get in your example are essentially just wrappers around the same functionality. Maybe yearweek() gives you a choice of convention; if not you now know how to build your own under a different option.

Dirk Eddelbuettel
  • 360,940
  • 56
  • 644
  • 725
  • I think the question is why `strftime(yw, "%Y-%m-%d")` returns `2019-12-30` which is understandable, whereas `format(yw,"%Y-%m-%d")`returns `2020-12-30`, why 1 year difference? – Waldi May 12 '21 at 22:46
  • Dunno -- maybe `format()` dispatches on `yearweek` to something else. I tend to get by with base R functions. But see `%G` in the help page: "The week-based year (see ‘%V’) as a decimal number." – Dirk Eddelbuettel May 13 '21 at 00:34
  • Yes, Waldi understands my problem, with format I am getting a whole year as difference. – sagrules May 14 '21 at 15:08
  • The help text I referenced I referenced and quoted explains it too. Try `format(as.Date("2019-12-31"), "%G-%V")`. – Dirk Eddelbuettel May 14 '21 at 15:13