Merge remote-tracking branch 'origin/dev'

index.qmd

@@ -153,8 +153,31 @@ Hello, World! I am process 3 of 4 on ar039133.math.univ-rennes1.fr
 Hello, World! I am process 0 of 4 on ar039133.math.univ-rennes1.fr
 ```
 
+# Exemple R
 
 
+```R
+library(Rmpi)
+
+id <- mpi.comm.rank(comm=0)
+np <- mpi.comm.size(comm=0)
+hostname <- mpi.get.processor.name()
+
+msg <- sprintf ("Hello world from task %03d of %03d, on host %s \n", id , np , hostname)
+cat(msg)
+
+invisible(mpi.barrier(comm=0))
+invisible(mpi.finalize())
+```
+
+```bash
+$ mpiexec -np 4 Rscript hello_mpi.R
+Hello world from task 003 of 004, on host srv-mingus
+Hello world from task 000 of 004, on host srv-mingus
+Hello world from task 001 of 004, on host srv-mingus
+Hello world from task 002 of 004, on host srv-mingus
+```
+
 
 # MPI – Exercice 1 : Environnement MPI
 
@@ -169,7 +192,7 @@ Moi, processus 3, je suis de rang impair
 Moi, processus 1, je suis de rang impair
 ```
 
-# Communications point à point
+# Communications point à point `mpi.send` et `mpi.recv`
 
 Une communication dite point à point a lieu entre deux processus, l’un appelé
 processus émetteur et l’autre processus récepteur (ou destinataire).
@@ -190,9 +213,6 @@ int rang_dest, int etiquette, MPI_Comm comm)
 Cette opération est bloquante : l’exécution reste bloquée jusqu’à ce que le contenu de
 message puisse être réécrit sans risque d’écraser la valeur qui devait être envoyée.
 
-# Communications point à point
-
-## Opération de réceptionMPI_Recv
 
 ```
 int MPI_Recv( void *message, int longueur, MPI_Datatype type_message,