Зачем мне нужен d = 0 в моем скрипте r для поиска простого числа?

Question

Я начинающий на r языке. Я пытался найти простое число с r языком, и я нашел решение на этом сайте. Но я все еще не могу понять некоторые из процесса. Может ли какой-нибудь эксперт в R помочь мне с этим? Это сценарий, который я видел.

d=0
primeno<- c(2:100)

for (i in 2:length(primeno)) {

    for (j in 1:i) {
       if (i %% j == 0) {
           d=d+1
       }
    }

    if (d==2) {
        print(i)
        print ("Prime")
    }

    d <- 0

}

Я просто не могу понять, почему мне нужны «d = 0», «d = d + 1» и последний «d = 0» в этом сценарии. Любая помощь будет оценена. Заранее спасибо.

Answer 1

Раунд 1 (внешний л oop)

d=0
i=2
(round 1 - inner loop)
  j=1
  (2 %% 1 == 0) == True
  d=1
(round 2 - inner loop)
  j=2
  (2 %% 2 == 0) == True
  d=2
(d == 2) == True
  print('Is Prime')
reset d=0

Раунд 2 (внешний л oop)

d=0 (reset after Round 1)
i=3
(round 1 - inner loop)
  j=1
  (3 %% 1 == 0) == True
  d=1
(round 2 - inner loop)
  j=2
  (3 %% 2 == 0) == False
  d=1
(round 3 - inner loop)
  j=3
  (3 %% 3 == 0) == True
  d=2
(d == 2) == True
  print('Is Prime')
reset d=0

Раунд 3 (внешний л oop)

d=0 (reset after Round 2)
i=4
(round 1 - inner loop)
  j=1
  (4 %% 1 == 0) == True
  d=1
(round 2 - inner loop)
  j=2
  (4 %% 2 == 0) == True
  d=2
(round 3 - inner loop)
  j=3
  (4 %% 3 == 0) == False
  d=2
(round 4 - inner loop)
  j=4
  (4 %% 4 == 0) == True
  d=3
(d == 2) == False
  no print
reset d=0