矩阵代数代码从VB到R的转换

对于一个项目，我试图从一个案例研究中复制/重写以下Visual Basic代码，以便在R中运行它

j=1到N的

对于I=1到M
当I>j时
如果b（I，j）c=P，那么
a（I，j）=l其他
如果b（1，j）欢迎使用SO。StackOverflow是一种解决问题的服务，而不是代码编写服务。如果你提供了一个最小的可重复的例子，你就有最大的机会得到一个有用的答案。也许会有帮助。如果你自己表现出合理的努力，像你这样的问题最有可能得到回应：到目前为止你尝试了什么，为什么不奏效？您还需要提供示例输入数据和预期输出。我建议对您的问题进行编辑，以缩进VB代码（使用）。我的基本原理不是强迫您使用任何特定的缩进样式，但许多人（包括我）发现，合理的缩进样式可以使理解代码的流程和结构更加容易。（我修正了一个小的输入错误，包含了
-
，它阻碍了
结束if
）如果您不喜欢，请随意回滚，在这种情况下，我深表歉意。目前的VB代码包含语法错误，因此很难翻译。