Векторизация полинома

Question

Как бы вы векторизовали коэффициенты этого полинома?

До сих пор я пытался использовать seq (2-1,20) и rep (2-1,20), что неправильно.

Есть предложения?

Answer 1

Пытаетесь ли вы оценить полином на x, давая его p полином c коэффициент pc? Попробуйте PolyVal определенную здесь функцию: https://stackoverflow.com/a/52658734/4891738.

Для вашего случая используйте

pc <- rep.int(c(-1, 2), 20)
x <- seq.int(-1, 1, length.out = 101)
y <- PolyVal(x, pc, nderiv = 0L)
plot(x, y, type = "l")