R Прямой пошаговый выбор - ошибка в разборе

Question

У меня есть этот код, который отлично работает:

backMod <- train(Y ~ poly(X, 15), 
             data = yx, 
             method = 'glmStepAIC', 
             direction = 'backward', 
             trace = 0,
             trControl = trainControl(method = 'none', 
             verboseIter = FALSE))

Но я получаю ошибку при запуске этого кода:

forMod <- train(Y ~ poly(X, 15), 
             data = yx, 
             method = 'glmStepAIC', 
             direction = 'forward', 
             trace = 0,
             trControl = trainControl(method = 'none', 
             verboseIter = FALSE))

Я получаю следующую ошибку:

Error in parse(text = x, keep.source = FALSE) : 
<text>:1:21: unexpected numeric constant
1: .outcome~poly(X, 15)1
                        ^

Я не могу понять, что было сделано по-другому в коде forMod, который выдает ошибку.Я понимаю, что эта ошибка указывает на то, что в моем коде, скорее всего, есть type-o около первой строки кода forMod, но я не могу понять, что происходит неправильно.Любая помощь с благодарностью!