[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Trocar linhas por colunas
From: |
merthobu |
Subject: |
Trocar linhas por colunas |
Date: |
Wed, 20 Dec 2006 17:41:26 -0000 |
User-agent: |
eGroups-EW/0.82 |
Olá pessoal,
Estou em apuros ...alguém pode dar um help? ...lembrei de que só
oramos quando santa Bárbara manda uns trovões...
Tenho vários arquivos no seguinte formato:
orbital 1 orbital 2 orbital 3 orbital 4
orbital 5
N 1s 0.0001059 0.9952636 -0.1239903 -0.1576026
-0.0933333
N 2s 0.0003291 0.0235741 0.2691059 0.3762469
0.1973574
N 2px 0.0000000 0.0000000 0.0000000 0.0000000
0.0000000
N 2py 0.0000000 0.0000000 0.0000000 0.0000000
0.0000000
N 2pz 0.0001459 -0.0028692 -0.1966343 0.0437243
0.4744341
N 3s -0.0008002 0.0016235 0.0990623 0.3847572
0.4666182
N 3px 0.0000000 0.0000000 0.0000000 0.0000000
0.0000000
N 3py 0.0000000 0.0000000 0.0000000 0.0000000
0.0000000
N 3pz 0.0006671 -0.0004888 -0.0086384 0.0278872
0.1727728
N 3dxx 0.0000916 -0.0035963 -0.0129366 -0.0000562
0.0097609
N 3dyy 0.0000916 -0.0035963 -0.0129366 -0.0000562
0.0097609
N 3dzz -0.0008716 -0.0020006 0.0379962 -0.0021703
-0.0438364
N 3dxz 0.0000000 0.0000000 0.0000000 0.0000000
0.0000000
N 3dyz 0.0000000 0.0000000 0.0000000 0.0000000
0.0000000
N 3dxy 0.0000000 0.0000000 0.0000000 0.0000000
0.0000000
O 1s 0.9947426 -0.0003089 -0.1808577 0.1358836
-0.0249040
O 2s 0.0209103 0.0003798 0.4136791 -0.3222243
0.0484837
O 2px 0.0000000 0.0000000 0.0000000 0.0000000
0.0000000
O 2py 0.0000000 0.0000000 0.0000000 0.0000000
0.0000000
O 2pz 0.0018215 -0.0002304 0.1711557 0.3223566
-0.4110206
O 3s 0.0047029 -0.0019485 0.3102427 -0.4456531
0.1324773
Gostaria de extrair as colunas chamadas de orbital 1, orbital 2,
etc... para outro arquivo, porém com outro formato. Gostaria de trocar
as colunas por linhas contendo no máximo 4 campos. Estou tentando
fazer isso com o "awk" mas tah meio enrolado a parte de colocar no
formato linhas com 4 campos.
Para extrair os campos eu faço:
awk '{print $3, $4, $5, $6}' arq1 > arq2
Mas isso só gera as colunas...alguém poderia dar uma luz ao problema
se possível em awk?
Valeu qq ajuda...falow.
Humberto
- Trocar linhas por colunas,
merthobu <=