linux输出矩阵处理

常思OL

此问题已解决

haooooaaa

1. awk '/^  *[16]/{++c;next}{b=$1}c<2{a[$1]=$0}c>1{sub(b,"");a[b]=a[b] $0}/\./&&b>1{s=split(a[b],t);for(i=1+(c-1)*5;i<s;i++)a[i-1]=sprintf("%s%10s",a[i-1],t[i])}END{printf "%12s",1;for(i=0;i<=15;i++)print a[i]}' file

复制代码

jason680

回复 1# 常思OL

$ awk '/^   /{s=$1;next}NF>1{for(n=2;n<=NF;n++)a[$1,s+n-2]=$n}END{for(m=1;m<=15;m++){s=a[m,1];for(n=2;n<=15;n++){if(a[m,n]=="")a[m,n]=a[n,m];s=s" "a[m,n]}print s}}' FILE        
0.100000 0.706377 0.373664 0.000000 0.000000 0.000000 0.000000 0.000000 0.000000 0.995273 0.280392 0.266293 -0.172805 0.702920 0.000000
0.706377 0.100000 0.788963 0.000000 0.000000 0.000000 0.000000 0.000000 0.000000 0.280392 0.558893 0.596917 -0.212652 0.865005 0.000000
0.373664 0.788963 0.100000 0.000000 0.000000 0.000000 0.000000 0.000000 0.000000 0.266293 0.596917 0.832396 -0.721101 0.293322 0.000000
...
0.000000 0.000000 0.000000 0.000000 0.000000 0.686799 0.000000 0.000000 0.196091 0.000000 0.000000 0.000000 0.000000 0.000000 0.100000


   

常思OL

问题已解决

jason680

回复 4# 常思OL


$ bash get_matrix.sh FILE
0.100000D+01 0.706377D+00 0.373664D+00 ... 0.000000D+00 0.000000D+00
0.706377D+00 0.100000D+01 0.788963D+00 ... 0.000000D+00 0.000000D+00
0.373664D+00 0.788963D+00 0.100000D+01 ... 0.212433D-04 0.000000D+00
...
0.000000D+00 0.000000D+00 -0.522244D-03 ... 0.000000D+00 0.000000D+00
0.000000D+00 0.000000D+00 0.212433D-04 ... 0.100000D+01 0.000000D+00
0.000000D+00 0.000000D+00 0.000000D+00 ... 0.000000D+00 0.100000D+01

$ cat get_matrix.sh
awk '{_00000O="-"-"-";_0000O0=FS;_0000OO="="=="=";_000O00=NR;_000O0O="+"+"+";_000OO0=NF;_000OOO=_00000O+_0000OO;_00O000_00O00O="\x4Fv";_00O0O0="\\";_00O0OO=_0000OO+_000OOO;_00OO00=OFS;_00O000_00OO0O="e\x72";_00OOO0="" "" "";_00OOOO=""" """;_0O0000="" "";_0O000O="*";_0O00O0="" " " "";_0O00OO=_00OOO0"\\";_00OOOO_0O0O00=_0O00O0""_00OOOO;_0O0O0O=_00OOO0"*";_0O0OO0="*"_0O0000;_0O0OOO=_00O0OO*_000OOO+_00000O;_00O000_0OO000="\x6C""a\x70";_0OO00O_0O0O0O=_00O0O0""_0O000O;_0OO00O_0O0OO0=_0O00OO""_0O0OO0;_0OO00O_0OO0O0=_00OOO0""_00O0O0""_0O0O0O""_0O0000;_0OO00O_0OO0OO=_00OOO0"^"_00OOO0;}$_00000O~_0OO00O_0OO0OO" "_0OO00O_0O0O0O""_0OO00O_0O0OO0""_0OO00O_0OO0O0" "_00O000_00O00O""_00OOO0""_00O000_00OO0O""_00O000_0OO000""_0O0000{_0OOO00=_0000OO;next}($_000O0O~_0O0000""_0OO00O_0OO0OO""_00OOO0" "_0OO00O_0O0OO0""_0OO00O_0OO0O0""_0OO00O_0O0O0O)*_0OOO00{for(_0OOO0O=_000OOO;_0OOO0O<=_0OOOO0;_0OOO0O++){_0OOOOO=_O00000[_0OOO0O,_0000OO];for(_O0000O=_00O0OO;_O0000O<=_O000O0;_O0000O++){if(_O00000[_0OOO0O,_O0000O]==_00OOO0""_0O0000)_O00000[_0OOO0O,_O0000O]=_O00000[_O0000O,_0OOO0O];_0OOOOO=_0OOOOO" "_O00000[_0OOO0O,_O0000O]}print _0OOOOO}exit}($_00000O~_00OOO0""_0OO00O_0OO0OO""_00OOOO""_0O0000""_00OOOO_0O0O00""_0O00O0""_00OOOO_0O0O00"  ")*_0OOO00{_0OOOOO=$_0000OO;_O000O0=$_000OO0;next}_0OOO00*_000OO0>_000OOO{_0OOOO0=$_0000OO;for(_O0000O=_0O0OOO;_O0000O<=_000OO0;_O0000O++)_O00000[_0OOOO0,_0OOOOO+_O0000O-_00O0OO]=$_O0000O}' $1

   

常思OL

楼上的大神你写的我看不懂

我先问一个与此相关但简化的问题，见excel文档（请改为xls后缀）。


在excel里数据是按每隔5列换行的，请问如何更改为36*36的方阵呢？？

谢谢

klainogn

谁知道Jason大神那么风骚的代码，是如何加密出来的？能否解密一下，我的眼里全是圈圈！

Herowinter

回复 7# klainogn

应该用了他以前提过的代码混淆, 维护这种代码真要爽了...
   

常思OL

其实实现我的目的很简单。。我已经自行解决了。。

回复 8# Herowinter