library(stringr)
ascii <- "
_ _ _ _
|-| [- |_ |_ () \/\/ () /? |_ |)
"
pesan <- "Hello world!"
cat(str_c(ascii , "\n", pesan, "\n"))
library(stringr)
ascii <- "
_ _ _ _
|-| [- |_ |_ () \/\/ () /? |_ |)
"
pesan <- "Hello world!"
cat(str_c(ascii , "\n", pesan, "\n"))