r - 将矩阵的 n 个条目设置为零

Question

我想将矩阵的 n 个条目设置为零，下面是我尝试通过生成唯一对的整数来解决这个问题。

如何从均匀分布 (x,y) 生成唯一的整数对，例如，如果我们想要 1:1000 范围内的 x 和 y 三对，那么解决方案之一是:(1,888),(743,743),(743,4)
如果我使用 cbind(sample(1:1000,100,replace=TRUE),sample(1:1000,100,replace=TRUE)) 生成 100 对我风险，他们可以重复几次。如何以矢量化方式(无循环)制作它？

对不能重复，但它们的元素可以，例如:(1,2),(2,1),(1,1),(2,2),(23,23),(86,52) 是范围 1:100 和六对的正确输出

Answer 1

您可以对整数进行采样，然后像这样将整数映射到对:

v <- sample.int(1000^2, size = 100, replace = F)
foo <- function(x) cbind(((x-1) %/% 10) + 1, ((x-1) %% 10) + 1)
foo(v)

这使您不必创建整个列表以进行采样。