R 生成每个可能的位置权重矩阵

我试图生成每个潜在位置权重矩阵，将所有基础上的某些位置保持在0.25，其他位置保持在1。 比如：

1, 0 , 0.25, 1
0, 1 , 0.25, 0
0, 0 , 0.25, 0
0, 0 , 0.25, 0

到

除0.25列之外的所有可能性都如此

---

我该怎么做呢？

嘿，尼尔弗斯，我试过你的函数，但似乎0.25之外的列加起来大于1。嘿，尼尔弗斯，这确实有效！你能解释一下这个函数是如何工作的吗！我似乎无法理解，我想编辑他们的Nilfws，我尝试了你的功能，但似乎0.25之外的列加起来大于1。嘿，NeilFws，这确实有效！你能解释一下这个函数是如何工作的吗！我似乎想不出来，我想编辑一下

1, 1 , 0.25, 1
0, 0 , 0.25, 0
0, 0 , 0.25, 0
0, 0 , 0.25, 0