Launcher job name

Author: shikokuchuo

R/launchers.R

@@ -108,7 +108,7 @@ launch_remote <- function(n = 1L, remote = remote_config(), ..., tls = NULL, .co
       lapply(
         cmds,
         function(cmd) submit_job(
-          sprintf("mirai_daemon_%d", random(4L)),
+          sprintf("mirai_daemon_%s", random(3L)),
           cluster = cluster,
           command = cmd,
           container = container