| 5 | 1/1 | 返回列表 |
| 查看: 2238 | 回復(fù): 37 | ||
| 當(dāng)前只顯示滿足指定條件的回帖,點(diǎn)擊這里查看本話題的所有回帖 | ||
ljw4010榮譽(yù)版主 (職業(yè)作家)
小木蟲從頭派教主
|
[求助]
急:求用Fortran或者其他語言編寫一個(gè)程序,處理下面的數(shù)據(jù)。。。。。。。。!
|
|
|
我現(xiàn)在在處理程序畫圖時(shí)很費(fèi)勁,想對(duì)獲得數(shù)據(jù)文件處理下,因?yàn)槲覜]學(xué)過Fortran,自學(xué)了一下,但還是沒解決,其他語言寫的也可以,求助大神! 1.我的數(shù)據(jù)文件格式如下: T[K] N DOS(Ef) S s/t R_H kappa0 c chi 10.0000 -0.00088309 0.36829829E+01 -0.22021730E-03 0.26301947E+18 -0.79475299E-03 0.44466758E+11 0.18490799E-02 0.54983779E-10 20.0000 -0.00088309 0.26875931E+01 -0.90876783E-04 0.20008966E+18 -0.19857427E-04 0.68363230E+11 0.32057178E-02 0.40123462E-10 30.0000 -0.00088309 0.22924650E+01 -0.84664015E-04 0.16822569E+18 -0.83733589E-05 0.12349874E+12 0.56812697E-02 0.34224538E-10 40.0000 -0.00088309 0.21550792E+01 -0.98572721E-04 0.15610861E+18 -0.65840150E-05 0.18320424E+12 0.75723680E-02 0.32173486E-10 50.0000 -0.00088309 0.20689471E+01 -0.11499769E-03 0.15044739E+18 -0.61060992E-05 0.24851448E+12 0.91199376E-02 0.30887607E-10 60.0000 -0.00088309 0.19878188E+01 -0.13042206E-03 0.14698777E+18 -0.59478990E-05 0.32102167E+12 0.10595254E-01 0.29676431E-10 70.0000 -0.00088309 0.19072220E+01 -0.14418642E-03 0.14447949E+18 -0.58933740E-05 0.39984025E+12 0.12066150E-01 0.28473190E-10 80.0000 -0.00088309 0.18283895E+01 -0.15633123E-03 0.14246774E+18 -0.58795297E-05 0.48428944E+12 0.13542317E-01 0.27296288E-10 90.0000 -0.00088309 0.17522085E+01 -0.16711278E-03 0.14074025E+18 -0.58843546E-05 0.57466693E+12 0.15037461E-01 0.26158971E-10 10.0000 -0.00883088 0.84410600E+01 -0.11689296E-03 0.24789870E+19 -0.41920906E-06 0.38654460E+12 0.46876655E-02 0.12601779E-09 20.0000 -0.00883088 0.49614612E+01 -0.81871808E-04 0.14192156E+19 -0.65426762E-06 0.65286003E+12 0.87741598E-02 0.74070364E-10 30.0000 -0.00883088 0.46756154E+01 -0.55743996E-04 0.12778854E+19 -0.65291729E-06 0.97812153E+12 0.13236410E-01 0.69802931E-10 40.0000 -0.00883088 0.47012209E+01 -0.50147434E-04 0.12586296E+19 -0.64568125E-06 0.13259755E+13 0.17575579E-01 0.70185200E-10 50.0000 -0.00883088 0.47269535E+01 -0.51492758E-04 0.12561404E+19 -0.64100715E-06 0.16823697E+13 0.22066680E-01 0.70569365E-10 60.0000 -0.00883088 0.47408328E+01 -0.54860269E-04 0.12560297E+19 -0.63779752E-06 0.20366930E+13 0.26804368E-01 0.70776571E-10 70.0000 -0.00883088 0.47488656E+01 -0.58348815E-04 0.12551960E+19 -0.63559342E-06 0.23914729E+13 0.31943350E-01 0.70896493E-10 80.0000 -0.00883088 0.47576572E+01 -0.61496957E-04 0.12534166E+19 -0.63394892E-06 0.27522054E+13 0.37606365E-01 0.71027745E-10 90.0000 -0.00883088 0.47716152E+01 -0.64381860E-04 0.12511220E+19 -0.63256571E-06 0.31236204E+13 0.43859197E-01 0.71236126E-10 10.0000 -0.08830878 0.42141602E+02 0.87953597E-04 0.75126055E+19 -0.98769667E-07 0.23033392E+13 0.41537770E-01 0.62913800E-09 20.0000 -0.08830878 0.43692263E+02 -0.41588947E-05 0.82094250E+19 -0.82516579E-07 0.41555023E+13 0.80748205E-01 0.65228805E-09 30.0000 -0.08830878 0.44663624E+02 -0.21504742E-04 0.82540992E+19 -0.79165706E-07 0.55733828E+13 0.12447749E+00 0.66678964E-09 40.0000 -0.08830878 0.45312345E+02 -0.27007473E-04 0.80589511E+19 -0.79127587E-07 0.75597431E+13 0.17202093E+00 0.67647448E-09 50.0000 -0.08830878 0.45883812E+02 -0.29833271E-04 0.79234737E+19 -0.79037621E-07 0.99651412E+13 0.22031734E+00 0.68500600E-09 60.0000 -0.08830878 0.46378068E+02 -0.31377720E-04 0.78728970E+19 -0.78450172E-07 0.12484013E+14 0.26638841E+00 0.69238480E-09 70.0000 -0.08830878 0.46754191E+02 -0.32326518E-04 0.78761793E+19 -0.77551438E-07 0.14973971E+14 0.30934617E+00 0.69800000E-09 80.0000 -0.08830878 0.46993506E+02 -0.33260061E-04 0.79047459E+19 -0.76560603E-07 0.17417591E+14 0.34962559E+00 0.70157277E-09 90.0000 -0.08830878 0.47101837E+02 -0.34544692E-04 0.79414153E+19 -0.75615674E-07 0.19845552E+14 0.38805026E+00 0.70319006E-09 2.我需要提取第1列和第4列的數(shù)據(jù),并將第四列數(shù)據(jù)乘以10的6次方 3.以中間的空行為分割線,將每個(gè)分割后區(qū)域數(shù)據(jù) 依次輸出到 1.txt 、 2.txt、3.txt(數(shù)據(jù)多的話,可能更多塊,更多) 4.分割后的數(shù)據(jù)格式大致這樣: 1.txt為例: T[K] S 10.0000 -0.22021730E-03 20.0000 -0.90876783E-04 30.0000 -0.84664015E-04 40.0000 -0.98572721E-04 50.0000 -0.11499769E-03 60.0000 -0.13042206E-03 70.0000 -0.14418642E-03 80.0000 -0.15633123E-03 90.0000 -0.16711278E-03 5.數(shù)據(jù)附件如下: |

