Я пытаюсь создать несколько DF из функции, причем каждый DF является совокупностью значений до разных строк.Для справки я использую данные фэнтези-футбола.Так что сейчас у меня есть статистика каждого игрока за каждую неделю.Я хочу создать фрейм данных для каждой недели и их совокупную статистику до этой недели.
Вот моя функция, которую я сейчас использую, которая создает только один список агрегирования значений за неделю.
![The picture is the example of the dataaframe. starting from 4 I want 14 DFs with the sums of each week aggregated Sigma4!](https://i.stack.imgur.com/glIxG.png)
sumuptopoint <- function(dfx,i) { listofdfs <- list()
dfy <- dfx[, !sapply(dfx, is.character)]
{for (i in 1:17)
dft <- dfy[dfy$Week < i,]
y <<- as.data.frame(aggregate(dft, list("PlayerID" = dft$PlayerID), sum))
listofdfs[[i]] <- y}
return(listofdfs)}
Я ожидаю 17 списков агрегированных данных, но получаю только 1 список, в котором агрегированы 17 недель до 17
Вот df:
Team ByeWeek Rank.all PlayerID Name Position Week Opponent PassingCompletio~ PassingAttempts.~ PassingCompletio~ PassingYards.all PassingTouchdow~ PassingIntercep~ PassingRating.a~
<chr> <int> <int> <int> <chr> <chr> <dbl> <chr> <int> <int> <dbl> <int> <int> <int> <dbl>
1 ARI 12 201 19763 Josh ~ QB 8.00 SF 23 40 57.5 252 2 1 82.5
2 ARI 12 319 19763 Josh ~ QB 11.0 OAK 9 20 45.0 136 3 2 67.9
3 ARI 12 372 19763 Josh ~ QB 4.00 SEA 15 27 55.6 180 1 0 88.5
4 ARI 12 392 11527 Sam B~ QB 3.00 CHI 13 19 68.4 157 2 2 89.0
5 ARI 12 407 19763 Josh ~ QB 5.00 SF 10 25 40.0 170 1 0 77.1
6 ARI 12 411 19763 Josh ~ QB 10.0 KC 22 39 56.4 208 1 2 58.5