Tengo un conjunto de datos con ubicaciones y fechas. Me gustaría calcular la semana del año como número (00–53), pero usar el jueves como primer día de la semana. Los datos se ven así:

  location <- c(a,b,a,b,a,b)
  date <- c("04-01-2013","26-01-2013","03-02-2013","09-02-2013","20-02-2013","03-03-2013")
  mydf <- data.frame(location, date)
  mydf

Sé que existe una función de tiempo de respuesta para el cálculo de la semana del año, pero solo es posible usar el lunes o el domingo como el primer día de la semana. Cualquier ayuda sería muy apreciada.