Using functions with different ports in future/furrrr

I'm trying to rewrite some code from the snow package so that I can use map functions from furrr. In my code I open a remote connection with different ports. I tried creating similar functions using future_map but did not succeed to create anything for every cluster. Is there something similar to clusterEvalQ in future?

My snow code:

library(snow)

clus <- makeCluster(2)
pids <- unlist(clusterEvalQ(clus, Sys.getpid()))

remote_creator <- function(){


remote_function <<- function(){print(port)}

}

port_printer <- function(x){

remote_function()

}

clusterExport(clus, c('pids', 'remote_creator'))
clusterEvalQ(clus, {port <- (4567L:4568L)[Sys.getpid() == pids] })
clusterEvalQ(clus, remote_creator())
parLapply(clus, 1:2, port_printer)
stopCluster(clus)

Start with the snow example, especially clusterEvalQ, clusterExport, and future_map. Determine whether future provides an equivalent per-worker evaluation mechanism for assigning ports and defining remote_function; done should be a documented, reproducible way to run port_printer across workers, or a clearly scoped feature request if it does not.

Written by the indexing model from the issue text.