# Here we supply a western encoding to `weekday()`
x <- weekday(1:7)
x
# We can extract out the codes using different encodings
weekday_code(x, encoding = "western")
weekday_code(x, encoding = "iso")
Run the code above in your browser using DataLab