 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 5 | 1/1 | 返回列表 |
| 查看: 3709 | 回復(fù): 21 | |||
| 當(dāng)前只顯示滿足指定條件的回帖，點(diǎn)擊這里查看本話題的所有回帖 | |||
duhb655金蟲 (著名寫手)
|
[求助]
fortran 怎么按行讀取數(shù)據(jù)（有小例子） 已有3人參與
|
||
|
深度 溫度 電導(dǎo)率 50.00000 28.30186 54.27303 51.00000 28.28920 54.27039 52.00000 28.27396 54.26752 53.00000 28.25474 54.27453 54.00000 28.23691 54.28119 55.00000 28.23033 54.29279 56.00000 28.22947 54.30813 57.00000 28.21856 54.30784 58.00000 28.20773 54.31368 59.00000 28.19656 54.32171 60.00000 28.15063 54.28722 我用的是網(wǎng)上的一個數(shù)據(jù)，我寫的程序?yàn)椋?fieldset> PROGRAM TE REAL::A(11,3) INTEGER ::I,J CHARACTER C OPEN(13,FILE='Result.txt') DO J=1,1 READ(13,*)C ENDDO OPEN(12,FILE='result1.TXT') DO I=1,11 READ(13,*) A(I,1:3) ENDDO WRITE(12,"(3f10.5)") A CLOSE(13) CLOSE(12) END 得到的結(jié)果是： 50.00000 51.00000 52.00000 53.00000 54.00000 55.00000 56.00000 57.00000 58.00000 59.00000 60.00000 28.30186 28.28920 28.27396 28.25474 28.23691 28.23033 28.22947 28.21856 28.20773 28.19656 28.15063 54.27303 54.27039 54.26752 54.27453 54.28119 54.29279 54.30813 54.30784 54.31368 54.32171 54.28722 我想得到原來一樣的數(shù)據(jù)，我看結(jié)果意思是按列讀取，怎么能按行讀取啊，或怎么能得到和原來一樣的矩陣，如果可能的話，不要用A1,A2,A3三列來做，因?yàn)槲业臄?shù)據(jù)有很多列，謝謝了！ [ Last edited by jjdg on 2014-2-9 at 10:07 ] |
回復(fù)此樓» 收錄本帖的淘帖專輯推薦
 經(jīng)驗(yàn) |
