blocks|key|2502240|text|充其量，这是一个部分的答案。我仍然没有建立集群，但这里描述的步骤很好地记录了我是如何做到这一点的。|type|unstyled|depth|inlineStyleRanges|entityRanges|data|2502241|配置：|2502242|在‘远程计算机’上的'remote-computer'|2502243|Install+R上的'remote-computer'|unordered-list-item|2502244|
|2502245|Install+SSH服务器上安装|2502246|+PuTTY+(使用与'localhost')|ordered-list-item|2502247|Add+R上相同的R版本到'localhost'|2502248|Add+R上'localhost'|2502249|Install+R上的|2502250|Install+PuTTY路径到|2502251|路径|2502252|2502253|测试连接:阶段I|2502254|2502255|从命令行运行|2502256|2502257|C:\PuTTYPath\plink.exe+-pw+[password]+[username]@[remote_ip_address]+Rscript+-e+rnorm(100)|offset|length|style|CODE|2502258|(确认返回100个正态随机变量|2502259|2502260|2502261|2502262|C:\PuTTYPath\plink.exe+-pw+[password]+[username]@[remoate_ip_address]+RScript+-e+parallel:::.slaveRSOCK()+MASTER=[local_ip_address]+PORT=100501+OUT=/dev/null+TIMEOUT=2592000+METHODS=TRUE+XDR=TRUE|2502263|(确认SSH服务器上的会话已启动，登录在‘远程计算机’上)|2502264|测试连接:阶段II|2502265|从R会话中运行|2502266|2502267|2502268|system(paste0("C:/PuTTYPath/plink.exe+-pw+[password]+",+++++++++++++++"[username]@[remote_ip_address]+",++++++++++++++++"RScript+-e+rnorm(100)"))|2502269|(确认返回100个正常的随机variates)|2502270|From和R会话，运行|2502271|2502272|system(paste0("C:/PuTTY/plink.exe+",++++++++++++++"-pw+[password]+",++++++++++++++"[username]@[remote_ip_address]+",+++++++++++++++"RScript+-e+parallel:::.slaveRSOCK()+",++++++++++++++"MASTER=[local_ip_address]+",++++++++++++++"PORT=100501+",++++++++++++++"OUT=/dev/null+",+++++++++++++++"TIMEOUT=2592000+",++++++++++++++"METHODS=TRUE+",+++++++++++++++"XDR=TRUE"))|2502273|(确认在‘远程计算机’上的SSH服务器日志上启动并维护了一个会话|2502274|建立集群|2502275|2502276|2502277|2502278|library(snow)+cl+<-+makeCluster(spec+=+c("localhost",+"[remote_ip_address]"),+++++++++++++++rshcmd+=+"C:/PuTTY/plink.exe+-pw+[password]",+++++++++++++++host+=+"[local_ip_address]")|2502279|(会话应在“远程计算机”上的SSH服务器日志上启动和维护。理想情况下，函数将在赋值'cl‘时完成)|2502280|建立集群是我失败的地方。我运行makeCluster并查看我的SSH服务器日志。它显示连接已建立，然后立即关闭。makeCluster永远不会结束运行，cl没有被分配，我被困在如何继续运行。在这一点上，我甚至不确定这是R问题还是配置问题。|2502281|编辑和解决方案：|2502282|无缘无故，我尝试使用snow包运行此程序，如上面的“建立集群”部分所示。当我使用snow包时，集群已经构建好了，并且运行稳定。不知道为什么我不能让它与parallel包一起工作，但至少我有一些功能上的东西。|2502283|entityMap^0|0|0|0|0|0|0|0|0|0|0|0|0|0|0|0|0|0|0|2I|0|0|0|0|0|0|5F|0|0|0|0|0|0|0|41|0|0|0|0|0|A4|0|0|0|0|0|0|0|D|E|4M|0|0|F|B|1K|B|24|2|0|0|A|4|14|4|23|8|0^^$0|@$1|2|3|4|5|6|7|2J|8|@]|9|@]|A|$]]|$1|B|3|C|5|6|7|2K|8|@]|9|@]|A|$]]|$1|D|3|E|5|6|7|2L|8|@]|9|@]|A|$]]|$1|F|3|G|5|H|7|2M|8|@]|9|@]|A|$]]|$1|I|3|J|5|6|7|2N|8|@]|9|@]|A|$]]|$1|K|3|L|5|H|7|2O|8|@]|9|@]|A|$]]|$1|M|3|N|5|O|7|2P|8|@]|9|@]|A|$]]|$1|P|3|Q|5|O|7|2Q|8|@]|9|@]|A|$]]|$1|R|3|S|5|O|7|2R|8|@]|9|@]|A|$]]|$1|T|3|U|5|O|7|2S|8|@]|9|@]|A|$]]|$1|V|3|W|5|O|7|2T|8|@]|9|@]|A|$]]|$1|X|3|Y|5|6|7|2U|8|@]|9|@]|A|$]]|$1|Z|3|-4|5|6|7|2V|8|@]|9|@]|A|$]]|$1|10|3|11|5|6|7|2W|8|@]|9|@]|A|$]]|$1|12|3|-4|5|6|7|2X|8|@]|9|@]|A|$]]|$1|13|3|14|5|O|7|2Y|8|@]|9|@]|A|$]]|$1|15|3|-4|5|6|7|2Z|8|@]|9|@]|A|$]]|$1|16|3|17|5|6|7|30|8|@$18|31|19|32|1A|1B]]|9|@]|A|$]]|$1|1C|3|1D|5|6|7|33|8|@]|9|@]|A|$]]|$1|1E|3|-4|5|6|7|34|8|@]|9|@]|A|$]]|$1|1F|3|14|5|O|7|35|8|@]|9|@]|A|$]]|$1|1G|3|-4|5|6|7|36|8|@]|9|@]|A|$]]|$1|1H|3|1I|5|6|7|37|8|@$18|38|19|39|1A|1B]]|9|@]|A|$]]|$1|1J|3|1K|5|6|7|3A|8|@]|9|@]|A|$]]|$1|1L|3|1M|5|6|7|3B|8|@]|9|@]|A|$]]|$1|1N|3|1O|5|6|7|3C|8|@]|9|@]|A|$]]|$1|1P|3|-4|5|O|7|3D|8|@]|9|@]|A|$]]|$1|1Q|3|-4|5|6|7|3E|8|@]|9|@]|A|$]]|$1|1R|3|1S|5|6|7|3F|8|@$18|3G|19|3H|1A|1B]]|9|@]|A|$]]|$1|1T|3|1U|5|6|7|3I|8|@]|9|@]|A|$]]|$1|1V|3|1W|5|H|7|3J|8|@]|9|@]|A|$]]|$1|1X|3|-4|5|6|7|3K|8|@]|9|@]|A|$]]|$1|1Y|3|1Z|5|6|7|3L|8|@$18|3M|19|3N|1A|1B]]|9|@]|A|$]]|$1|20|3|21|5|6|7|3O|8|@]|9|@]|A|$]]|$1|22|3|23|5|6|7|3P|8|@]|9|@]|A|$]]|$1|24|3|1O|5|6|7|3Q|8|@]|9|@]|A|$]]|$1|25|3|-4|5|O|7|3R|8|@]|9|@]|A|$]]|$1|26|3|-4|5|6|7|3S|8|@]|9|@]|A|$]]|$1|27|3|28|5|6|7|3T|8|@$18|3U|19|3V|1A|1B]|$18|3W|19|3X|1A|1B]]|9|@]|A|$]]|$1|29|3|2A|5|6|7|3Y|8|@]|9|@]|A|$]]|$1|2B|3|2C|5|6|7|3Z|8|@$18|40|19|41|1A|1B]|$18|42|19|43|1A|1B]|$18|44|19|45|1A|1B]]|9|@]|A|$]]|$1|2D|3|2E|5|6|7|46|8|@]|9|@]|A|$]]|$1|2F|3|2G|5|6|7|47|8|@$18|48|19|49|1A|1B]|$18|4A|19|4B|1A|1B]|$18|4C|19|4D|1A|1B]]|9|@]|A|$]]|$1|2H|3|-4|5|6|7|4E|8|@]|9|@]|A|$]]]|2I|$]]

At best, this is a partial answer. I'm still not establishing a cluster, but the steps described here are a pretty good record of how I've gotten to this point.

<h2>CONFIGURATIONS:</h2>

<ol>
<li>Install PuTTY on 'remote-computer'</li>
<li>Install SSH server on 'remote-computer'</li>
<li>Install R on 'remote-computer' (Use the same version of R as on 'localhost')</li>
<li>Add R to the PATH </li>
<li>Install PuTTY on 'localhost'</li>
<li>Install R on 'localhost'</li>
<li>Add R to the PATH</li>
</ol>

<h2>TESTING THE CONNECTION: PHASE I</h2>

<ol>
<li>From the command line, run</li>
</ol>

<code>C:\PuTTYPath\plink.exe -pw [password] [username]@[remote_ip_address] Rscript -e rnorm(100)</code>

(Confirm return of 100 normal random variates

<ol start="2">
<li>From the command line, run</li>
</ol>

<code>C:\PuTTYPath\plink.exe -pw [password] [username]@[remoate_ip_address] RScript -e parallel:::.slaveRSOCK() MASTER=[local_ip_address] PORT=100501 OUT=/dev/null TIMEOUT=2592000 METHODS=TRUE XDR=TRUE</code>

(Confirm that a session is started on the SSH server logs on 'remote-computer')

<h2>TESTING THE CONNECTION: PHASE II</h2>

<ol>
<li>From an R Session, run

<code>system(paste0("C:/PuTTYPath/plink.exe -pw [password] ",
 "[username]@[remote_ip_address] ", 
 "RScript -e rnorm(100)"))</code>

(Confirm return of 100 normal random variates)</li>
<li>From an R session, run

<code>system(paste0("C:/PuTTY/plink.exe ",
 "-pw [password] ",
 "[username]@[remote_ip_address] ", 
 "RScript -e parallel:::.slaveRSOCK() ",
 "MASTER=[local_ip_address] ",
 "PORT=100501 ",
 "OUT=/dev/null ", 
 "TIMEOUT=2592000 ",
 "METHODS=TRUE ", 
 "XDR=TRUE"))</code></li>
</ol>

(Confirm that a session is started and maintained on the SSH server logs on 'remote-computer'

<h2>ESTABLISH A CLUSTER</h2>

<ol>
<li>From an R Session, run

<code>library(snow)</code>
<code>cl &lt;- makeCluster(spec = c("localhost", "[remote_ip_address]"),
 rshcmd = "C:/PuTTY/plink.exe -pw [password]",
 host = "[local_ip_address]")</code></li>
</ol>

(A session should be started and maintained on the SSH server logs on 'remote-computer'.
 Ideally, the function will complete at 'cl' be assigned)

Establishing the cluster is the point at which I'm failing. I run <code>makeCluster</code> and watch my SSH server logs. It shows a connection is made and then immediately closed. <code>makeCluster</code> never finishes running, <code>cl</code> is not assigned, and I'm stuck on how to go on. I'm not even sure if this is an R problem or a configuration problem at this point.

<h2>EDIT AND RESOLUTION:</h2>

For no good reason, I tried running this with the <code>snow</code> package, as shown in the "Establish a Cluster" section above. When I used the <code>snow</code> package, the cluster is built and runs stably. Not sure why I couldn't get this to work with the <code>parallel</code> package, but at least I've got something functional.

blocks|key|35511|text|对于那些正在寻找在Windows中的几台计算机上建立群集的人，@Benjamin的答案几乎是正确的，您需要遵循他的说明，直到最后一步，即建立一个群集，并确保前面的步骤都在您的计算机上工作。我的解决方案是基于“Parallel”包而不是“snow”包，它们本质上是相同的。|type|unstyled|depth|inlineStyleRanges|entityRanges|data|35512|解决方案|35513|代码模板：|35514|machineAddresses+<-list(list(host='[Server+address]',user='[user+name]',rscript="[The+Rscript+file+in+the+server]",rshcmd="plink+-pw+[Your+password]"))
cl+<-+makePSOCKcluster(machineAddresses,manual+=+F)|code-block|syntax|javascript|35515|你必须在你的代码中填充所有的[]。在我的电脑中，它是：|35516|machineAddresses+<-list(list(host='192.168.1.220',user='jeff',rscript="C:/Program+Files/R/R-3.3.2/bin/Rscript",rshcmd="plink+-pw+qwer"))
cl+<-+makePSOCKcluster(machineAddresses,manual+=+F)|35517|原因|35518|在Windows下运行集群是非常棘手的，函数makePSOCKcluster通常不能像预期的那样工作。使其正常工作的最简单方法是将manual=F更改为manual=T并手动创建工作器。这里有一个相关的帖子，它讨论了为什么函数makePSOCKcluster将永远挂起，我认为这两个帖子基本上卡在同一个地方。我还发布了我对这个问题的答案，以讨论如何使其工作。|35519|R+Parallel+-+connecting+to+remote+cores|offset|length|35520|entityMap|0|LINK|mutability|MUTABLE|url|https://stackoverflow.com/questions/25508400/r-parallel-connecting-to-remote-cores^0|0|0|0|0|0|0|0|0|0|13|0|0^^$0|@$1|2|3|4|5|6|7|14|8|@]|9|@]|A|$]]|$1|B|3|C|5|6|7|15|8|@]|9|@]|A|$]]|$1|D|3|E|5|6|7|16|8|@]|9|@]|A|$]]|$1|F|3|G|5|H|7|17|8|@]|9|@]|A|$I|J]]|$1|K|3|L|5|6|7|18|8|@]|9|@]|A|$]]|$1|M|3|N|5|H|7|19|8|@]|9|@]|A|$I|J]]|$1|O|3|P|5|6|7|1A|8|@]|9|@]|A|$]]|$1|Q|3|R|5|6|7|1B|8|@]|9|@]|A|$]]|$1|S|3|T|5|6|7|1C|8|@]|9|@$U|1D|V|1E|1|1F]]|A|$]]|$1|W|3|-4|5|6|7|1G|8|@]|9|@]|A|$]]]|X|$Y|$5|Z|10|11|A|$12|13]]]]

For those who are looking for establishing clusters across several computers in Windows, @Benjamin's answer is almost correct, you need to follow his instructions until the last step, which is ESTABLISH A CLUSTER, and make sure the previous steps are all working in your computer. My solution is based on the package 'Parallel' instead of 'snow', which are essentially same.

<h2>Solution</h2>

Code template:

<pre><code>machineAddresses &lt;-list(list(host='[Server address]',user='[user name]',rscript="[The Rscript file in the server]",rshcmd="plink -pw [Your password]"))
cl &lt;- makePSOCKcluster(machineAddresses,manual = F)
</code></pre>

You have to fill all the [] in your code. In my computer, it is:

<pre><code>machineAddresses &lt;-list(list(host='192.168.1.220',user='jeff',rscript="C:/Program Files/R/R-3.3.2/bin/Rscript",rshcmd="plink -pw qwer"))
cl &lt;- makePSOCKcluster(machineAddresses,manual = F)
</code></pre>

<h2>Reason</h2>

Running cluster in Windows is very tricky, the function makePSOCKcluster usually does not work as expected. The easiest way to make it work is to change manual=F to manual=T and manually create workers. Here is a related post, which talks about why the function makePSOCKcluster will hang forever, and I think these two post basically stuck in the same place. I also post my answer to that question to discuss how to make it work.

<a href="https://stackoverflow.com/questions/25508400/r-parallel-connecting-to-remote-cores">R Parallel - connecting to remote cores</a>

blocks|key|36593|text|因为我没有资格对Jeff的回答发表评论，所以我会把这个作为一个回答来发表：|type|unstyled|depth|inlineStyleRanges|entityRanges|data|36594|我发现使用makePSOCKcluster自动启动集群节点在Windows中不起作用，原因是内部parallel函数newPSOCKnode中的arg和outfile参数被包装在shQuotes函数中。这会导致cmd.exe和Rscript.exe的组合返回错误，从而导致makePSOCKcluster永远挂起。|offset|length|style|CODE|36595|以下两个函数定义支持使用makePSOCKcluter自动启动群集节点，前提是为基于密钥的无密码登录正确配置了ssh或putty/plink：|36596|makePSOCKcluster+<-+function+(names,+...)+
{
++if+(is.numeric(names))+{
++++names+<-+as.integer(names[1L])
++++if+(is.na(names)+%7C%7C+names+<+1L)+
++++++stop("numeric+'names'+must+be+>=+1")
++++names+<-+rep("localhost",+names)
++}
++parallel:::.check_ncores(length(names))
++options+<-+parallel:::addClusterOptions(parallel:::defaultClusterOptions,+list(...))
++cl+<-+vector("list",+length(names))
++for+(i+in+seq_along(cl))+cl[[i]]+<-+newPSOCKnode(names[[i]],+
+++++++++++++++++++++++++++++++++++++++++++++++++++options+=+options,+rank+=+i)
++class(cl)+<-+c("SOCKcluster",+"cluster")
++cl
}

newPSOCKnode+<-+function+(machine+=+"localhost",+...,+options+=+parallel:::defaultClusterOptions,+
++++++++++++++++++++++++++rank)+
{
++options+<-+parallel:::addClusterOptions(options,+list(...))
++if+(is.list(machine))+{
++++options+<-+parallel:::addClusterOptions(options,+machine)
++++machine+<-+machine$host
++}
++outfile+<-+parallel:::getClusterOption("outfile",+options)
++master+<-+if+(machine+==+"localhost")+
++++"localhost"
++else+parallel:::getClusterOption("master",+options)
++port+<-+parallel:::getClusterOption("port",+options)
++setup_timeout+<-+parallel:::getClusterOption("setup_timeout",+options)
++manual+<-+parallel:::getClusterOption("manual",+options)
++timeout+<-+parallel:::getClusterOption("timeout",+options)
++methods+<-+parallel:::getClusterOption("methods",+options)
++useXDR+<-+parallel:::getClusterOption("useXDR",+options)
++env+<-+paste0("MASTER=",+master,+"+PORT=",+port,+"+OUT=",+
++++++++++++++++#shQuote(outfile),+"+SETUPTIMEOUT=",+setup_timeout,+"+TIMEOUT=",+
++++++++++++++++(outfile),+"+SETUPTIMEOUT=",+setup_timeout,+"+TIMEOUT=",+
++++++++++++++++timeout,+"+XDR=",+useXDR)
++arg+<-+"parallel:::.slaveRSOCK()"
++rscript+<-+if+(parallel:::getClusterOption("homogeneous",+options))+{
++++shQuote(parallel:::getClusterOption("rscript",+options))
++}
++else+"Rscript"
++rscript_args+<-+parallel:::getClusterOption("rscript_args",+options)
++if+(methods)+
++++rscript_args+<-+c("--default-packages=datasets,utils,grDevices,graphics,stats,methods",+
++++++++++++++++++++++rscript_args)
++cmd+<-+if+(length(rscript_args))+
++++paste(rscript,+paste(rscript_args,+collapse+=+"+"),+"-e",+
++++++++++#shQuote(arg),+env)
++++++++++arg,+env)
++#else+paste(rscript,+"-e",+shQuote(arg),+env)
++else+paste(rscript,+"-e",+arg,+env)
++renice+<-+parallel:::getClusterOption("renice",+options)
++if+(!is.na(renice)+&&+renice)+
++++cmd+<-+sprintf("nice+%2B%25d+%25s",+as.integer(renice),+cmd)
++if+(manual)+{
++++cat("Manually+start+worker+on",+machine,+"with\n++++",+
++++++++cmd,+"\n")
++++utils::flush.console()
++}
++else+{
++++if+(machine+!=+"localhost")+{
++++++rshcmd+<-+parallel:::getClusterOption("rshcmd",+options)
++++++user+<-+parallel:::getClusterOption("user",+options)
++++++cmd+<-+shQuote(cmd)
++++++cmd+<-+paste(rshcmd,+"-l",+user,+machine,+cmd)
++++}
++++if+(.Platform$OS.type+==+"windows")+{
++++++system(cmd,+wait+=+FALSE,+input+=+"")
++++}
++++else+system(cmd,+wait+=+FALSE)
++}
++con+<-+socketConnection("localhost",+port+=+port,+server+=+TRUE,+
++++++++++++++++++++++++++blocking+=+TRUE,+open+=+"a%2Bb",+timeout+=+timeout)
++structure(list(con+=+con,+host+=+machine,+rank+=+rank),+class+=+if+(useXDR)+
++++"SOCKnode"
++++else+"SOCK0node")
}|code-block|syntax|javascript|36597|我计划在有机会的时候用更完整的设置说明来更新这个响应。|36598|entityMap^0|0|1C|8|1M|C|20|3|24|7|2H|8|3S|G|0|C|F|1J|3|1N|5|1T|5|0|0|0^^$0|@$1|2|3|4|5|6|7|S|8|@]|9|@]|A|$]]|$1|B|3|C|5|6|7|T|8|@$D|U|E|V|F|G]|$D|W|E|X|F|G]|$D|Y|E|Z|F|G]|$D|10|E|11|F|G]|$D|12|E|13|F|G]|$D|14|E|15|F|G]]|9|@]|A|$]]|$1|H|3|I|5|6|7|16|8|@$D|17|E|18|F|G]|$D|19|E|1A|F|G]|$D|1B|E|1C|F|G]|$D|1D|E|1E|F|G]]|9|@]|A|$]]|$1|J|3|K|5|L|7|1F|8|@]|9|@]|A|$M|N]]|$1|O|3|P|5|6|7|1G|8|@]|9|@]|A|$]]|$1|Q|3|-4|5|6|7|1H|8|@]|9|@]|A|$]]]|R|$]]

