删除R中矩阵中每列的3个最大值
我有一个矩阵就像
mat <- matrix(sample(100,100,replace=TRUE),nr=10)
现在我想删除每列的3个最大值，这样我就有了一个包含7行的新矩阵
我尝试为每列创建向量，然后用
x1 = x[x!=max(x)]
x2 = x1[x1!=max(x1)]
x3 = x2[x2!=max(x2)]
然后把向量放到一个新的矩阵中，但由于我的矩阵有时有很多列，我想找到一种更简单的方法<谢谢你的帮助
共有1个答案
我们可以使用applywithMARGIN=2，sort对每列进行循环，并使用head
apply(mat, 2, FUN=function(x) head(sort(x),-3))
或者，如果我们想保持顺序，可以使用rank获得数字索引，通过与1:3进行比较获得逻辑索引，求反（！）并对列进行子集划分。
apply(mat, 2, FUN=function(x) x[!rank(-x, ties.method='first') %in% 1:3])
-
我有两个矩阵m1和m2： 乘法的结果是： 现在，我想让R给出相应乘法过程的最大值，而不是矩阵m3中的和积，例如： 我想得出以下矩阵： 如何做到这一点？
-
给定一个2维正整数数组，求和最大的HxW子矩形。矩形的总和是该矩形中所有元素的总和。 输入：具有正元素的二维数组NxN子矩形的HxW大小 输出：HxW大小的子矩阵，其元素的总和最大。 我已经使用蛮力方法解决了这个问题，但是，我现在正在寻找一个具有更好复杂性的更好的解决方案（我的蛮力法的复杂性是O（n6））。
-
我有一个数据集，它有4列/属性和150行。我想用最小最大规范化来规范化这个数据。到目前为止，我的代码是： 这里，和返回全局最小值和最大值。因此，这段代码实际上对2D矩阵中的所有值应用最小-最大规范化，以便全局最小值为0，全局最大值为1。 然而，我想对每一列分别执行相同的操作。具体来说，2D矩阵的每一列都应该独立于其他列进行最小-最大规格化。 我尝试使用只是使用和，但得到的错误说矩阵维度必须一致。
-
我有一个大的NxN位数组，有K个1(其他都是0)。所有非零点的坐标都是已知的——换句话说，这个n×n数组可以表示为K对数组，每个数组包含一个非零点的x和y坐标。 给定一个HxW大小的子矩阵，我需要将其放在我的原始NxN数组上，使其覆盖大多数非零点。 输入：子矩阵的高度H和宽度W 输出：HxW子数组的x和y协弦，其内部有最多的协弦 之前也回答过类似的问题：2D矩阵中尺寸为HxW的最大子阵列，但在我的
-
我有一个有三个带的光栅和一个有三个列的矩阵。 我想找到y的每一行和r的每一个单元格之间的角度。 我可以通过以下方式将光栅转换为矩阵： 现在，每个has矩阵都具有相同的形状（每个has矩阵中有3列，每行作为一个像素或来自y的样本）。我已经研究过如何使用嵌套的apply（）函数，但老实说，我不理解语法，因此无法使其正常工作。 我有40个非常大的超光谱光栅（425个波段）和一个50行矩阵，我需要使用它来
-
我有一个矩阵，我想和另外两个矩阵进行比较，看看我矩阵中的每个条目是包含在另外两个矩阵的值之内还是之外。例如，如果我的矩阵是： 另外两个矩阵是L和U： 和 我想取M的每个条目，比较一下它是否包含在L和U对应条目的范围内。 例如，对于M[1,1]，它在-0.49416022和-0.84996737的范围之外，所以我将给这个比较赋值0。另一方面，对于M[2,3]，值是-0.5240536，因此在1.14