Списки — это объекты R, которые содержат элементы различных типов, такие как числа, строки, векторы и другой список внутри него. Список также может содержать матрицу или функцию в качестве своих элементов. Список создается с помощью функции list () .
Создание списка
Ниже приведен пример создания списка, содержащего строки, числа, векторы и логические значения.
# Create a list containing strings, numbers, vectors and a logical # values. list_data <- list("Red", "Green", c(21,32,11), TRUE, 51.23, 119.1) print(list_data)
Когда мы выполняем приведенный выше код, он дает следующий результат —
[[1]] [1] "Red" [[2]] [1] "Green" [[3]] [1] 21 32 11 [[4]] [1] TRUE [[5]] [1] 51.23 [[6]] [1] 119.1
Элементы списка имен
Элементам списка могут быть присвоены имена, и к ним можно получить доступ, используя эти имена.
# Create a list containing a vector, a matrix and a list. list_data <- list(c("Jan","Feb","Mar"), matrix(c(3,9,5,1,-2,8), nrow = 2), list("green",12.3)) # Give names to the elements in the list. names(list_data) <- c("1st Quarter", "A_Matrix", "A Inner list") # Show the list. print(list_data)
Когда мы выполняем приведенный выше код, он дает следующий результат —
$`1st_Quarter`
[1] "Jan" "Feb" "Mar"
$A_Matrix
[,1] [,2] [,3]
[1,] 3 5 -2
[2,] 9 1 8
$A_Inner_list
$A_Inner_list[[1]]
[1] "green"
$A_Inner_list[[2]]
[1] 12.3
Доступ к элементам списка
Элементы списка могут быть доступны по индексу элемента в списке. В случае именованных списков к нему также можно получить доступ, используя имена.
Мы продолжаем использовать список в приведенном выше примере —
# Create a list containing a vector, a matrix and a list. list_data <- list(c("Jan","Feb","Mar"), matrix(c(3,9,5,1,-2,8), nrow = 2), list("green",12.3)) # Give names to the elements in the list. names(list_data) <- c("1st Quarter", "A_Matrix", "A Inner list") # Access the first element of the list. print(list_data[1]) # Access the thrid element. As it is also a list, all its elements will be printed. print(list_data[3]) # Access the list element using the name of the element. print(list_data$A_Matrix)
Когда мы выполняем приведенный выше код, он дает следующий результат —
$`1st_Quarter`
[1] "Jan" "Feb" "Mar"
$A_Inner_list
$A_Inner_list[[1]]
[1] "green"
$A_Inner_list[[2]]
[1] 12.3
[,1] [,2] [,3]
[1,] 3 5 -2
[2,] 9 1 8
Управление элементами списка
Мы можем добавлять, удалять и обновлять элементы списка, как показано ниже. Мы можем добавлять и удалять элементы только в конце списка. Но мы можем обновить любой элемент.
# Create a list containing a vector, a matrix and a list. list_data <- list(c("Jan","Feb","Mar"), matrix(c(3,9,5,1,-2,8), nrow = 2), list("green",12.3)) # Give names to the elements in the list. names(list_data) <- c("1st Quarter", "A_Matrix", "A Inner list") # Add element at the end of the list. list_data[4] <- "New element" print(list_data[4]) # Remove the last element. list_data[4] <- NULL # Print the 4th Element. print(list_data[4]) # Update the 3rd Element. list_data[3] <- "updated element" print(list_data[3])
Когда мы выполняем приведенный выше код, он дает следующий результат —
[[1]] [1] "New element" $<NA> NULL $`A Inner list` [1] "updated element"
Слияние списков
Вы можете объединить несколько списков в один список, поместив все списки в одну функцию list ().
# Create two lists. list1 <- list(1,2,3) list2 <- list("Sun","Mon","Tue") # Merge the two lists. merged.list <- c(list1,list2) # Print the merged list. print(merged.list)
Когда мы выполняем приведенный выше код, он дает следующий результат —
[[1]] [1] 1 [[2]] [1] 2 [[3]] [1] 3 [[4]] [1] "Sun" [[5]] [1] "Mon" [[6]] [1] "Tue"
Преобразование списка в вектор
Список может быть преобразован в вектор, чтобы элементы вектора можно было использовать для дальнейшей манипуляции. Все арифметические операции над векторами могут применяться после преобразования списка в векторы. Чтобы сделать это преобразование, мы используем функцию unlist () . Он принимает список в качестве входных данных и создает вектор.
# Create lists. list1 <- list(1:5) print(list1) list2 <-list(10:14) print(list2) # Convert the lists to vectors. v1 <- unlist(list1) v2 <- unlist(list2) print(v1) print(v2) # Now add the vectors result <- v1+v2 print(result)
Когда мы выполняем приведенный выше код, он дает следующий результат —