如何解决错误：“闭包”类型的对象不是可子集的 slickR
在尝试使用 slickr 为多个输入输出幻灯片时出现错误：'closure'类型的对象不是子集错误，我该如何解决？
observeEvent(input$imagepreview,{
output$x <- renderImage({
if (is.null(input$picture))
return(NULL)
if (input$picture == "Round Eye") {
return(list(
src = "images/roundeye.jpg",filetype = "image/jpeg",alt = "Face"
))
}else if (input$picture == "Wayfarer" && input$arm == "Red" && input$body == "Yellow") {
return(
output$slickr <- renderslickr({
imgs <- list.files("C:/",pattern=".jpg",full.names = TRUE)
slickr(imgs)
})
)
}
else if (input$picture == "Square" && input$arm == "Blue" && input$body == "Green") {
return(list(
src = "images/wayfarercustom.jpg",alt = "This is a chainring"
))
}
},deleteFile = FALSE) })
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。