榮譽(yù)版主 (職業(yè)作家)
小木蟲從頭派教主


榮譽(yù)版主 (職業(yè)作家)
小木蟲從頭派教主

版主 (知名作家)

| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 085602化工求調(diào)劑(331分) +8 | 111@127 2026-03-30 | 8/400 |
|
|---|---|---|---|---|
|
[考研] 277跪求調(diào)劑 +8 | 1915668 2026-03-27 | 12/600 |
|
|
[考研] 材料工程專碩求調(diào)劑 +8 | hyl3153942 2026-03-29 | 8/400 |
|
|
[考研] 求收留 +6 | 1943443204 2026-03-28 | 6/300 |
|
|
[考研] 調(diào)劑 +4 | GK72 2026-03-30 | 4/200 |
|
|
[考研] 生物學(xué)學(xué)碩,一志愿湖南大學(xué),初試成績(jī)338 +7 | YYYYYNNNNN 2026-03-26 | 9/450 |
|
|
[考研] 08工科,295,接受跨專業(yè)調(diào)劑 +3 | lmnlzy 2026-03-30 | 3/150 |
|
|
[考研] 本科211生物醫(yī)學(xué)工程085409求調(diào)劑339分 +3 | 里子木yy 2026-03-29 | 3/150 |
|
|
[基金申請(qǐng)] 面上5B能上會(huì)嗎? +7 | redcom 2026-03-29 | 7/350 |
|
|
[考研] 0703化學(xué)/290求調(diào)劑/本科經(jīng)歷豐富/工科也可 +13 | 丹青奶蓋 2026-03-26 | 15/750 |
|
|
[考研] 化學(xué)工程085602 305分求調(diào)劑 +25 | RichLi_ 2026-03-25 | 25/1250 |
|
|
[考研] 375求調(diào)劑 +6 | 雨夏整夜 2026-03-29 | 6/300 |
|
|
[考研] 一志愿南航 335分 | 0856 | GPA 4.07 | 有科研經(jīng)歷 +8 | cccchenso 2026-03-29 | 8/400 |
|
|
[考研] 調(diào)劑310 +12 | 溫柔的晚安 2026-03-25 | 13/650 |
|
|
[考研] 11408軟件工程求調(diào)劑 +3 | Qiu學(xué)ing 2026-03-28 | 3/150 |
|
|
[考研] 316求調(diào)劑 +7 | 江辭666 2026-03-26 | 7/350 |
|
|
[考研] 化學(xué)調(diào)劑 +4 | 愛吃番茄的旭 2026-03-24 | 5/250 |
|
|
[考研] 279 分 求調(diào)劑 +4 | 睡個(gè)好覺_16 2026-03-24 | 4/200 |
|
|
[考研] 315調(diào)劑 +4 | 0860求調(diào)劑 2026-03-26 | 5/250 |
|
|
[考研] 347求調(diào)劑 +4 | L when 2026-03-25 | 4/200 |
|