Пакет GAMens для одного случая предиктора

Question

Я пытаюсь использовать пакет GAMens для «одномерного набора данных» (один предиктор и один ответ) для очень простого искусственного набора данных:

library(GAMens)
trainingdata <- read.table("D:/data.txt", header = TRUE, sep="\t")
trainingdata.GAMrsm <- GAMens(class~., trainingdata, 1,  autoform=TRUE, iter=10, rsm=FALSE)

К сожалению, я получаю:

Ошибка в [.data.frame (data, as.character (формула [[2]]))): выбраны неопределенные столбцы

Может быть, я что-то упускаю, но можно ли заставить это работать в одномерном случае («измерения» больше одного работают нормально). Спасибо.

EDIT:

Вот как генерируются искусственные данные:

n.site <- 150

    X1<- sort(runif(n = n.site, min = -1, max =1))

    xb <- 0.0 + 3.0*X1 

    occ.prob <- 1/(1+exp(-xb))

    true.presence <- rbinom(n = n.site, size = 1, prob = occ.prob)

    data <- data.frame(X1, true.presence)

    write.matrix(data, file = "data.txt", sep = "\t")

В качестве альтернативы вы можете скачать данные здесь:

Данные

Answer 1

Ваш data ввод не имеет столбца с именем "class", поэтому используемая вами формула class ~ . недопустима.Конечно, сообщение об ошибке не очень полезно ...

Кажется, это работает (но медленно, но все еще работает через 10 минут):

trainingdata.GAMrsm <- GAMens (true.наличие ~ X1, данные, 1, автоформа = TRUE, iter = 10, rsm = FALSE) </p>

Answer 2

Проблема решена в новой версии пакета. Загрузите версию 1.1.2 пакета GAMens через репозиторий CRAN.

С наилучшими пожеланиями