如何在 R 中集成以下功能?

How to integrate following function in R?

我无法集成此功能。
我收到一个错误:缺少参数 "y",没有默认值。本题答案为1.

首先你的表达式其实是y的函数.

如果要写二重积分,可以用integrate来写(但是需要提前一点简化积分)

f <- function(y) 6*integrate(function(x) x,0,1)$value*integrate(function(z) z**2,0,y)$value/y**2

从数学上可以推导出,函数f可以进一步简化为

f <- function(y) y