ein minimales Beispiel könnte so aussehen:
Code: Alles auswählen
library(tseries)
x <- rnorm(1000)
y <- cumsum(x)
xtest <- broom::glance(kpss.test(x))
ytest <- broom::glance(kpss.test(y))
Schauen wir uns die Ergebnisse an:Eigentlich bin ich mit der Ausgabe fast schon zufrieden, nur hätte ich gerne die Ergebnisse untereinander und nicht nebeneinander. Bekommt man das irgendwie hin?
Code: Alles auswählen
> xtest
# A tibble: 1 x 4
statistic p.value parameter method
<dbl> <dbl> <dbl> <chr>
1 0.110 0.1 7 KPSS Test for Level Stationarity
> ytest
# A tibble: 1 x 4
statistic p.value parameter method
<dbl> <dbl> <dbl> <chr>
1 0.924 0.01 7 KPSS Test for Level Stationarity
Code: Alles auswählen
rbind(xtest, ytest) |>
write.csv2(file="test.csv")
LG,
Bernhard