0Posted Updated R / Imagea minute read (About 116 words)
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))