r 在R控制台随机为你挑选一个很酷的脸，但现在不能放到rinfin（ಥ﹏ಥ）

Posted 2021-05-24

cool_face <- function(...) {
  faces <- c(" ༼ つ ಥ_ಥ ༽つ " ,
             " (ಥ﹏ಥ)  ",
             " (¬‿¬)  ", 
             "  ﴾͡๏̯͡๏﴿ O'RLY?     ",
             "  ಥ_ಥ  " ,
             "  :') ",
             "   (~_^)  " , 
             "  >_>  " ,
             "  (°,,°) ",
             "♥-♥",
             "(ᵔᴥᵔ)",
             "(ง'̀-'́)ง",
             "ʕ•ᴥ•ʔ  ",
             "(ツ)",
             "(ヅ)"
             )
  x <- sample(1:length(faces), 1)
  cat(faces[x])
}