R语言多维数组被视为一维，如何遍历并保留其结构？

一、关于c()函数的用法正确性 #

你在创建数组时使用c()的方式是正确的。array()函数的第一个参数要求传入一维向量，你通过c()将多个子向量合并为单一的一维向量，再通过dim参数指定(4,10)的二维结构，完全符合R中数组的创建逻辑。

二、保留结构的多维数组遍历方法 #

直接用for(component in components)会将数组扁平化遍历，要保留原有结构，可采用以下几种方法：

1. 嵌套for循环（精确控制维度） #

针对你的4行10列数组，可通过遍历行、列索引来访问结构化的子集或元素：

# 遍历每一行（保留行结构）
for (i in 1:nrow(components)) {
  row_data <- components[i, ]
  print(row_data)
}

# 遍历每一列（保留列结构）
for (j in 1:ncol(components)) {
  col_data <- components[, j]
  print(col_data)
}

# 遍历每个元素并保留位置信息
for (i in 1:nrow(components)) {
  for (j in 1:ncol(components)) {
    element <- components[i, j]
    cat("位置[", i, ",", j, "]的值：", element, "\n")
  }
}

用nrow()和ncol()获取维度，比手动硬编码维度更灵活，数组维度变化时也能自动适配。

2. 使用apply()系列函数 #

apply()可按指定维度遍历数组并返回结构化结果：

# 按行遍历（MARGIN=1代表行维度）
apply(components, MARGIN = 1, function(x) {
  print(x)
  # 可添加对每行的自定义处理逻辑
})

# 按列遍历（MARGIN=2代表列维度）
apply(components, MARGIN = 2, function(x) {
  print(x)
})

如果是更高维数组，MARGIN可指定多个维度（比如三维数组用c(1,2)遍历前两个维度的组合）。

3. 使用asplit()拆分后遍历 #

asplit()能将数组按指定维度拆分为列表，列表中的每个元素就是原数组对应维度的结构化子集：

# 按行拆分为列表
row_list <- asplit(components, MARGIN = 1)
for (row in row_list) {
  print(row)
}

# 按列拆分为列表
col_list <- asplit(components, MARGIN = 2)
for (col in col_list) {
  print(col)
}

这种方式将数组转为结构化列表，遍历逻辑更直观。

三、关于维度获取的补充 #

length()返回的是数组总元素数（你的例子中4*10=40），若要获取数组的维度信息，应使用dim()函数：

dim(components)  # 返回 [1]  4 10，即行、列数

结合dim()或nrow()/ncol()，可避免手动记忆维度，让代码更健壮。

内容的提问来源于stack exchange，提问作者Otaku Inside