magick (Picture needed)

magick (Picture needed)

magick (Picture needed)

library("magick")
tiger <- image_read_svg('http://jeroen.github.io/images/tiger.svg', width = 400)
print(tiger)
##rewrite
image_write(tiger, path = "tiger.png", format = "png")
##inf
image_info(tiger_png)
##Edit
image_crop(image, "100x150+50"): crop out width:100px and height:150px starting +50px from the left
image_scale(image, "200"): resize proportionally to width: 200px
image_scale(image, "x200"): resize proportionally to height: 200px
image_fill(image, "blue", "+100+200"): flood fill with blue starting at the point at x:100, y:200
image_border(frink, "red", "20x10"): adds a border of 20px left+right and 10px top+bottom
img <- image_resize(logo, "300x300")
img_blurred <- image_convolve(img, kern)
image_append(c(img, img_blurred))
Author

Karobben

Posted on

2020-06-19

Updated on

2023-06-06

Licensed under

Comments