Як створити вкладений цикл for у r (включаючи приклади)


Вкладений цикл for дозволяє вам перебирати елементи в кількох векторах (або кількох вимірах матриці) і виконувати певні операції.

Основна структура циклу for у R така:

 for (i in 1:4) {
  print (i)
}

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

А базова структура вкладеного циклу for така :

 for (i in 1:4) {
  for (j in 1:2) {
    print (i*j)
  }
}

[1] 1
[1] 2
[1] 2
[1] 4
[1] 3
[1] 6
[1] 4
[1] 8

Цей підручник показує кілька прикладів створення вкладених циклів for у R.

Приклад 1: вкладений цикл For у R

Наступний код показує, як використовувати вкладений цикл for для заповнення значень матриці 4×4:

 #create matrix
empty_mat <- matrix(nrow= 4 , ncol= 4 )

#view empty matrix
empty_mat
     [,1] [,2] [,3] [,4]
[1,] NA NA NA NA
[2,] NA NA NA NA
[3,] NA NA NA NA
[4,] NA NA NA NA

#use nested for loop to fill in values of matrix
for (i in 1:4) {
  for (j in 1:4) {
    empty_mat[i, j] = (i*j)
  }
}

#view matrix
empty_mat

     [,1] [,2] [,3] [,4]
[1,] 1 2 3 4
[2,] 2 4 6 8
[3,] 3 6 9 12
[4,] 4 8 12 16

Приклад 2: вкладений цикл For у R

Наступний код показує, як використовувати вкладений цикл for для зведення кожного значення у кадрі даних:

 #create empty data frame
df <- data.frame(var1=c(1, 7, 4),
                 var2=c(9, 13, 15))

#view empty data frame
df

  var1 var2
1 1 9
2 7 13
3 4 15

#use nested for loop to square each value in the data frame
for (i in 1:nrow(df)) {
  for (j in 1:ncol(df)) {
    df[i, j] = df[i, j]^2
  }
}

#view new data frame
df

  var1 var2
1 1 81
2 49 169
3 16 225

Примітка про зациклення

Загалом, вкладені цикли for добре працюють з невеликими наборами даних або матрицями, але вони, як правило, досить повільні з великими даними.

Для великих даних сімейство функцій програм , як правило, набагато швидше, а пакет data.table має багато вбудованих функцій, які ефективно працюють із великими наборами даних.

Додаткові ресурси

Як перебирати імена стовпців у R
Як додати рядки до кадру даних у R

Додати коментар

Ваша e-mail адреса не оприлюднюватиметься. Обов’язкові поля позначені *