Если то, что вы действительно хотите, чтобы увидеть значение FN1 при у = 2, вы должны использовать один аргумент:
fn1 <- function(x) {
sin(x + 2)
}
А потом сюжет его через индекс в х, который вы создали
plot(fn1(seq(0, 2 * pi, 0.2)), 1:length(fn1(seq(0, 2 * pi, 0.2))))
Что вы имеете в своем вопросе - это функция графика, где первый аргумент имеет созданную вами функцию, но нет ввода. И второй аргумент заключается в том, что y = 2 для графика. И если вы хотите построить вектор длины, отличный от единицы, он будет по умолчанию индексом, где первый аргумент будет нанесен на график относительно порядка вашего первого аргумента. Надеюсь, это имело смысл. :)