» 猜你喜歡
310求調(diào)劑
已經(jīng)有5人回復(fù)
-
材料與化工272求調(diào)劑
已經(jīng)有17人回復(fù)
-
材料工程專碩求調(diào)劑
已經(jīng)有3人回復(fù)
-
337求調(diào)劑
已經(jīng)有5人回復(fù)
-
材料與化工328分調(diào)劑
已經(jīng)有9人回復(fù)
-
318一志愿吉林大學(xué)生物與醫(yī)藥 求調(diào)劑
已經(jīng)有5人回復(fù)
-
一志愿南開大學(xué)0710生物學(xué)359求調(diào)劑
已經(jīng)有4人回復(fù)
-
求調(diào)劑
已經(jīng)有6人回復(fù)
-
085600材料與化工調(diào)劑
已經(jīng)有4人回復(fù)
-
327求調(diào)劑
已經(jīng)有4人回復(fù)
» 本主題相關(guān)價值貼推薦，對您同樣有幫助:
- Matlab讀取多個文件中某一列的最大值然后輸出到一個txt中
已經(jīng)有8人回復(fù)
- Fortran輸出二進(jìn)制數(shù)據(jù)，用matlab讀出，結(jié)果出錯，求助問題何在？
已經(jīng)有4人回復(fù)
- 用fortran怎么讀.CSV文件
已經(jīng)有11人回復(fù)
- 一下的數(shù)據(jù)如何通過C++讀取
已經(jīng)有20人回復(fù)
- fortran文件操作，接著寫不覆蓋
已經(jīng)有3人回復(fù)
- FORTRAN中如何實(shí)現(xiàn)重復(fù)讀取一行？
已經(jīng)有24人回復(fù)
- fortran，帶字符的數(shù)據(jù)讀取與存儲！
已經(jīng)有11人回復(fù)
- 求助 Matlab 讀取圖上數(shù)據(jù)點(diǎn) Data Cursor 顯示數(shù)據(jù)問題
已經(jīng)有6人回復(fù)
- FORTRAN 讀取文件數(shù)據(jù)出錯
已經(jīng)有6人回復(fù)
- 又來求助啦，fortran里使用多文件，其中的子程序文件怎么觀察參數(shù)值啊？
已經(jīng)有3人回復(fù)
- 求問fortran中”-.“數(shù)據(jù)，這種格式的數(shù)據(jù)是一個負(fù)的XX數(shù)么
已經(jīng)有5人回復(fù)
- Fortran的格式化輸入輸出問題
已經(jīng)有14人回復(fù)
- fortran兩個問題，文件中的空格，屏幕同一行覆蓋輸出
已經(jīng)有23人回復(fù)
- 【求助】如何寫FORTRAN程序?qū)崿F(xiàn)求平均最近鄰距離
已經(jīng)有34人回復(fù)
- 【求助】FORTRAN寫文件時每行開頭都多了一個空格？
已經(jīng)有6人回復(fù)
- 【討論】怎么從文件的最后一行讀數(shù)據(jù)？
已經(jīng)有4人回復(fù)
- 【求助】VB如何讀取txt文件~~
已經(jīng)有12人回復(fù)
- 【求助】fortran中怎么存儲不確定長度的數(shù)據(jù)【已完結(jié)】
已經(jīng)有6人回復(fù)
- 【求助】Fortran 如何讀取文件中特定行的內(nèi)容
已經(jīng)有16人回復(fù)
- 【求助】有關(guān)fortran進(jìn)行數(shù)值模擬
已經(jīng)有10人回復(fù)
- 【交流】Fortran語言答疑專帖
已經(jīng)有157人回復(fù)
duhb655
金蟲 (著名寫手)
- 應(yīng)助: 23 (小學(xué)生)
- 金幣: 1371.3
- 散金: 4117
- 紅花: 11
- 帖子: 1438
- 在線: 700.2小時
- 蟲號: 1123253
- 注冊: 2010-10-15
- 性別: GG
- 專業(yè): 自然地理學(xué)
9樓2014-02-09 23:52:57
jjdg
版主 (知名作家)
- 程序強(qiáng)帖: 9
- 應(yīng)助: 223 (大學(xué)生)
- 貴賓: 3.926
- 金幣: 51005.2
- 紅花: 238
- 帖子: 7227
- 在線: 474.2小時
- 蟲號: 27000
- 注冊: 2003-10-21
- 專業(yè): 藥物代謝與藥物動力學(xué)
- 管轄: 程序語言
2樓2014-02-09 10:13:53
duhb655
金蟲 (著名寫手)
- 應(yīng)助: 23 (小學(xué)生)
- 金幣: 1371.3
- 散金: 4117
- 紅花: 11
- 帖子: 1438
- 在線: 700.2小時
- 蟲號: 1123253
- 注冊: 2010-10-15
- 性別: GG
- 專業(yè): 自然地理學(xué)
3樓2014-02-09 10:25:30
snoopyzhao
至尊木蟲 (職業(yè)作家)
- 程序強(qiáng)帖: 16
- 應(yīng)助: 157 (高中生)
- 貴賓: 0.02
- 金幣: 18844.7
- 紅花: 29
- 帖子: 3803
- 在線: 1422.4小時
- 蟲號: 183750
- 注冊: 2006-02-13
- 專業(yè): 污染生態(tài)化學(xué)
【答案】應(yīng)助回帖
★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感謝參與，應(yīng)助指數(shù) +1
duhb655: 金幣+10, ★★★很有幫助 2014-02-09 23:49:27
xzhdty: 金幣+1, 謝謝參與 2014-02-10 08:48:22
jjdg: 編輯內(nèi)容 2014-02-13 11:49
感謝參與，應(yīng)助指數(shù) +1
duhb655: 金幣+10, ★★★很有幫助 2014-02-09 23:49:27
xzhdty: 金幣+1, 謝謝參與 2014-02-10 08:48:22
jjdg: 編輯內(nèi)容 2014-02-13 11:49
|
讀的并沒有錯，也是按行讀的，F(xiàn)ortran 還沒有高級到可以按列來讀入數(shù)據(jù)的 錯的在于你打印的那句話： WRITE(12,"(3f10.5)" ) A 這句話只是告訴程序把 A 這個 矩陣中的數(shù)據(jù)打出來，每行三個實(shí)數(shù) 但你要清楚的是 Fortran 內(nèi)部的矩陣存貯是列優(yōu)先的，所以，它先把第一列拿出來打印，打印完了打印第二列，再打印第三列 你要想按讀的方式打印，就要顯示地寫成循環(huán)或者使用 WRITE 支持的隱式循環(huán)…… [ Last edited by jjdg on 2014-2-13 at 11:49 ] |
4樓2014-02-09 13:21:38
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 327求調(diào)劑 +4 | 小卡不卡. 2026-03-29 | 4/200 |
|
|---|---|---|---|---|
|
|
[考研] 296求調(diào)劑 +6 | 彼岸t 2026-03-29 | 6/300 |
|
|
[考研] 化學(xué)工程085602 305分求調(diào)劑 +22 | RichLi_ 2026-03-25 | 22/1100 |
|
|
|
[考研] 一志愿：西北大學(xué)，英一數(shù)一408-284分求調(diào)劑 +4 | 12.27 2026-03-27 | 4/200 |
|
|
|
[考研] 22408 359分調(diào)劑 +4 | Qshers 2026-03-27 | 6/300 |
|
|
|
[考研] 343求調(diào)劑 +6 | 愛羈絆 2026-03-29 | 6/300 |
|
|
|
[考研] 279求調(diào)劑 +4 | 蝶舞輕繞 2026-03-29 | 4/200 |
|
|
|
[考研] 085600，專業(yè)課化工原理，321分求調(diào)劑 +5 | 大饞小子 2026-03-28 | 5/250 |
|
|
|
[考研] 0703化學(xué) +11 | 妮妮ninicgb 2026-03-27 | 11/550 |
|
|
|
[考研] 求調(diào)劑 +7 | 爭取九點(diǎn)睡 2026-03-28 | 8/400 |
|
|
|
[考研] 332求調(diào)劑 +4 | @MZB382400 2026-03-28 | 4/200 |
|
|
|
[考研] 藥學(xué)105500求調(diào)劑 +3 | Ssun。。 2026-03-28 | 3/150 |
|
|
|
[考研] 315分求調(diào)劑 +7 | 26考研上岸版26 2026-03-26 | 7/350 |
|
|
|
[考研] 打過很多競賽，085406控制工程300分，求調(diào)劑 +3 | askeladz 2026-03-26 | 3/150 |
|
|
|
[考研] 機(jī)械學(xué)碩總分317求調(diào)劑！�。�！ +4 | Acaciad 2026-03-25 | 4/200 |
|
|
|
[考研] 0854人工智能方向招收調(diào)劑 +4 | 章小魚567 2026-03-24 | 4/200 |
|
|
|
[考研] 材料調(diào)劑 +3 | iwinso 2026-03-23 | 3/150 |
|
|
|
[考研]
 材料考研調(diào)劑生
+3
|
黃粱一夢千年 2026-03-24 | 3/150 |
|
|
|
[考研] 284求調(diào)劑 +3 | yanzhixue111 2026-03-23 | 6/300 |
|
|
|
[論文投稿] 急發(fā)核心期刊論文 +3 | 賢達(dá)問津 2026-03-23 | 5/250 |
|