Extrahieren Sie die Knoten aus einem NS -Objekt
-
26-10-2019 - |
Frage
library(splines)
x <- runif(100000)
spline <- ns(x, df=5)
Wie kann ich sagen, wo sich die Knoten in diesem Wirbelsäulenobjekt befinden?
> spline ['knots']
[1] NA
str
Bringt mich nahe an das, was ich brauche, aber ich möchte den Vektor von Splines extrahieren, ihn formatieren und in einem Sweaf -Dokument drucken.
> str(sp)
ns [1:117542, 1:5] 0.527 0.474 0.455 0.472 0.498 ...
- attr(*, "dimnames")=List of 2
..$ : NULL
..$ : chr [1:5] "1" "2" "3" "4" ...
- attr(*, "degree")= num 3
- attr(*, "knots")= Named num [1:4] 1.03 1.55 1.99 2.7
..- attr(*, "names")= chr [1:4] "20%" "40%" "60%" "80%"
- attr(*, "Boundary.knots")= num [1:2] 0.0214 4.9999
- attr(*, "intercept")= logi FALSE
- attr(*, "class")= chr [1:3] "ns" "basis" "matrix"
Lösung
Nun, so etwas kann das Zeug definitiv extrahieren:
> attr(spline, "knots")
20% 40% 60% 80%
0.1966951 0.3973261 0.5982386 0.7993613
Lizenziert unter: CC-BY-SA mit Zuschreibung
Nicht verbunden mit StackOverflow