$ docker run --rm --name validator-libsodium-usage-r-cran-sodium-random-length-2732 -t --mount type=bind,src=/tmp/validator-status-libsodium-usage-r-cran-sodium-random-length,dst=/validator/status validator-libsodium-shared bash -lc 'set -euo pipefail
/validator/tests/_shared/install_override_debs.sh
exec /validator/tests/_shared/run_library_tests.sh "$@"' validator-testcase libsodium usage-r-cran-sodium-random-length -- bash -c 'PS4=$1; shift; set -x; source "$@"' validator-xtrace '__VALIDATOR_XTRACE__ ' /validator/tests/libsodium/tests/cases/usage/usage-r-cran-sodium-random-length.sh
no override packages found; continuing with apt originals
suppressMessages(library(sodium))
for (n in c(16L, 24L, 32L, 64L)) {
  buf <- random(n)
  stopifnot(is.raw(buf))
  stopifnot(length(buf) == n)
}
a <- random(32L)
b <- random(32L)
stopifnot(is.raw(a), length(a) == 32L)
stopifnot(is.raw(b), length(b) == 32L)
stopifnot(!identical(a, b))
cat("ok", length(a), length(b), "\n")
'
ok 32 32