epi_clean_curp: Extraer datos del CURP en México

View source: R/epi_clean_curp.R

epi_clean_curpR Documentation

Extraer datos del CURP en México

Description

Esta función descompone un CURP en sus componentes principales según las posiciones definidas en su estructura.

Usage

epi_clean_curp(curp)

Arguments

curp

Un vector de texto que contiene uno o más CURPs. Cada CURP debe tener exactamente 18 caracteres.

Value

Un tibble con los componentes del CURP organizados en columnas:

  • CURP: El CURP original.

  • PrimeraLetraApellidoPaterno: Primera letra del apellido paterno.

  • PrimeraVocalApellidoPaterno: Primera vocal del apellido paterno.

  • PrimeraLetraApellidoMaterno: Primera letra del apellido materno.

  • PrimeraLetraNombre: Primera letra del nombre.

  • AñoNacimiento: Año completo de nacimiento (e.g., "1990", "2002").

  • MesNacimiento: Mes de nacimiento (2 dígitos).

  • DiaNacimiento: Día de nacimiento (2 dígitos).

  • Sexo: Género registrado (H para hombre, M para mujer).

  • EntidadFederativa: Entidad federativa de nacimiento (código de 2 letras).

  • PrimerasConsonantes: Consonantes internas (3 caracteres).

  • Homoclave: Carácter alfanumérico asignado para evitar duplicados.

  • DigitoVerificador: Dígito para validación final.

Examples

# Ejemplo de uso con un solo CURP
epi_clean_curp("GOMC900514HDFRLA07")

# Ejemplo con varios CURPs
curps <- c(
"GOMC900514HDFRLA07",  # Antes del 2000
"LOAM020715MMCRSR09"   # Después del 2000
)

# Aplicar la función a un vector de CURPs
resultados <- map_dfr(curps, epi_clean_curp)

# Mostrar resultados
print(t(resultados))


AntonioJBT/episcout documentation built on Feb. 20, 2025, 12:46 a.m.