Fortran Coder

标题: 找矩陣中的index [打印本页]

作者: komexxx 时间: 2014-10-7 13:43
标题: 找矩陣中的index
大家好
有個找位置的問題要請教大家
我有兩筆數據,一是真實的排序
另一個是數據庫。
範例如下：
(1)真實排序（1到5,由上而下為排名）
   1
   2
   3
   4
   5
(2)數據庫(有很多組1~5排序,用0分隔)
   0
   5
   1
   4
   3
   2
　  0
   5
   4
   2
   3
   1
   0
   4
   3
   1
   5
   2
   .
   .
   .
我想要數據庫中每一組排序與真實的排序做比較,
找真實排序中每個數字在數據庫中每一組所在的位置並存成矩陣。
例如：真實排序中第一名為數字１，而在數據庫中第一組數字１是
第二名,第二組為第五名,第三組為第3名。
以此類推，每個真實抬續中的數字都要找到位置
謝謝各位大大

作者: 楚香饭 时间: 2014-10-7 14:57
给你个简单的例子吧。剩下的你自己循环，构建矩阵

[Fortran] 纯文本查看 复制代码

Program www_fcode_cn

  Implicit none

  Integer :: a = 1 , loca(1) = 0

  Integer :: b(5) = (/5,3,4,1,2/)

  loca = minloc( b , mask=(b==a) )

  write(*,*) loca

End Program www_fcode_cn

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)