R/gender.R

In CNID: Get Basic Information from Chinese ID Number

#' @title Get gender information from ID number
#'
#' @description
#' Get gender information from ID number.
#'
#' @param id A vector of ID numbers.
#'
#' @return Gender vector obtained from ID numbers.
#'
#' @examples
#' id = c(
#'   "653127198503161793",
#'   "652801197305161555",
#'   "130206202202291545", 
#'   "110101841125178",
#'   "12345678",
#'   "65312a198204181793"
#' )
#' gender(id)
#'
#' @export

#------------------------------------------------------------------------------#

gender = function(id) {
  cnid_info(id)$gender
}

#------------------------------------------------------------------------------#