Функция append() в R - Добавление элементов
Примеры на языке RФункция append() в R используется для вставки элементов в вектор.
append() может вставлять новые элементы в указанную позицию вектора, что более гибко, чем прямое объединение с помощью c().
Синтаксис функции append() выглядит следующим образом:
append(x, values, after = length(x))
Описание параметра:
xИсходный вектор.
valuesЭлемент(ы) для добавления.
afterПозиция вставки (после какого индекса), по умолчанию в конец.
Пример
x <- c(1, 2, 3, 4, 5)
# Добавить в конец
result1 <- append(x, c(6, 7))
print("Добавить в конец:")
print(result1)
# Вставить после указанной позиции
result2 <- append(x, c(9, 9), after = 2)
print("Вставить после 2-го элемента:")
print(result2)
# Вставить в начало (after = 0)
result3 <- append(x, 0, after = 0)
print("Вставить в начало:")
print(result3)
# Добавить в конец
result1 <- append(x, c(6, 7))
print("Добавить в конец:")
print(result1)
# Вставить после указанной позиции
result2 <- append(x, c(9, 9), after = 2)
print("Вставить после 2-го элемента:")
print(result2)
# Вставить в начало (after = 0)
result3 <- append(x, 0, after = 0)
print("Вставить в начало:")
print(result3)
Вывод после выполнения вышеприведённого кода:
[1] "末尾追加:" [1] 1 2 3 4 5 6 7 [1] "在第 2 个元素后插入:" [1] 1 2 9 9 3 4 5 [1] "在开头插入:" [1] 0 1 2 3 4 5
append() очень полезен при динамическом построении векторов:
Пример
# Динамически собирать данные, удовлетворяющие условию
all_numbers <- 1:20
result <- c() # Пустой вектор
for (num in all_numbers) {
if (num %% 3 == 0) { # Делится на 3
result <- append(result, num)
}
}
print("Числа, делящиеся на 3:")
print(result)
all_numbers <- 1:20
result <- c() # Пустой вектор
for (num in all_numbers) {
if (num %% 3 == 0) { # Делится на 3
result <- append(result, num)
}
}
print("Числа, делящиеся на 3:")
print(result)
Вывод после выполнения вышеприведённого кода:
[1] "能被 3 整除的数:" [1] 3 6 9 12 15 18Другие расширения