Day of the week: Difference between revisions

Content added Content deleted
Line 1,241: Line 1,241:
2011 2016 2022 2033 2039 2044 2050 2061 2067 2072 2078 2089 2095 2101 2107 2112 2118
2011 2016 2022 2033 2039 2044 2050 2061 2067 2072 2078 2089 2095 2101 2107 2112 2118


<lang R>

Also:
Also:


xmas=seq(as.Date("2008/12/25"), as.Date("2121/12/25"), by="year")
xmas=seq(as.Date("2008/12/25"), as.Date("2121/12/25"), by="year")
as.numeric(format(xmas[weekdays(xmas)== 'Sunday'], "%Y"))
as.numeric(format(xmas[weekdays(xmas)== 'Sunday'], "%Y"))
</lang>


=={{header|REBOL}}==
=={{header|REBOL}}==