Translations:R/32/fr: Difference between revisions

Translations:R/32/fr (view source)

487 bytes removed , 6 years ago

no edit summary

rsnt_translations

56,430

edits

@@ Line 1: / Line 1: @@
-<source lang="r">
+. Placez le code R dans un fichier script, ici le fichier ''test.R''.
-#Tell all slaves to return a message identifying themselves.
-library("Rmpi")
-sprintf("TEST mpi.universe.size() =  %i", mpi.universe.size())
-ns <- mpi.universe.size() - 1
-sprintf("TEST attempt to spawn %i slaves", ns)
-mpi.spawn.Rslaves(nslaves=ns)
-mpi.remote.exec(paste("I am",mpi.comm.rank(),"of",mpi.comm.size()))
-mpi.remote.exec(paste(mpi.comm.get.parent()))
-#Send execution commands to the slaves
-x<-5
-#These would all be pretty correlated one would think
-x<-mpi.remote.exec(rnorm,x)
-length(x)
-x
-mpi.close.Rslaves()
-mpi.quit()
-</source>