【R講座】プログラミングの制御文とカスタム関数

if は、指定した条件が TRUE の場合に処理を実行します。

if (条件式) {
# 条件がTRUEのときに実行される処理
}

# x　に値を代入
x <- 10

# 制御文（条件分岐）
if (x > 5) {
  print("xは5より大きい")
}

[1] "xは5より大きい"

if と else を使うと、条件に応じて処理を分岐できます。if の条件が FALSE の場合に else の処理が実行されます。

if (条件式) {
# 条件がTRUEのときに実行される処理
} else {
# 条件がFALSEのときに実行される処理
}

# x　に値を代入
x <- 3

# 制御文（条件分岐）
if (x > 5) {
  print("xは5より大きい")
} else {
  print("xは5以下")
}

[1] "xは5以下"

複数の条件を評価したい場合は else if を使います。

if (条件1) {
# 条件1がTRUEのときの処理
} else if (条件2) {
# 条件2がTRUEのときの処理
} else {
# どの条件にも当てはまらないときの処理
}

# x に値を代入
x <- 0

# 制御文（条件分岐）
if (x > 0) {
  print("xは正の数")
} else if (x < 0) {
  print("xは負の数")
} else {
  print("xはゼロ")
}

[1] "xはゼロ"

switch は複数の条件の中から該当するものを選択する際に便利です。

switch(変数,
値1 = 処理1,
値2 = 処理2,
値3 = 処理3,
...
)

# オブジェクト「fruit」にappleを格納
fruit <- "apple"

# 制御文（条件分岐）
switch (fruit,
        "apple" = "リンゴ",
        "banana" = "バナナ",
        "orange" = "オレンジ",
        "不明")

# fruitの中身がリストの中身と一致したら、文字（カタカナ）を返す

[1] "リンゴ"

for は、一定回数の繰り返し処理を実行する際に使用します。

for (変数 in 値の範囲) {
# 繰り返し実行する処理
}

# 制御文（iが1〜5の間繰り返す）
for (i in 1:5) {
  print(i)
}

[1] 1
[1] 2
[1] 3
[1] 4
[1] 5

while は、一定回数の繰り返し処理を実行する際に使用します。

while (条件式) {
# 条件がTRUEの間実行する処理
}

# x に1を代入
x <- 1

# 制御文（xが5以下になるまで繰り返す）
while (x <= 5) {
  print(x)
  x <- x + 1
}

[1] 1
[1] 2
[1] 3
[1] 4
[1] 5

repeat は、一定回数の繰り返し処理を実行する際に使用します。明示的に break することでループを終了します。

repeat {
# 無限ループする処理
if (条件) {
break # ループ終了
}
}

# x に1を代入
x <- 1

# 制御文（xを表示と加算を繰り返す; xが5より大きくなったら終了）
repeat {
  print(x)
  x <- x + 1
  if (x > 5) {
    break
  }
}

[1] 1
[1] 2
[1] 3
[1] 4
[1] 5

break を使うと、ループの途中で強制的に終了できます。多くの場合、if構文などの条件分岐を使って break の条件を決定します。

if (条件式) {
break # 条件式を満たしたらループ終了
}

# 制御文
for (i in 1:10) {
  if (i == 6) {
    break  # 6になったらループ終了
  }
  print(i)
}

[1] 1
[1] 2
[1] 3
[1] 4
[1] 5

next を使うと、その回の処理をスキップして次のループへ進みます。多くの場合、if構文などの条件分岐を使って next の条件を決定します。

if (条件式) {
break # 条件式を満たしたらループ終了
}

# 制御文
for (i in 1:5) {
  if (i == 3) {
    next  # 3のときはスキップ
  }
  print(i)
}

[1] 1
[1] 2
[1] 4
[1] 5