Моя виньетка для созданного мной пакета не работает из-за следующей ошибки:
Error in .f(.x[[i]], ...) : object 'data.begEndGrp' not found
Я полагаю, что это как-то связано с тем, что моя функция gardaltplot
маскируется глобальной средой. Код ниже:
Функция
gardaltplot <- function(tbl, x, y, aname, bname) {
# Performing unpaired (two independent groups) analysis.
unpaired_mean_diff <- dabestr::dabest(tbl, x, y,
idx = c("aname", "bname"),
paired = FALSE)
# Create a Gardner-Altman estimation plot.
p<-dabestr::plot(unpaired_mean_diff)
return(gaplot)
}
Виньетка
```{r gardaltplot}
library(estplot)
data("BCdataMeasure")
gardaltplot(BCdataMeasure, begEndGrp, sumPedBCByYr, "beginning", "ending")
```
Мой ожидаемый результат - график. Если я запускаю программу, а не как функцию внутри пакета, результатом будет нужный мне график.