извлечение возвращаемого значения из evimp в Марсе, земля r пакет

Question

Земля пакет в R: Здравствуйте, я запускаю цикл для извлечения 1000 подмножеств данных из моей основной базы данных и запускаю серию тестов на основе MARS, которые я затем суммирую в df. Я хочу получить возвращаемые значения evimp (строки = имя переменной, столбцы = # подмножества, GCV, RSS), которые ранжируют важность входных переменных для каждого прогона. Но я не могу извлечь или добавить эти значения в фрейм данных, потому что это класс «evimp». Как я могу вытащить эти значения и поместить их в таблицу?

Answer 1

Этот класс evimp усложняет получение данных, но unclass превратит их в матрицу, с которой вы сможете справиться.

Пример:

library(earth)

data(ozone1)
earth.mod <- earth(O3 ~ ., data=ozone1, degree=2)
ev <- evimp(earth.mod, trim=FALSE)

evdf = as.data.frame(unclass(ev[,c(3,4,6)]))
evdf
         nsubsets        gcv       rss
temp           11 100.000000 100.00000
humidity        9  35.667541  38.88609
ibt             7  31.618413  33.98691
doy             7  31.618413  33.98691
ibh             6  33.432738  36.02932
dpg             6  27.452997  29.75686
vis             5  21.426773  24.09804
wind            2  10.263603  12.59467
vh              1   5.324573   7.65049