循环生成的ggiraph交互式图形无法在Quarto HTML输出中显示

问题核心是：Quarto渲染HTML时，循环里直接print(girafe())生成的交互式图形无法被正确捕获——这类图形本质是HTML组件，单纯的print操作在非交互式渲染环境下没法让Quarto识别并输出。

修复方案 #

用htmltools::tagList()收集所有交互式图形对象，最后统一输出，Quarto就能正确渲染所有图形：

library(htmltools)
# 创建空列表存储交互式图形
plot_list <- list()

for(i in tmp_names){
  tmp_plot <- diamonds %>%
    select(all_of(i)) %>% 
    ggplot(aes(x = .data[[i]],
               tooltip = "I'm interactive!"))+
    geom_density_interactive()
  
  # 将每个girafe对象存入列表
  plot_list[[i]] <- girafe(ggobj = tmp_plot)
}

# 用tagList打包输出所有图形
tagList(plot_list)

原理说明 #

ggiraph生成的girafe对象属于htmlwidget类，在Quarto渲染时，需要显式将这类组件组合成可识别的HTML输出块。tagList()能把多个htmlwidget对象打包成一个完整的HTML片段，让Quarto正确解析并渲染所有交互式图形，不管是10个还是100个都能正常显示。

内容的提问来源于stack exchange，提问作者Steen Harsted