Ошибка неиспользованного аргумента в модуле R: swirl functions

Question

Я новичок в R и работаю через модуль Swirl над функциями. Он спрашивает меня следующее:

Попытайтесь использовать valu () вместе с анонимной функцией, чтобы вернуть последний элемент вектора c (8, 4, 0). Ваша анонимная функция должна принимать только один аргумент, который должен быть переменной x.

Ответ, который я дал:

evaluate(function(x){x[length(x)]}, c(8, 4, 0))

, который выдал следующее сообщение об ошибке:

Error in evaluate(function(x) { : unused argument (c(8, 4, 0))

Не могли бы вы объяснить, почему он не использует аргумент c (8,4,0)?

Answer 1

Звучит так, будто ваша среда имеет функцию evaluate(), которая отличается от той, которую вы должны иметь. Когда я выполняю ваш код в этом классе Swirl, я работаю и правильно.

Как выглядит ваш вывод, когда вы запускаете evaluate без скобок?

Для меня это выглядит как это:

evaluate
> function(func, dat){
>   func(dat)
> }
> <bytecode: 0x7fc7512eb348>