旧版本的Fortran做循环Manova代码

old version fortran do loop manova code

本文关键字：循环 Manova 代码 Fortran 版本      更新时间：2023-10-16

我正在尝试复制 1971 年出版物中的多变量统计代码。未指定 Fortran 版本。我正在将 int 移植到C++并且不理解以下代码片段;从 库利和洛恩斯 - 多元数据分析

DO 12 NS = 1, NG
READ(5, TIT)        (V(J),  J = 1, M)
DO 12   J = 1, M
U(J) =  U(J) + V(J)
T(J) =  T(J) + V(J)
DO 12   K = 1, M
A(J, K) = A(J,K) + V(J) * V(K)

12 C（J， K） = C（J，K） + V（J） * V（K）

具体来说，我不明白 V（J） 是如何填充到第二行的。Fortran大师的任何帮助将不胜感激。顺便说一句，TIT 是一个包含项目描述的数组，所以我不明白为什么在这里阅读它。

V(J), J=1,M基本上是一个隐式循环，所以它大致相当于类似

for (i=1; i <= m; i++)
    infile >> v[i];
相关文章：