获取字符的ASCII值的函数

Question

在r中可以使用什么函数来获得字符的ASCII值，类似于Excel函数Code？我无法从搜索中找到一个，因此尝试创建该函数：

unicode <- function(x) {
  require(stringi)
  match(x,stri_unescape_unicode(paste0("\\u",as.hexmode(1:9999))))
}

这似乎可行，但是我想知道是否有任何现有功能可以做到这一点。