> s <- "Ｒ很棒！"
> font <- unifont(ucp = str2ucp(s))
> bm <- as_bm_bitmap(s, font = font)
> print(bm)
░░░░░░░░░░░░░░░░░░░░█░░░░░░░░░░░░░░█░░░░░░█░░░░░░░░░░░░░░░░░░░░░
░░░░░░░░░░░░░░░░░░░░█░███████░░░░░░█░░░░░░█░░░░░░░░░░░░░░░░░░░░░
░░░░░░░░░░░░░░░░░░░█░░█░░░░░█░░░░░░█░░█████████░░░░░░░█░░░░░░░░░
░░░███████░░░░░░░░█░░░█░░░░░█░░░░░░█░░░░░░█░░░░░░░░░░███░░░░░░░░
░░░░█░░░░░█░░░░░░█░░█░███████░░░██████░███████░░░░░░░███░░░░░░░░
░░░░█░░░░░░█░░░░░░░░█░█░░░░░█░░░░░░█░░░░░█░░░░░░░░░░░███░░░░░░░░
░░░░█░░░░░░█░░░░░░░█░░█░░░░░█░░░░░██░░█████████░░░░░░███░░░░░░░░
░░░░█░░░░░█░░░░░░░██░░███████░░░░░███░░░█░░░█░░░░░░░░░█░░░░░░░░░
░░░░██████░░░░░░░█░█░░█░░█░░░█░░░█░█░█░█░░█░░█░░░░░░░░█░░░░░░░░░
░░░░█░░░█░░░░░░░█░░█░░█░░█░░█░░░░█░█░░█░░░█░░░█░░░░░░░█░░░░░░░░░
░░░░█░░░░█░░░░░░░░░█░░█░░░██░░░░█░░█░░░░█████░░░░░░░░░░░░░░░░░░░
░░░░█░░░░░█░░░░░░░░█░░█░░░█░░░░░░░░█░░░░░░█░░░░░░░░░░░░░░░░░░░░░
░░░░█░░░░░░█░░░░░░░█░░█░░░░█░░░░░░░█░░█████████░░░░░░░█░░░░░░░░░
░░░███░░░░███░░░░░░█░░█░█░░░█░░░░░░█░░░░░░█░░░░░░░░░░░█░░░░░░░░░
░░░░░░░░░░░░░░░░░░░█░░██░░░░░██░░░░█░░░░░░█░░░░░░░░░░░░░░░░░░░░░
░░░░░░░░░░░░░░░░░░░█░░█░░░░░░░░░░░░█░░░░░░█░░░░░░░░░░░░░░░░░░░░░