Import library magick

library(magick)
## Warning: package 'magick' was built under R version 4.2.3
## Linking to ImageMagick 6.9.12.3
## Enabled features: cairo, freetype, fftw, ghostscript, heic, lcms, pango, raw, rsvg, webp
## Disabled features: fontconfig, x11

membaca gambar dan memasukkannya ke variabel frink

frink <- image_read("https://i.postimg.cc/MG7v93kB/png-image.png")
print(frink)
##   format width height colorspace matte filesize density
## 1    PNG   750    585       sRGB  TRUE   745909   72x72

mengisi warna yang kosong dengan kode warna “hotpink”, dan memberikan border dengan ukuran 20x10 yang memiliki warna dengan kode #000080

image_border(image_background(frink, "hotpink"), "#000080", "20x10")

memotong gambar menjadi panjgang 400 dan tinggi 350

image_crop(frink, "400x350+10")

memutar gambar 90 derajat

image_rotate(frink, 90)

membalikkan gambar

image_flop(frink)

mengedit warna gambar

image_modulate(frink, brightness = 100, saturation = 50, hue = 90)

image_annotate(frink, "Capybara Slay", size = 70, gravity = "southwest", color = "hotpink")

kostumisasi teks

image_annotate(frink, "Capybara Slay", size = 30, color = "red", boxcolor = "pink",
  degrees = 60, location = "+50+100")

image_annotate(frink, "Capybara", font = 'Times', size = 30)