 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 5 | 1/1 | 返回列表 |
| 查看: 1280 | 回復(fù): 4 | |||
astringent銅蟲 (著名寫手)
|
[交流]
【求助】如何提取TXT中某列的數(shù)據(jù)存入一個(gè)數(shù)組，再對(duì)數(shù)組做處理 已有4人參與
|
|
我的數(shù)據(jù)存在aaa.txt文件中。對(duì)于上面的數(shù)據(jù)，第二列是步數(shù)（step），第三列是每步的可能取值。我想將這些數(shù)據(jù)讀入，并保存在數(shù)組H（io，istep）中。io可以取從1到30000但是只有當(dāng)io取文件中第二列對(duì)應(yīng)的值時(shí)H（io，istep）=1，取其他值均為0.也就是說(shuō)當(dāng)step=1時(shí)，io取15733，18193，20251時(shí)H的值為1，取其他值都為0，當(dāng)step=2時(shí)，io取15733，20251時(shí)H的值為1，取其他值都為0。我應(yīng)該怎樣實(shí)現(xiàn)呢，我想了好久還是沒(méi)想出來(lái)。請(qǐng)大家?guī)臀蚁胂朕k法，先謝謝了。 1 15733 1 18193 1 20251 2 15733 2 20251 3 20824 4 15733 4 16159 4 18193 4 20251 4 20824 5 16159 5 18193 5 20251 5 20824 6 15733 6 20251 6 20824 7 15733 7 20251 7 20824 8 15733 8 16159 8 18193 8 20251 9 18193 9 20251 10 9490 10 16159 10 20251 |
回復(fù)此樓» 猜你喜歡
能源材料化學(xué)課題組招收碩士研究生8-10名
已經(jīng)有6人回復(fù)
-
296求調(diào)劑
已經(jīng)有5人回復(fù)
-
0703化學(xué)調(diào)劑 ，六級(jí)已過(guò)，有科研經(jīng)歷
已經(jīng)有8人回復(fù)
-
268求調(diào)劑
已經(jīng)有8人回復(fù)
-
材料，紡織，生物（0856、0710），化學(xué)招生啦
已經(jīng)有7人回復(fù)
-
301求調(diào)劑
已經(jīng)有5人回復(fù)
-
281求調(diào)劑（0805）
已經(jīng)有7人回復(fù)
-
材料與化工求調(diào)劑
已經(jīng)有6人回復(fù)
-
299求調(diào)劑
已經(jīng)有4人回復(fù)
-
277調(diào)劑
已經(jīng)有6人回復(fù)
» 本主題相關(guān)價(jià)值貼推薦，對(duì)您同樣有幫助:
- 使用PGI編譯VASP中無(wú)法使用長(zhǎng)數(shù)組
已經(jīng)有5人回復(fù)
- 怎樣將for循環(huán)的結(jié)果存入數(shù)組
已經(jīng)有6人回復(fù)
- 請(qǐng)教一個(gè)應(yīng)用read時(shí)出現(xiàn)數(shù)組越界的問(wèn)題，謝謝
已經(jīng)有7人回復(fù)
- 簡(jiǎn)單數(shù)組最值求解-謝謝
已經(jīng)有4人回復(fù)
- 怎么把從鍵盤輸入的多個(gè)字符串分別賦值給字符串?dāng)?shù)組的一個(gè)個(gè)元素？
已經(jīng)有6人回復(fù)
- 三維數(shù)組換行輸入到文件（intel fortran 編譯器）
已經(jīng)有6人回復(fù)
- 關(guān)于c語(yǔ)言的一個(gè)小問(wèn)題 坐等回復(fù)啊 急啊 是關(guān)于建立數(shù)組的
已經(jīng)有9人回復(fù)
- 從txt文件讀數(shù)據(jù)到二維數(shù)組
已經(jīng)有4人回復(fù)
- 【求助】請(qǐng)問(wèn)一個(gè)數(shù)組問(wèn)題
已經(jīng)有3人回復(fù)
- 【求助】C# 中如何聲明結(jié)構(gòu)體數(shù)組并賦值
已經(jīng)有13人回復(fù)
- 【求助】一個(gè)求數(shù)組絕對(duì)值的小問(wèn)題
已經(jīng)有7人回復(fù)
- 【求助】大家?guī)兔纯磾?shù)組存值和引用
已經(jīng)有5人回復(fù)
- 【求助】module里面能夠讓數(shù)組從外部接受一些數(shù)據(jù)嗎？【已完結(jié)】
已經(jīng)有8人回復(fù)
- 【求助】ANSYS定義數(shù)組時(shí)，如何從TXT文件中導(dǎo)入？
已經(jīng)有7人回復(fù)
2樓2010-12-02 07:19:18
piduil
銅蟲 (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 37
- 帖子: 18
- 在線: 52.9小時(shí)
- 蟲號(hào): 1033449
- 注冊(cè): 2010-06-01
- 專業(yè): 理論和計(jì)算化學(xué)
★ ★ ★ ★
小木蟲(金幣+0.5):給個(gè)紅包，謝謝回帖交流
余澤成(金幣+3):謝謝參與應(yīng)助！ 2010-12-06 15:18:15
小木蟲(金幣+0.5):給個(gè)紅包，謝謝回帖交流
余澤成(金幣+3):謝謝參與應(yīng)助！ 2010-12-06 15:18:15
|
program example implicit none integer,parameter :: max_step=10,max_data=10 integer :: test(max_data,max_step)=0,H(30000)=0,counter(max_step)=0 integer :: istep,idata open(unit=8,file="aaa.txt",status="old"  1 read(8,*,end=2) istep,idata ! write(*,*) istep,idata H(idata)=1 counter(istep)=counter(istep)+1 test(counter(istep),istep)=idata goto 1 2 close(8) end program example [ Last edited by piduil on 2010-12-2 at 09:41 ] |
3樓2010-12-02 09:37:27
maomao1210
金蟲 (正式寫手)
- 程序強(qiáng)帖: 5
- 應(yīng)助: 2 (幼兒園)
- 金幣: 1432.8
- 散金: 242
- 紅花: 16
- 沙發(fā): 1
- 帖子: 991
- 在線: 442.1小時(shí)
- 蟲號(hào): 253215
- 注冊(cè): 2006-05-20
- 性別: MM
- 專業(yè): 考古理論
4樓2010-12-02 10:05:39
astringent
銅蟲 (著名寫手)
- 應(yīng)助: 16 (小學(xué)生)
- 金幣: 2210.7
- 散金: 1233
- 紅花: 4
- 帖子: 1180
- 在線: 354.8小時(shí)
- 蟲號(hào): 900839
- 注冊(cè): 2009-11-12
- 專業(yè): 理論和計(jì)算化學(xué)
5樓2010-12-03 02:57:41
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 astringent 的主題更新
| 5 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 能源材料化學(xué)課題組招收碩士研究生8-10名 +3 | 脫穎而出 2026-03-16 | 6/300 |
|
|---|---|---|---|---|
|
|
[考研] 材料工程專碩調(diào)劑 +5 | 204818@lcx 2026-03-17 | 5/250 |
|
|
[考研] 302求調(diào)劑 +9 | 負(fù)心者當(dāng)誅 2026-03-11 | 9/450 |
|
|
|
[考研] 化學(xué)工程321分求調(diào)劑 +11 | 大米飯！ 2026-03-15 | 14/700 |
|
|
|
[考研] 材料專碩326求調(diào)劑 +6 | 墨煜姒莘 2026-03-15 | 7/350 |
|
|
|
[考研] 有沒(méi)有道鐵/土木的想調(diào)劑南林，給自己招師弟中～ +3 | TqlXswl 2026-03-16 | 7/350 |
|
|
|
[考研] 085600材料與化工 +4 | 安全上岸！ 2026-03-16 | 4/200 |
|
|
|
[考研] 070300化學(xué)學(xué)碩求調(diào)劑 +6 | 太想進(jìn)步了0608 2026-03-16 | 6/300 |
|
|
|
[教師之家] 焦慮 +7 | 水冰月月野兔 2026-03-13 | 9/450 |
|
|
|
[考研] 0856專碩279求調(diào)劑 +5 | 加油加油！? 2026-03-15 | 5/250 |
|
|
|
[考研] 22408總分284求調(diào)劑 +3 | InAspic 2026-03-13 | 3/150 |
|
|
|
[考研] 材料080500調(diào)劑求收留 +3 | 一顆meteor 2026-03-13 | 3/150 |
|
|
|
[考研] 285 求調(diào)劑 資源與環(huán)境 一志愿北京化工大學(xué) +3 | 未名考生 2026-03-10 | 3/150 |
|
|
|
[考研] 332求調(diào)劑 +3 | zjy101327 2026-03-11 | 6/300 |
|
|
|
[考研] ［0860］321分求調(diào)劑，ab區(qū)皆可 +4 | 寶貴熱 2026-03-13 | 4/200 |
|
|
|
[考研] 0703化學(xué)一志愿211 總分320求調(diào)劑 +5 | 瑪卡巴卡啊哈 2026-03-11 | 5/250 |
|
|
|
[考研] 材料與化工085600調(diào)劑求老師收留 +9 | jiaanl 2026-03-11 | 9/450 |
|
|
|
[考研] 求b區(qū)學(xué)校調(diào)劑 +3 | 周56 2026-03-11 | 3/150 |
|
|
|
[考研] 工科材料085601 279求調(diào)劑 +8 | 困于星晨 2026-03-12 | 10/500 |
|
|
|
[考研] 大連大學(xué)化學(xué)專業(yè)研究生調(diào)劑 +3 | 琪久. 2026-03-10 | 8/400 |
|