R绘制像素风图片
最近喜欢上了一款像素风的游戏,然后想着用R写一个简单的将图片转为像素风格的代码😂。
先读入图片的像素矩阵,通过采样减少像素的数量,得到的新表格用ggplot直接画出来,效果还不错,用geom_tile是直接的像素,用geom_point画出来像拼豆一样,函数放在plot4fun包里面了:
• 安装:
devtools::install_github("Asa12138/plot4fun")
• 运行:
library(plot4fun)
pixel_plot("https://stardewvalleywiki.com/mediawiki/images/b/b2/Animals_Icon.png")
pixel_plot("https://static.vecteezy.com/system/resources/previews/008/386/721/original/cartoon-funny-cat-isolated-on-white-background-vector.jpg",size = 64,geom = "tile")