Displaying 1 result from an estimated 1 matches for "workdriv".
Did you mean:
workdrive
2007 Sep 03
1
Snow on Windows Cluster
...mpi.comm.spawn gets the
shell command for unix to start the slaves. A simple solution is to use
the windows-code from mpi.spawn.rslaves, then it looks like this. And is
working on our windows-cluster. (small failures on stopping cluster)
# Fro windows
if (.Platform$OS=="windows"){
workdrive <- unlist(strsplit(getwd(),":"))[1]
tmpdrive <- unlist(strsplit(tempdir(),":"))[1]
worktmp <- as.logical(toupper(workdrive)==toupper(tmpdrive))
tmpdir <- unlist(strsplit(tempdir(),"/Rtmp"))[1]
localhost <- Sys.getenv("COMPUTERNAME&q...