aritmatika

Paket Magick : Pemrosesan Gambar Tingkat Lanjut di R Paket magick ini menyediakan toolkit modern dan sederhana untuk pemrosesan gambar di R.ini membungkus ImageMagick STL yang merupakan perpustakaan pemrosesan gambar sumber terbuka dan terlengkap. ImageMagick memiliki banyak fungsi antara lain memperlihatkan subset yang layak.

library(magick)

## Warning: package 'magick' was built under R version 4.2.2

## Linking to ImageMagick 6.9.12.3
## Enabled features: cairo, freetype, fftw, ghostscript, heic, lcms, pango, raw, rsvg, webp
## Disabled features: fontconfig, x11

str(magick::magick_config())

## List of 24
##  $ version           :Class 'numeric_version'  hidden list of 1
##   ..$ : int [1:4] 6 9 12 3
##  $ modules           : logi FALSE
##  $ cairo             : logi TRUE
##  $ fontconfig        : logi FALSE
##  $ freetype          : logi TRUE
##  $ fftw              : logi TRUE
##  $ ghostscript       : logi TRUE
##  $ heic              : logi TRUE
##  $ jpeg              : logi TRUE
##  $ lcms              : logi TRUE
##  $ libopenjp2        : logi TRUE
##  $ lzma              : logi TRUE
##  $ pangocairo        : logi TRUE
##  $ pango             : logi TRUE
##  $ png               : logi TRUE
##  $ raw               : logi TRUE
##  $ rsvg              : logi TRUE
##  $ tiff              : logi TRUE
##  $ webp              : logi TRUE
##  $ wmf               : logi FALSE
##  $ x11               : logi FALSE
##  $ xml               : logi TRUE
##  $ zero-configuration: logi TRUE
##  $ threads           : int 1

Gambar IO/Image IO Apa yang membuat tenung begitu ajaib adalah secara otomatis mengonversi dan merender semua format gambar umum. ImageMagick mendukung lusinan format dan secara otomatis mendeteksi jenisnya. Gunakan magick::magick_config()untuk mencantumkan format yang didukung oleh versi ImageMagick Anda.

library(magick)
tiger <- image_read_svg('http://jeroen.github.io/images/tiger.svg', width = 350)

print(tiger)

##   format width height colorspace matte filesize density
## 1    PNG   350    350       sRGB  TRUE        0   72x72

tiger_png <- image_convert(tiger, "png")
image_info(tiger_png)

##   format width height colorspace matte filesize density
## 1    PNG   350    350       sRGB  TRUE        0   72x72

frink <- image_read("https://jeroen.github.io/images/frink.png")
print(frink)

##   format width height colorspace matte filesize density
## 1    PNG   220    445       sRGB  TRUE    73494   72x72

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

image_trim(frink)

image_crop(frink, "100x150+50")

image_scale(frink, "300")

image_scale(frink, "x300") 

image_rotate(frink, 45)

image_flop(frink)

image_modulate(frink, brightness = 80, saturation = 120, hue = 90)

image_fill(frink, "orange", point = "+100+200", fuzz = 20)

Filters and effects

image_blur(frink, 10, 5)

image_noise(frink)

image_charcoal(frink)

image_oilpaint(frink)

image_negate(frink)