powered by
date.to.week(date)
week.to.date
date.to.week(as.Date("2013/06/10"))
Run the code above in your browser using DataLab