如何在R中繪制產品功能？

Question

我正在嘗試一個問題，但首先我必須在r繪圖

(x+1)(x+2)...(x+n),

n是一個固定的整數。

知道如何創建這個例程嗎？

Answer 1

如果x大於-1，則可以通過利用該關系來最有效地計算

(x + 1)*(x + 2)* ... *(x + n) = Gamma(x+n+1) / Gamma(x+1).

Gammas是根據它們的對數在內部計算的，所以以lgamma的形式使用這些日志：

f <- function(x, n) exp(lgamma(x+n+1) - lgamma(x+1))

然后可以通過 curve獲得繪圖，例如，如

curve(f(x,3), 0, pi)

Answer 2

你想要這樣的東西嗎？

f <- function(x, n) {
  return(prod(1/(x+(1:n))))
}