最近计算边际期望损失动态MES，已经用DCC-GARCH已经得到了波动率和动态相关系数，最后的两个尾部期望用核密度估计时怎样用R实现，求大神赐教。