corn <- farming_crops_16x16()$corn$portrait
corn_top <- bm_extract(corn, rows = 9:16)
all.equal(corn_top, corn[9:16, ])
if (cli::is_utf8_output() && cli::num_ansi_colors() >= 256L) {
print(corn_top, bg = "cyan", compress = "v")
}
Run the code above in your browser using DataLab