In [2]:
list_data <- list("runoob", "google", c(11,22,33), 123, 51.23, 119.1)
print(list_data)
[[1]] [1] "runoob" [[2]] [1] "google" [[3]] [1] 11 22 33 [[4]] [1] 123 [[5]] [1] 51.23 [[6]] [1] 119.1
列表包含向量、矩阵、列表：
In [4]:
list_data <- list(c("Google","Runoob","Taobao"), matrix(c(1,2,3,4,5,6),
nrow = 2),
list("runoob",12.3))
给列表元素设置名字：
In [5]:
names(list_data) <- c("Sites", "Numbers", "Lists")
显示列表：
In [6]:
print(list_data)
$Sites
[1] "Google" "Runoob" "Taobao"
$Numbers
[,1] [,2] [,3]
[1,] 1 3 5
[2,] 2 4 6
$Lists
$Lists[[1]]
[1] "runoob"
$Lists[[2]]
[1] 12.3
列表包含向量、矩阵、列表：
In [7]:
list_data <- list(c("Google","Runoob","Taobao"), matrix(c(1,2,3,4,5,6),
nrow = 2),
list("runoob",12.3))
给列表元素设置名字：
In [8]:
names(list_data) <- c("Sites", "Numbers", "Lists")
显示列表：
In [9]:
print(list_data[1])
$Sites [1] "Google" "Runoob" "Taobao"
访问列表的第三个元素：
In [10]:
print(list_data[3])
$Lists $Lists[[1]] [1] "runoob" $Lists[[2]] [1] 12.3
访问第一个向量元素：
In [11]:
print(list_data$Numbers)
[,1] [,2] [,3] [1,] 1 3 5 [2,] 2 4 6
列表包含向量、矩阵、列表：
In [12]:
list_data <- list(c("Google","Runoob","Taobao"), matrix(c(1,2,3,4,5,6),
nrow = 2),
list("runoob",12.3))
给列表元素设置名字：
In [13]:
names(list_data) <- c("Sites", "Numbers", "Lists")
添加元素：
In [14]:
list_data[4] <- "新元素"
print(list_data[4])
[[1]] [1] "新元素"
删除元素：
In [15]:
list_data[4] <- NULL
删除后输出为 NULL ：
In [16]:
print(list_data[4])
$<NA> NULL
更新元素：
In [17]:
list_data[3] <- "我替换来第三个元素"
print(list_data[3])
$Lists [1] "我替换来第三个元素"
创建两个列表:
In [18]:
list1 <- list(1,2,3)
list2 <- list("Google","Runoob","Taobao")
合并列表:
In [19]:
merged.list <- c(list1,list2)
显示合并后的列表:
In [20]:
print(merged.list)
[[1]] [1] 1 [[2]] [1] 2 [[3]] [1] 3 [[4]] [1] "Google" [[5]] [1] "Runoob" [[6]] [1] "Taobao"
创建列表:
In [21]:
list1 <- list(1:5)
print(list1)
list2 <-list(10:14)
print(list2)
[[1]] [1] 1 2 3 4 5 [[1]] [1] 10 11 12 13 14
转换为向量：
In [22]:
v1 <- unlist(list1)
v2 <- unlist(list2)
print(v1)
print(v2)
[1] 1 2 3 4 5 [1] 10 11 12 13 14
两个向量相加：
In [23]:
result <- v1+v2
print(result)
[1] 11 13 15 17 19