powered by
imguRupload(filename, title = NULL, caption = NULL, name = basename(filename), apikey = "4feb29d00face5bc1b9dae536e15c373")
imguR
dev.off
tmpfile <- tempfile() pdf(tmpfile) plot(x=1:10, y=-1:-10, col=1:10, pch=19, main="oh hai dere") dev.off() temp <- imguRupload(tmpfile) cat(temp["links.imgur_page"])
Run the code above in your browser using DataLab