Implementar la función hash SHA-256 en R

Problema

Deseamos calcular el valor encriptado hash SHA-256 para un vector. Al igual que hicimos en una entrada anterior con un rango de celdas en Excel.

Solución

Empleamos el paquete digest

library(digest)
v <- c("Felix", "Captain", "Normal", "Lloyd")
sapply(v, digest, algo = "sha256", serialize = FALSE)

Resultado

                                                             Felix 
"f6b6aad7a7690810466cb5288aea79c4eccd72d05bae7ab16be65bf9b3b6538e" 
                                                           Captain 
"2e786c488b83f8be6227bd1b9f3fcab07f0a54e31c228694c842752303351448" 
                                                            Normal 
"a7248eeb45eb1ce247f81693283e22e8b39e8a50890cecd22d02e75025547d90" 
                                                             Lloyd 
"99ce5e0b2a2d6b65936b323b6cb0dbcbb6f5518a9d3348612eaa965e43f185ce" 

Notas

Como se puede ver en el resultado, obtenemos un resultado idéntico al obtenido en la entrada de Excel. Para ello tenemos que especificar el argumento serialize = FALSE. Hemos empleado el algoritmo sha256, pero digest también nos permite usar los algoritmos: 'md5', 'sha-1', 'sha-256', 'crc32', 'xxhash' y 'murmurhash'.

Referencias

• Implementar la función hash SHA-256 en Excel
• digest: Create Compact Hash Digests of R Objects