Filterisasi dan Efek pada Gambar (Bag. 2)

library(magick)
## Linking to ImageMagick 6.9.12.3
## Enabled features: cairo, freetype, fftw, ghostscript, heic, lcms, pango, raw, rsvg, webp
## Disabled features: fontconfig, x11
img <- image_read("D:/Code/R/Kelas A Semester 2 Linear Algebra/assets/Al-Farabi.jpeg")
img_fixed <- image_scale(img, "500x350")

Berikut beberapa contoh efek dan filterisasi pada gambar :

img_blurred <- image_blur(img_fixed, radius = 10, sigma = 2)
img_blurred

Memberikan Efek buram pada gambar

img_noised <- image_noise(img_fixed)
img_noised

Memberikan Efek titik-titik pada gambar

img_negated <- image_negate(img_fixed)
img_negated

Memberikan Efek pewarnaan negatif pada gambar