이름이 아닌 B1 (newx) 선형 모델 계수의 값만 찾고 있습니다. 0.5 값만 원합니다. 나는 “newx”라는 이름을 원하지 않는다.
newx <- c(0.5,1.5.2.5)
newy <- c(2,3,4)
out <- lm(newy ~ newx)
out
다음과 같이 보입니다.
Call:
lm(formula = newy ~ newx)
Coefficients:
(Intercept) newx
1.5 1.0
여기에 도착했습니다. 하지만 지금은 붙어 있습니다.
out$coefficients["newx"]
newx
1.0
답변
이와 같은 단일 요소의 [[
경우 [
. 비교:
coefficients(out)["newx"]
# newx
# 1
coefficients(out)[["newx"]]
# [1] 1
더 일반적으로 다음을 사용하십시오 unname()
.
unname(coefficients(out)[c("newx", "(Intercept)")])
# [1] 1.0 1.5
head(unname(mtcars))
# NA NA NA NA NA NA NA NA NA NA NA
# Mazda RX4 21.0 6 160 110 3.90 2.620 16.46 0 1 4 4
# Mazda RX4 Wag 21.0 6 160 110 3.90 2.875 17.02 0 1 4 4
# Datsun 710 22.8 4 108 93 3.85 2.320 18.61 1 1 4 1
# Hornet 4 Drive 21.4 6 258 110 3.08 3.215 19.44 1 0 3 1
# Hornet Sportabout 18.7 8 360 175 3.15 3.440 17.02 0 0 3 2
# Valiant 18.1 6 225 105 2.76 3.460 20.22 1 0 3 1
## etc.
답변
질문이 이름 제거에 관한 것이라면 다른 방법이 있습니다.
my_vec <- # some quantile function(returns named vector)
names(my_vec) <- NULL
my_vec
## [1] 1 2 3
답변
또 다른 방법은 broom
패키지 를 사용하는 것입니다 .
broom::tidy(out)$estimate[1]
#1.5