如何将R中的积分结果分配给数值变量？

R例如：

k=6
f<-function(s){s^(k-1)*exp(-s)}
integrate(f,0,Inf)

k=6
f集成的结果是一个
列表
：

> temp <- integrate(f,0,Inf)
> temp
120 with absolute error < 7.3e-05
> str(temp)
List of 5
 $ value       : num 120
 $ abs.error   : num 7.34e-05
 $ subdivisions: int 5
 $ message     : chr "OK"
 $ call        : language integrate(f = f, lower = 0, upper = Inf)
 - attr(*, "class")= chr "integrate"

。。。或按索引：

> temp[[2]]
[1] 7.335833e-05

integrate
的结果是一个
列表
。只需选择您感兴趣的列表项。您将看到integrate类对象的print方法的输出。
> temp$value
[1] 120

> temp[[2]]
[1] 7.335833e-05