Вычислить функцию для n <-1: 1000

Question

Я использую функцию CRRBinomialTreeOption для вычисления цены опциона пут (pe).На самом деле, цена должна быть рассчитана для каждого «n», т. Е. Выходные данные должны быть 1000 цен.

library('fOptions')
n<-1:1000
CRRBinomialTreeOption(TypeFlag ="pe", 100, 90,
                    3, 0.05, 0, 0.077, n, title = NULL, description = NULL)

Когда я запускаю вышеупомянутую функцию, я получаю эту ошибку Error in seq.default(from = n - 1, to = 0, by = -1) : 'from' must be of length 1.