5 lines
102 B
R
5 lines
102 B
R
|
|
library(digest)
|
||
|
|
|
||
|
|
input <- "Rosetta code"
|
||
|
|
cat(digest(input, algo = "sha256", serialize = FALSE), "\n")
|