Sum 二维数组的和

我有这个2D数组L（I，j）。如何根据

I

对所有元素求和，并将结果作为

j

我做到了：

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

---

可以吗？

差不多。。。您不使用

i

（也不需要），并且缺少一个括号：

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

也可以使用中的尺寸参数在一行中执行此操作：

T = sum( L, dim=1 )

---

然而，我发现这很难理解，并且会坚持循环-它不应该对性能产生影响

有时使用循环比不使用循环更快。