本帖最后由 li913 于 2015-3-8 09:30 编辑
1、如果统计区间是等间距的,可用如下代码[Fortran] 纯文本查看 复制代码 program test
real a(1000) !假设有1000个数据
integer i, j, num(7) !假设7个统计区间[0,2),[2,4),[4,6),[6,8),[8,10),[10,12),[12,14)
open(10,file='1.txt')
num = 0
do i = 1, 1000
read(10,*) a(i)
j = a(i)/2.0 + 1
num(j) = num(j) + 1
end do
end program
2、如果统计区间不是等间距,且区间个数较多,应先对数据进行排序,然后统计各区间数据量。
|