r - 在函数 sn 库 psn 函数中使用多个参数进行变异

Question

我正在尝试使用名为“psn”的 sn 库函数获取一个数组，其中第一列是 x 值，第二列是 sweked t-normal 的概率。

我的 x 值 (finfl_new2) 和要与函数 psn 一起使用的参数 (par) 存储在 df1 中。我的数据集中的每一行对于每个元素（x 值）都有一组不同的参数。 我的数据看起来像这样。

我有以下内容：

myp <- function(par,value){
  par0 <- unlist(par)
  data.frame(x=value,prob=sn::psn(x=value,
                       xi=par0[1],
                       omega=par0[2], 
                       alpha=par0[3],
                       nu=par0[4]))
}

df1_bfgs <- filter(df1, par!="error") %>% mutate(prob=map(list(par,value=finfl_new2),myp))

我出现以下错误：

错误：mutate()列有问题prob。我prob = map(list(par, value = finfl_new2), myp)。x 参数“值”丢失，没有默认运行rlang::last_error()以查看错误发生的位置。

感谢您的帮助！