Re: Programmierhilfe - Lineares Regressionmodell
Verfasst: Di Aug 07, 2018 8:38 am
Hallo Damian,
die Inkonsistenz der jetzigen Excel-Datei mit den Daten, mit denen ich besher gearbeitet habe, besteht darin, dass ich bei den bisherigen Daten in abnormal_returns_buys_agg nur 5 Zeilen habe (bzw. in abnormal_returns_buys nur 7).
Bitte lass Dich nicht von den Spaltennamen foppen (die stammen noch aus abnormal_returns_buys_agg)
Du kannst ja auch selber testen:
BTW: Deine Spaltenbezeichnung X_0to1 hätte mich vermuten lassen, dass hier zwei Spalten summiert werden.
Viele Grüße, Jörg
die Inkonsistenz der jetzigen Excel-Datei mit den Daten, mit denen ich besher gearbeitet habe, besteht darin, dass ich bei den bisherigen Daten in abnormal_returns_buys_agg nur 5 Zeilen habe (bzw. in abnormal_returns_buys nur 7).
Ich bin weiterhin der Meinung, das macht der von mir vorgeschlagene Code so, wie es in den Formeln in der Excel-Datei implementiert ist:darrgans hat geschrieben: ↑Mo Aug 06, 2018 8:39 pm die Berechnungen, wie ich auf die Werte "X_20to0, X_0to1, X_0to5, X_0to10, X_0to20" berechne sind noch als Formeln im zweiten Sheet der "Test"-Excel noch in den Zellen enthalten.
Das sind die Summen von:
X20to0: 20 Tage vor dem Event bis zum Event aufsummiert
X_0to1: 1 Tag nach dem Event
X_0to5: 5 Tage nach dem Event aufsummiert
X_0to10: 10 Tage nach dem Event aufsummiert
X_0to20: 20 Tage nach dem Event aufsummiert
Code: Alles auswählen
kumRend <- function(x) c(sum(x[1:20]), cumsum(x[-(1:21)])[c(1,5,10,20)])
t(apply(abnormal_returns_buys_agg[-(1:2)], 1, kumRend))
Du kannst ja auch selber testen:
Code: Alles auswählen
kumRend(1:41)
c(sum(1:20), 22, sum(22:26), sum(22:31), sum(22:41))
Ich hatte vorher nicht nach den Formeln gesehen - da hatte ich wohl einen kurzen Blackout. Statt dessen war mir die oben beschriebene Inkonsistenz ins Auge gefallen.Die Datei mit den Formeln, falls ich diese aus der letzten gelöscht habe, findest du nochmal anbei.
Viele Grüße, Jörg