Frühere | Chronologischer Index | Spätere | ||
Vorherige | Thematischer Index | Nächste |
> MovingAverage[data_List, (n_Integer)?Positive] := > Drop[Apply[Plus, NestList[RotateRight, data, n-1]], n-1]/n Apply[Plus, Partition[list, 20, 1], 1]/20 Gruß, Thomas Hahn
Frühere | Chronologischer Index | Spätere | ||
Vorherige | Thematischer Index | Nächste |
DMUG-Archiv, http://www.mathematica.ch/archiv.html