[問題] 找出最大的三個數值

作者: wura (.......)   2014-06-03 18:53:30
請問要怎麼找出每月最大的三個數值呢?
我目前只能用maxval找出每月最大值,無法找出最大的三個數值。
有人可以告訴我該怎麼寫程式嗎?感激不盡!
counts=1
do j=1,12*yr
do i=1,7
data2(i,j)=maxval(data1(i,counts:counts+month2(j)-1))
write (80,*) data2(i,j)
enddo
counts=counts+month2(j)
enddo
以上是我找出每月最大值的程式。
但不知道怎麼改寫成每月最大的三個數值。謝謝。
作者: wura (.......)   2014-06-04 07:00:00
有人可以幫幫我嗎?感激不盡啊!!!
作者: rex0707 (我就是我)   2014-06-04 12:27:00
如果都是正值 可以先找出最大值的位置 取值之後將該位置的值設為零 重複做三次就可以得到最大的三個值
作者: MHG (MPS model)   2014-06-04 20:21:00
樓上是一種解法...笨一點也可以每個月都抽出來作sorting...XD
作者: wura (.......)   2014-06-04 22:05:00
謝謝各位的幫忙,我已設置為零,並成功找出三個最大值了

Links booklink

Contact Us: admin [ a t ] ucptt.com