0
我希望能夠將圖像下載爲圖像(PNG或JPEG)。讓我們假設我的數據幀是DF將圖像下載爲圖像r
output$statsTable <- renderTable({
#Printing the table
df
})
output$downloadStatsTable <- downloadHunter(
filename = function() {
paste(getwd(), '/test.png', sep = '')
},
content = function(con) {
p <- grid.table(df)
device <- function(..., width, height) grDevices::png(..., width = 12, height = 9, res = 300, units = "in")
ggsave(file, plot = p, device = device)
}
)
你的問題是什麼?你的代碼不工作?你會得到什麼錯誤? –
問題是我有一個按鈕,點擊時會下載表格的圖像,我不知道該怎麼做。上面的代碼不會工作,因爲沒有下載的情節。 – wittywillis