如何在R中绘制产品函数?

如何在R中绘制产品函数?,r,plot,gamma-function,R,Plot,Gamma Function,我正在尝试一个问题,但首先我必须在r (x+1)(x+2)...(x+n), n为固定整数 你知道如何创建这个例程吗?你想要这样的东西吗 f <- function(x, n) { return(prod(1/(x+(1:n)))) } f如果x大于-1,则可以利用该关系最有效地计算该值 (x + 1)*(x + 2)* ... *(x + n) = Gamma(x+n+1) / Gamma(x+1). Gamma是根据对数在内部计算的,因此以lgama的形式使用这些日志: f

我正在尝试一个问题,但首先我必须在
r

(x+1)(x+2)...(x+n),
n
为固定整数


你知道如何创建这个例程吗?

你想要这样的东西吗

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

f如果
x
大于-1,则可以利用该关系最有效地计算该值

(x + 1)*(x + 2)* ... *(x + n) = Gamma(x+n+1) / Gamma(x+1).
Gamma是根据对数在内部计算的,因此以
lgama
的形式使用这些日志:

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

这只是分数的$n$倍……是的,但对我来说,在RWell你的问题不是很清楚。我不知道你到底想要什么。为什么公式中没有索引$i$?对不起,有一个错误,例如,1/(x+i)不能直接使用
曲线绘制,因为它没有矢量化。
curve(f(x,3), 0, pi)