二维数组的总和

Question

我有这个2D数组L(i,j).如何根据所有元素求和,i并将结果作为函数j

我做了:

 do j=1,10
  do i =1,30
   T(j) = Sum( L(:,j)
  end do 
 end do

这可以吗？

Answer 1

几乎......你不使用i(而且你不需要),而你缺少一个括号:

do j=1,10
  T(j) = Sum( L(:,j) )
enddo ! j

您还可以使用dimension参数在sum一行中执行此操作:

T = sum( L, dim=1 )

但是,我发现很难阅读并坚持使用循环 - 它不应该在性能方面有所作为.