我想将值为[1,1,0]的列添加到DIM (2×2)的矩阵中,并将值为[1,1,0]的行添加到DIM (3×3)的矩阵中.

# Create the original matrix
original_matrix <- matrix(c(7, 2, 3, 5), nrow = 2)

# Add a column with values [1, 1, 0]
modified_matrix <- cbind(original_matrix, c(1, 1, 0))

# Add a row with values [1, 1, 0]
final_matrix <- rbind(modified_matrix, c(1, 1, 0))

我使用cbind函数添加列,使用rbind函数添加行.有没有办法一次搞定?

推荐答案

通过执行以下操作,可以避免创建modified_matrix:

final_matrix <- rbind(cbind(original_matrix, c(1, 1)), c(1, 1, 0))

但是,如果你想在一般情况下得到答案,你必须手动"削减"你的一个向量.

R相关问答推荐

如果R上的不同时期之间的值发生了变化,则创建假人

从字符载体创建函数参数

使用lapply的重新定位功能

如何在编辑列时更新可编辑数据表,并使用该表在Shiny中执行连续计算

如何在modelsummary中重命名统计数据?

如果第一个列表中的元素等于第二个列表的元素,则替换为第三个列表的元素

自动变更列表

如何在一次运行中使用count进行多列计数

我正在努力用R计算数据集中的中值逐步距离

以相同的方式对每个表进行排序

如何将使用rhandsontable呈现的表值格式化为百分比,同时保留并显示完整的小数精度?

来自程序包AFEX和amp;的类/函数和NICE_TABLE&冲突

使用shiny 中的所选要素行下拉菜单

如何删除设置大小的曲线图并添加条形图顶部数字的百分比

通过初始的shiny 应用更新部署的shiny 应用的数据和参数,其中部署的应用程序显示为URL

计算使一组输入值最小化的a、b和c的值

无法将条件case_when()应用于使用!!创建的新变量Mutations

计算Mean by分组和绑定到R中的数据集

如何显示准确的p值而不是<;0.001*?

生存时间序列的逻辑检验