Función generar_cadena_aleatoria <- function(n) {
# El número máximo de n dígitos
max_num <- 10^n – 1
# Genera un número aleatorio dentro del rango
num_aleatorio <- sample(0:max_num, 1)
# Formatea con ceros a la izquierda:paste0(“%0”, n, “d”):
# paste0 concatena las partes de la cadena sin ningún espacio entre ellas.
# “%0” es el inicio de una especificación de formato, indicando que vamos a rellenar con ceros a la izquierda.
# n es el número de dígitos que queremos en la cadena.
# “d” indica que estamos trabajando con un número entero.
# Juntándolo todo, paste0(“%0”, n, “d”) crea una cadena de formato como “%03d” para n = 3, lo que significa que cualquier número se formateará con tres dígitos, añadiendo ceros a la izquierda si es necesario.
# sprintf(“%03d”, num_aleatorio):
# sprintf es una función de formateo que toma una cadena de formato y uno o más valores, y devuelve una cadena formateada.
# En este caso, “%03d” formatea el num_aleatorio para que tenga al menos tres dígitos, rellenando con ceros a la izquierda si el número tiene menos de tres dígitos.
cadena_aleatoria <- sprintf(paste0(“%0”, n, “d”), num_aleatorio)
return(cadena_aleatoria)
}
generar_cadena_aleatoria(3)