Как извлечь только номер из именованного номера (без имени)?

Question

Я ищу только значение линейного коэффициента модели 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 

Answer 1

Для одного элемента, как это, использовать [[, а не [. Сравните:

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.