 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 5 | 1/1 | 返回列表 |
| 查看: 1292 | 回復(fù): 4 | |||
| 當前只顯示滿足指定條件的回帖，點擊這里查看本話題的所有回帖 | |||
astringent銅蟲 (著名寫手)
|
[交流]
【求助】如何提取TXT中某列的數(shù)據(jù)存入一個數(shù)組，再對數(shù)組做處理 已有4人參與
|
||
|
我的數(shù)據(jù)存在aaa.txt文件中。對于上面的數(shù)據(jù)，第二列是步數(shù)（step），第三列是每步的可能取值。我想將這些數(shù)據(jù)讀入，并保存在數(shù)組H（io，istep）中。io可以取從1到30000但是只有當io取文件中第二列對應(yīng)的值時H（io，istep）=1，取其他值均為0.也就是說當step=1時，io取15733，18193，20251時H的值為1，取其他值都為0，當step=2時，io取15733，20251時H的值為1，取其他值都為0。我應(yīng)該怎樣實現(xiàn)呢，我想了好久還是沒想出來。請大家?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ù)此樓» 猜你喜歡
284求調(diào)劑
已經(jīng)有10人回復(fù)
-
一志愿山東大學(xué)藥學(xué)學(xué)碩求調(diào)劑
已經(jīng)有4人回復(fù)
-
07化學(xué)280分求調(diào)劑
已經(jīng)有4人回復(fù)
-
298-一志愿中國農(nóng)業(yè)大學(xué)-求調(diào)劑
已經(jīng)有12人回復(fù)
-
求材料，環(huán)境專業(yè)調(diào)劑
已經(jīng)有3人回復(fù)
-
335求調(diào)劑
已經(jīng)有5人回復(fù)
-
求調(diào)劑
已經(jīng)有7人回復(fù)
-
一志愿吉大化學(xué)322求調(diào)劑
已經(jīng)有4人回復(fù)
-
環(huán)境學(xué)碩288求調(diào)劑
已經(jīng)有8人回復(fù)
-
341求調(diào)劑(一志愿湖南大學(xué)070300)
已經(jīng)有6人回復(fù)
» 本主題相關(guān)價值貼推薦，對您同樣有幫助:
- 使用PGI編譯VASP中無法使用長數(shù)組
已經(jīng)有5人回復(fù)
- 怎樣將for循環(huán)的結(jié)果存入數(shù)組
已經(jīng)有6人回復(fù)
- 請教一個應(yīng)用read時出現(xiàn)數(shù)組越界的問題，謝謝
已經(jīng)有7人回復(fù)
- 簡單數(shù)組最值求解-謝謝
已經(jīng)有4人回復(fù)
- 怎么把從鍵盤輸入的多個字符串分別賦值給字符串數(shù)組的一個個元素？
已經(jīng)有6人回復(fù)
- 三維數(shù)組換行輸入到文件（intel fortran 編譯器）
已經(jīng)有6人回復(fù)
- 關(guān)于c語言的一個小問題 坐等回復(fù)啊 急啊 是關(guān)于建立數(shù)組的
已經(jīng)有9人回復(fù)
- 從txt文件讀數(shù)據(jù)到二維數(shù)組
已經(jīng)有4人回復(fù)
- 【求助】請問一個數(shù)組問題
已經(jīng)有3人回復(fù)
- 【求助】C# 中如何聲明結(jié)構(gòu)體數(shù)組并賦值
已經(jīng)有13人回復(fù)
- 【求助】一個求數(shù)組絕對值的小問題
已經(jīng)有7人回復(fù)
- 【求助】大家?guī)兔纯磾?shù)組存值和引用
已經(jīng)有5人回復(fù)
- 【求助】module里面能夠讓數(shù)組從外部接受一些數(shù)據(jù)嗎？【已完結(jié)】
已經(jīng)有8人回復(fù)
- 【求助】ANSYS定義數(shù)組時，如何從TXT文件中導(dǎo)入？
已經(jīng)有7人回復(fù)
maomao1210
金蟲 (正式寫手)
- 程序強帖: 5
- 應(yīng)助: 2 (幼兒園)
- 金幣: 1432.8
- 散金: 242
- 紅花: 16
- 沙發(fā): 1
- 帖子: 991
- 在線: 442.1小時
- 蟲號: 253215
- 注冊: 2006-05-20
- 性別: MM
- 專業(yè): 考古理論
4樓2010-12-02 10:05:39
2樓2010-12-02 07:19:18
piduil
銅蟲 (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 37
- 帖子: 18
- 在線: 52.9小時
- 蟲號: 1033449
- 注冊: 2010-06-01
- 專業(yè): 理論和計算化學(xué)
★ ★ ★ ★
小木蟲(金幣+0.5):給個紅包，謝謝回帖交流
余澤成(金幣+3):謝謝參與應(yīng)助！ 2010-12-06 15:18:15
小木蟲(金幣+0.5):給個紅包，謝謝回帖交流
余澤成(金幣+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
astringent
銅蟲 (著名寫手)
- 應(yīng)助: 16 (小學(xué)生)
- 金幣: 2210.7
- 散金: 1233
- 紅花: 4
- 帖子: 1180
- 在線: 354.8小時
- 蟲號: 900839
- 注冊: 2009-11-12
- 專業(yè): 理論和計算化學(xué)
5樓2010-12-03 02:57:41
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 材料/農(nóng)業(yè)專業(yè)，07/08開頭均可，過線就行 +3 | 呵唔哦豁 2026-03-23 | 4/200 |
|
|---|---|---|---|---|
|
|
[考研] 0703化學(xué)求調(diào)劑 +4 | 奶油草莓. 2026-03-22 | 5/250 |
|
|
|
[考研] 291 求調(diào)劑 +4 | 化工2026屆畢業(yè)?/a> 2026-03-21 | 5/250 |
|
|
|
[考研] 求老師收我 +3 | zzh16938784 2026-03-23 | 3/150 |
|
|
[考研] 333求調(diào)劑 +6 | 87639 2026-03-21 | 10/500 |
|
|
|
[考研] 08工科 320總分 求調(diào)劑 +11 | 梨花珞晚風 2026-03-17 | 11/550 |
|
|
|
[考研] 287求調(diào)劑 +8 | 晨昏線與星海 2026-03-19 | 9/450 |
|
|
|
[考研] 275求調(diào)劑 +6 | shansx 2026-03-22 | 8/400 |
|
|
|
[考研] 303求調(diào)劑 +5 | 安憶靈 2026-03-22 | 6/300 |
|
|
|
[考研] 求調(diào)劑 +7 | Auroracx 2026-03-22 | 7/350 |
|
|
|
[考研] 化學(xué)調(diào)劑 +5 | yzysaa 2026-03-21 | 5/250 |
|
|
|
[考研] 材料求調(diào)劑 +5 | @taotao 2026-03-21 | 5/250 |
|
|
|
[考研] 297求調(diào)劑 +3 | 喜歡還是不甘心 2026-03-20 | 3/150 |
|
|
|
[考研] 材料學(xué)碩333求調(diào)劑 +3 | 北道巷 2026-03-18 | 3/150 |
|
|
|
[考研] 313求調(diào)劑 +4 | 肆叁貳壹22 2026-03-19 | 4/200 |
|
|
|
[考研] 330求調(diào)劑0854 +3 | assdll 2026-03-21 | 3/150 |
|
|
|
[考研] 265求調(diào)劑 +3 | Jack?k?y 2026-03-17 | 3/150 |
|
|
|
[考研] 一志愿武漢理工材料工程專碩調(diào)劑 +9 | Doleres 2026-03-19 | 9/450 |
|
|
|
[考研] 求調(diào)劑一志愿南京航空航天大學(xué)289分 +3 | @taotao 2026-03-19 | 3/150 |
|
|
|
[考研] 本科鄭州大學(xué)物理學(xué)院，一志愿華科070200學(xué)碩，346求調(diào)劑 +4 | 我不是一根蔥 2026-03-18 | 4/200 |
|