Как я могу сгруппировать дни в недели?

Как я могу связать вектор дат (дней) и недель в R?

Изменить: «недели» должны быть индексом недели в пределах диапазон дат, а не год. Приношу свои извинения за двусмысленность.