Как написать объект класса magi c -image в виде png файла, используя код?

Question

Как записать svg в magick::image_read_svg() как файл png, используя код (не указывать и не кликать)?

Пример:

library(magick)
obj <- image_read_svg("https://raw.githubusercontent.com/gilbarbara/logos/master/logos/r-lang.svg")
class(obj)
[1] magick-image

То, что я пытался

Я думал, что это будет просто, вдоль строки

obj
png("myfile.png")

Но файл не записан

Answer 1

Несмотря на то, что результирующий объект является magick-image классом, он содержит обычный массив растровых изображений и поэтому может рассматриваться как таковой

obj <- image_read_svg("https://raw.githubusercontent.com/gilbarbara/logos/master/logos/r-lang.svg")
obj[[1]]
4 channel 256x193 bitmap array: 'bitmap' raw [1:4, 1:256, 1:193] 00 00 00 00 ...

Когда вы знаете, как получить доступ к массиву растровых изображений, все так же просто

library(png)
png::writePNG(obj[[1]], "myfile.png")

dir()
[1] myfile.png