As I do not have the reputation to post a comment on Jeff's answer, I will post this as an answer:

The reason I have found that automatic start of cluster nodes using makePSOCKcluster does not work in Windows is that the <code>arg</code> and the <code>outfile</code> arguments in the internal <code>parallel</code> function <code>newPSOCKnode</code> are wrapped in the <code>shQuotes</code> function. This causes the combination of cmd.exe and Rscript.exe to return an error, which leads to <code>makePSOCKcluster</code> hanging forever. 

The following two function definitions enable the automatic starting of the cluster nodes using <code>makePSOCKcluter</code>, assuming a proper configuration of <code>ssh</code> or <code>putty</code>/<code>plink</code> for key-based password-less login:

<pre><code>makePSOCKcluster &lt;- function (names, ...) 
{
 if (is.numeric(names)) {
 names &lt;- as.integer(names[1L])
 if (is.na(names) || names &lt; 1L) 
 stop("numeric 'names' must be &gt;= 1")
 names &lt;- rep("localhost", names)
 }
 parallel:::.check_ncores(length(names))
 options &lt;- parallel:::addClusterOptions(parallel:::defaultClusterOptions, list(...))
 cl &lt;- vector("list", length(names))
 for (i in seq_along(cl)) cl[[i]] &lt;- newPSOCKnode(names[[i]], 
 options = options, rank = i)
 class(cl) &lt;- c("SOCKcluster", "cluster")
 cl
}

