# NOT RUN {
# Import a jpeg or png
demo_file <- system.file("extdata", "demo_img.jpg",
package = "brickr", mustWork = TRUE)
demo_image <- jpeg::readJPEG(demo_file)
#Create a mosaic oject
# }
# NOT RUN {
mosaic <- demo_image %>%
image_to_mosaic(img_size = 24)
# }
# NOT RUN {
#Rather than drawing the mosaic, use build_pieces_table() to produce piece table
# }
# NOT RUN {
mosaic %>%
build_pieces_table()
# }
Run the code above in your browser using DataLab