请问如何快速生成如下格式文件？

guoliangbo

文件格式（50行*50列），且数值（实型或整型）大小都是其位置的函数，即：

   f(1,1)    f(1,2)   f(1,3)   .....    f(1,50)
    f(2,1)    f(2,2)    f(2,3)   .....    f(2,50)
    .......................
   f(50,1)   f(50,2)  f(50,3) .....   f(50,50)

我学的是fortran语言，很容易实现；但是不知道能不能用shell实现？哪位高手请指点一二，谢谢！

寂寞烈火

try:

1. 
   
2. #!perl -w
   
3. use strict;
   
4. foreach my $i (1..50){
   
5.         foreach my $j (1..50){
   
6.                 print "f($i,$j) ";
   
7.         }
   
8.         print "\n";
   
9. }
   

复制代码

aerofox

1. #!/bin/ksh -p
   
2. for ((i=1; i<=50; i=i+1)); do
   
3.     for ((j=1; j<50; j=j+1)); do
   
4.         echo -n "f($i, $j) "
   
5.     done
   
6.     echo "f($i, 50)"
   
7. done
   

复制代码

begincwcw

awk也可以很简单的实现：

awk 'BEGIN {
    for( x = 1; x <=50; x++){
        for(y = 1; y <= 50; y++)
            printf("f(%s,%s) ", x, y)
        printf("\n"
    }
}'

guoliangbo

看来是我没有说清楚，大家都没理解我的意思。f(i,j) 是一个数字而不是字符“f(i,j)”，它是i和j的函数，就是不同位置的数字是不同的，可以理解为一个海域的水深数据，看起来应该象：

     5  7   10    12   10  20  25  ...
     3   6   12   15   15  18  20  ...
     4   7   11   18   19   25 30  ...

这样该如何用shell实现？谢谢！

寂寞烈火

原帖由 "guoliangbo" 发表：


这样该如何用shell实现？谢谢！

aerofox

数据源在哪？或者函数解析式在哪？