newPSOCKnode &lt;- function (machine = "localhost", ..., options = parallel:::defaultClusterOptions, 
 rank) 
{
 options &lt;- parallel:::addClusterOptions(options, list(...))
 if (is.list(machine)) {
 options &lt;- parallel:::addClusterOptions(options, machine)
 machine &lt;- machine$host
 }
 outfile &lt;- parallel:::getClusterOption("outfile", options)
 master &lt;- if (machine == "localhost") 
 "localhost"
 else parallel:::getClusterOption("master", options)
 port &lt;- parallel:::getClusterOption("port", options)
 setup_timeout &lt;- parallel:::getClusterOption("setup_timeout", options)
 manual &lt;- parallel:::getClusterOption("manual", options)
 timeout &lt;- parallel:::getClusterOption("timeout", options)
 methods &lt;- parallel:::getClusterOption("methods", options)
 useXDR &lt;- parallel:::getClusterOption("useXDR", options)
 env &lt;- paste0("MASTER=", master, " PORT=", port, " OUT=", 
 #shQuote(outfile), " SETUPTIMEOUT=", setup_timeout, " TIMEOUT=", 
 (outfile), " SETUPTIMEOUT=", setup_timeout, " TIMEOUT=", 
 timeout, " XDR=", useXDR)
 arg &lt;- "parallel:::.slaveRSOCK()"
 rscript &lt;- if (parallel:::getClusterOption("homogeneous", options)) {
 shQuote(parallel:::getClusterOption("rscript", options))
 }
 else "Rscript"
 rscript_args &lt;- parallel:::getClusterOption("rscript_args", options)
 if (methods) 
 rscript_args &lt;- c("--default-packages=datasets,utils,grDevices,graphics,stats,methods", 
 rscript_args)
 cmd &lt;- if (length(rscript_args)) 
 paste(rscript, paste(rscript_args, collapse = " "), "-e", 
 #shQuote(arg), env)
 arg, env)
 #else paste(rscript, "-e", shQuote(arg), env)
 else paste(rscript, "-e", arg, env)
 renice &lt;- parallel:::getClusterOption("renice", options)
 if (!is.na(renice) &amp;&amp; renice) 
 cmd &lt;- sprintf("nice +%d %s", as.integer(renice), cmd)
 if (manual) {
 cat("Manually start worker on", machine, "with\n ", 
 cmd, "\n")
 utils::flush.console()
 }
 else {
 if (machine != "localhost") {
 rshcmd &lt;- parallel:::getClusterOption("rshcmd", options)
 user &lt;- parallel:::getClusterOption("user", options)
 cmd &lt;- shQuote(cmd)
 cmd &lt;- paste(rshcmd, "-l", user, machine, cmd)
 }
 if (.Platform$OS.type == "windows") {
 system(cmd, wait = FALSE, input = "")
 }
 else system(cmd, wait = FALSE)
 }
 con &lt;- socketConnection("localhost", port = port, server = TRUE, 
 blocking = TRUE, open = "a+b", timeout = timeout)
 structure(list(con = con, host = machine, rank = rank), class = if (useXDR) 
 "SOCKnode"
 else "SOCK0node")
}
</code></pre>

