renderRglwidget с rgl.snapshot создает черное изображение png

Question

Я пытаюсь сохранить снимок виджета, который отображается блестящим, используя возможность renderRglwidget.Идея состоит в том, чтобы сохранить ориентацию пользователя в виде снимка.Тем не менее, функция rgl.snapshot просто создает маленький черный ящик.

Это что-то, что даже способно с блестящим и rgl?

output$webgl3Dalign <- renderRglwidget ({
    try(rgl.close())
    points3d(tt1, size=3, col="dimgray", box=FALSE)
    points3d(tt2, size=3, col="dodgerblue", box=FALSE)
    axes3d(c('x++', 'y++', 'z++'))
    rgl.snapshot("file.png")
    rglwidget()
})