我编写了一个程序来计算平方有限差分矩阵,您可以在其中输入行数(等于列数)->这存储在变量矩阵中。该程序运行良好:
program fin_diff_matrix
implicit none
integer, dimension(:,:), allocatable :: A
integer :: matrix,i,j
print *,'Enter elements:'
read *, matrix
allocate(A(matrix,matrix))
A = 0
A(1,1) = 2
A(1,2) = -1
A(matrix,matrix) = 2
A(matrix,matrix-1) = -1
do j=2,matrix-1
A(j,j-1) = -1
A(j,j) = 2
A(j,j+1) = -1
end do
print *, 'Matrix A: '
write(*,1) A
1 format(6i10)
end program fin_diff_matrix
Run Code Online (Sandbox Code Playgroud)
对于输出,我希望矩阵针对输出进行格式化,例如,如果用户输入 6 行,则输出也应如下所示:
2 -1 0 0 0 0
-1 2 -1 0 0 0
0 -1 2 -1 0 …Run Code Online (Sandbox Code Playgroud) 我是一个awk初学者,有以下问题.我有一个包含多个列的文件,其中包含如下数据:
1 2 3 6
2 3 4 7
4 5 6 8
Run Code Online (Sandbox Code Playgroud)
现在我想计算每列的平均值并将结果写入一个新文件,例如newfile.txt,其中列出了平均值(如果行或列无关紧要):
2
3
5
7
Run Code Online (Sandbox Code Playgroud)
非常感谢你!
斯蒂芬