R - совокупность ежедневно с еженедельно с датой начала, как в субботу

Question

У меня есть ежедневные данные, и я хочу конвертировать их в неделю с Week начиная с субботы.

date value 
1 11/5/2016 30 
2 11/6/2016 20 
3 11/7/2016 12 
4 11/8/2016 22 
5 11/9/2016 48 
6 11/10/2016 50 
7 11/11/2016 47 
8 11/12/2016 12 
9 11/13/2016 19 
10 11/14/2016 31 
11 11/15/2016 43 
12 11/16/2016 26 
13 11/17/2016 33 
14 11/18/2016 36 
15 11/19/2016 14 
16 11/20/2016 15 
17 11/21/2016 36 
18 11/22/2016 38 
19 11/23/2016 28 
20 11/24/2016 21 
21 11/25/2016 13  

Я попытался следующие, но это предполагает, Начало недели в понедельник

data = as.xts(df$value,order.by=as.Date(df$date)) 
weekly = apply.weekly(data,sum) 

Я хочу выход быть обобщен в субботу как начало недели.

Answer 1

order.by заявление в xts вызова не с правильным format из Date класса

data <- xts(df$value, order.by = as.Date(df$date, '%m/%d/%Y')) 
tapply(data[,1], cumsum(format(index(data), '%w')==6), sum)