I plan to update this response with more complete setup instructions when I have the chance.

I've been trying to build a cluster using multiple computers for three days now and have failed spectacularly. So now I'm going to try to suck a bunch of you into solving my problem for me. If all goes well, I would hope we can generate a step-by-step guide to use as a reference to do this in the future, because as of yet, I haven't managed to find a decent reference for setting this up (perhaps it's too specific a task?)

In my case, let's assume Windows 7, with PuTTY as the SSH client, and 'localhost' is going to serve as the master. 

Furthermore, let's assume only two computers on the same network for now. I imagine the process will generalize easily enough that if I can get it to work on two computers, I can get it to work on three. So we'll work on <code>localhost</code> and <code>remote-computer</code>.

Here's what I've gathered so far (with references linked at the bottom)

<ol>
<li>Install PuTTY on <code>localhost</code>.</li>
<li>Install PuTTY on <code>remote-computer</code></li>
<li>Install an SSH server on <code>remote-computer</code></li>
<li>Assign it a port to listen on? (I'm not sure about this step)</li>
<li>Install R on <code>localhost</code></li>
<li>Install the same version of R on <code>remote-computer</code></li>
<li>Add R to the PATH environment variable on both <code>localhost</code> and <code>remote-computer</code></li>
<li>Run the R code below from <code>localhost</code></li>
</ol>

code:

<pre><code>library(parallel)
cl &lt;- makePSOCKcluster(c(rep("localhost", 2),
 rep("remote-computer", 2)))
</code></pre>

So far, I've done steps 1-3, not sure if I need to do 4, done 5-7, and the code for step 8 just hangs indefinitely.

When I check my SSH server logs, it doesn't appear that I'm hitting the SSH server from <code>localhost</code>. So it appears that my first problem is configuring the SSH correctly. Has anyone succeeded in doing this and would you be willing to share your expertise?

EDIT
Oops: references
<a href="http://www.milanor.net/blog/wp-content/uploads/2013/10/03.FirstStepinParallelComputing.pdf" rel="nofollow noreferrer">http://www.milanor.net/blog/wp-content/uploads/2013/10/03.FirstStepinParallelComputing.pdf</a>

<a href="https://stackoverflow.com/questions/25508400/r-parallel-connecting-to-remote-cores">R Parallel - connecting to remote cores</a>

<a href="https://stat.ethz.ch/pipermail/r-sig-hpc/2010-October/000780.html" rel="nofollow noreferrer">https://stat.ethz.ch/pipermail/r-sig-hpc/2010-October/000780.html</a>

multi-computer makePSOCKcluster on Windows: Building a step-by-step guide

服务器

Windows

三天来，我一直在尝试使用多台计算机构建一个集群，但失败得非常厉害。所以现在我要试着说服你们帮我解决我的问题如果一切顺利，我希望我们可以生成一个分步指南，作为将来做这件事的参考，因为到目前为止，我还没有找到一个合适的参考来设置这个(也许这是一个太具体的任务？)在我的例子中，假设Windows7，PuTTY作为SSH客户端...

问Windows上的多计算机makePSOCKcluster :构建分步指南
EN

社区

活动

资源

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问Windows上的多计算机makePSOCKcluster :构建分步指南EN

社区

活动

资源

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问Windows上的多计算机makePSOCKcluster :构建分步指南
EN