从给定位置和结果的函数的结果中提取向量中的位置

Question

我有一个线性回归

library(car)
x<-c(1,2,4,5,6,23,5,6,7,8,0,3,4,5,6,7,8,9,45,3,2,1,3,4,6,7,6,8,9)
y<-c(2,4,5,6,23,5,6,7,8,0,3,4,5,6,7,8,9,45,3,2,1,3,4,6,7,6,8,9,90)
reg<-lm(x~y)

outlierTest(reg)
outlierTest(reg)$rstudent[1]
#     19 
#9.390998 

我希望能够从结果中提取数字19（表示x中的位置）但是我不确定是否可以直接从结果中进行。

谢谢

Answer 1

您所看到的19是一个名称，可以使用names

进行访问

> ot <- outlierTest(reg)$rstudent[1]
> names(ot)
# [1] "19"

通过将x转换为数字并使用names(ot)建立索引，可以访问[的相应值。

> x[as.numeric(names(ot))]
# [1] 45