#' Global variables
#' @references Some reference for the ed25519 algorithm: http://ed25519.cr.yp.to/
#' @note These functions were adapted from this gist by Johan Stén: https://gist.github.com/johansten/3859fb4f9a24a5b6fee5bef86a3ad91c
global <- list(
q = as.bigz(2) ** 255 - 19,
l = as.bigz(2) ** 252 + as.bigz("27742317777372353535851937790883648493"),
d = as.bigz(
"-4513249062541557337682894930092624173785641285191125241628941591882900924598840740"
),
bx = as.bigz(
"15112221349535400772501151409588531511454012693041857206046113283949847762202"
),
by = as.bigz(
"46316835694926478169428394003475163141307993866256225615783033603165251855960"
)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.