이름없이 명명 된 번호에서 번호 만 추출하려면 어떻게합니까?


84

이름이 아닌 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 

8
as.numeric(out$coefficients["newx"])
Ben

as.numeric은 작동합니다. 숫자를 강제하는 저렴한 방법일까요?
Andre Mikulec 2013

1
newx같은 이름 대신 (2) 의 색인 번호를 사용할 수 있습니다 out[[1]][[2]].
Gürol Canbek

답변:


110

이와 같은 단일 요소의 [[경우 [. 비교:

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.

4

질문이 이름 제거에 관한 것이라면 다른 방법이 있습니다.

my_vec <- # some quantile function(returns named vector)
names(my_vec) <- NULL
my_vec
## [1] 1 2 3

0

또 다른 방법은 broom패키지 를 사용하는 것입니다 .

broom::tidy(out)$estimate[1]
#1.5
당사 사이트를 사용함과 동시에 당사의 쿠키 정책개인정보 보호정책을 읽고 이해하였음을 인정하는 것으로 간주합니다.
Licensed under cc by-sa 3.0 with attribution required.