如何移除magick包image_read_pdf输出的非图像信息？

方法1：用image_display()替代print() #

magick包自带的image_display()是专门的图像展示函数，只会渲染图像，不会输出元数据。把你的print(qc1)替换成：

image_display(qc1)

方法2：用Shiny原生渲染函数规范输出 #

在Shiny的UI-Server结构中，推荐用原生渲染函数处理图像，彻底避免元数据输出：

Server端示例 #

output$pdf_img <- renderImage({
  qc1 <- image_read_pdf("你的PDF文件路径.pdf")
  # 把图像写入临时文件
  temp_png <- image_write(qc1, tempfile(fileext = ".png"))
  list(src = temp_png, contentType = "image/png")
}, deleteFile = TRUE)

UI端示例 #

imageOutput("pdf_img")

方法3：抑制对象自动打印 #

如果必须用print类操作，用invisible()包裹代码，阻止元数据输出：

invisible(print(qc1))

如果PDF是单页，也可以直接调用单页图像对象，跳过元数据输出：

qc1[[1]]

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