Условные выражения и циклы

Чтобы реализовать сложные алгоритмы и процедуры в R, вам необходимо иметь возможность контролировать, какие инструкции выполнять и сколько раз их повторять.

Условные операторы

В R фундаментальная условная структура основана на if и else. Синтаксис очень похож на такие языки, как JavaScript или C:

score <- 85

if (score >= 60) {
  print("Passed!")
} else {
  print("Failed.")
}

Фигурные скобки {} определяют блоки кода, которые будут выполняться в зависимости от результата логического выражения внутри круглых скобок.

Цикл for

Цикл for в R используется для перебора элементов последовательности (например, вектора или списка).

# Print numbers from 1 to 3
for (i in 1:3) {
  print(i)
}

В R синтаксис 1:3 — это сокращенный способ создания вектора c(1, 2, 3).

Мы также можем перебирать элементы существующего вектора напрямую:

fruits <- c("apple", "banana", "cherry")

for (fruit in fruits) {
  print(fruit)
}

Функция ifelse

В R функция ifelse() представляет собой векторизованную версию оператора if-else. Он позволяет применить условие ко всему вектору за одну операцию, возвращая вектор результатов.

scores <- c(55, 80, 45, 90)
# Se score >= 60 assegna "Pass", altrimenti "Fail"
results <- ifelse(scores >= 60, "Pass", "Fail")
print(results) # "Fail" "Pass" "Fail" "Pass"

Цикл while

Цикл while используется для повторения блока кода до тех пор, пока определенное условие остается истинным (TRUE). Очень важно гарантировать, что условие в конечном итоге станет ложным, чтобы предотвратить бесконечные циклы.

counter <- 1
while (counter <= 3) {
  print(counter)
  counter <- counter + 1
}

Попробуйте сами