如何在R中只对多元函数中的一个变量进行积分？

我有下一个功能：

f <- function(x,y,z,w) {dpois(x, lambda = w*cos(y-z) ) }

---

f也许你可以试试下面的代码

f <- Vectorize(function(x,y,z,w) dpois(x, w*cos(y-z)),"x") 
g <- function(y,z,w) integrate(f, lower = 0, upper =Inf, y, z, w)

f1。）为什么不在函数内部创建一个存储
lambda
值的变量，因为它总是先求值并得到一个常数，然后使用已知的值对两个变量（此变量和
x
）进行积分？2.）您是否知道并尝试过
矢量化（）
？
f <- Vectorize(function(x,y,z,w) dpois(x, w*cos(y-z)),"x") 
g <- function(y,z,w) integrate(f, lower = 0, upper =Inf, y, z, w)