是否有用于计算 R 中 Stein 的无偏风险估计 (SURE) 的函数?

问题描述

我想写一个函数来返回 Stein 的无偏风险估计,它由 \

给出

SURE(m^) = ps^2 + ||g(x)||^2 + 2s^2 div(g(x)),

其中 g(x) 是一个函数,使得

m^ = X+g(X) 和 X ~ N_p(m,s^2I)

但我不知道如何编码 g(x) 的散度或它的平方范数。是否有可以让您计算 SURE 的包/函数

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)