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

Question

R例子:

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

集成的输出是字符串:

120 with absolute error < 7.3e-05

我想将字符串中的第一个值(120,积分)赋给变量.怎么做？

Answer 1

结果integrate是list:

> 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$value
[1] 120

......或通过索引:

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