Cette boucle peut-elle s’exécuter en parallèle (1) ?

Le code ci-dessous implémente un petit jeu de dés. Les règles sont les suivantes :

• Initialisation : total <- 0.
• Lancez un dé et additionnez le résultat à total.
• Si total est pair, réinitialisez total à zéro.
• Si total est supérieur à 10, la partie se termine.

Cela se code facilement en R

total <- no_of_rolls <- 0 # Initialize
while(total < 10) {
  total <- total + sample(1:6, 1)

  if(total %% 2 == 0) total <- 0  # If even. Reset to 0

  no_of_rolls <- no_of_rolls + 1
}
no_of_rolls

Pensez-vous que cet algorithme peut s’exécuter (facilement) en parallèle ?