数据的提取

HeISeTH

各位老师，大家好！
有一个问题现在想请教一下各位老师，就是我现在有一列数据，一维的，两千多个数字（类型分别为1,2,3,4,5,6,7,8,9)，但是并不是所有的类型都会出现，例如：
1
1
2
1
1
1
4
4
3
3
3
3
3
……
就是现在我想写个脚本，解决几个问题：
1.怎么确定文本中出现了哪几种类型，（假如出现了1，3，5，7三种数字，那么能得到出现了1，3，5，7这几种数字）
2.，得知类型数（假如出现了1，3，5，7三种数字，那么类型数就是4）
此外，学生还有一个问题，就是像这种不知道行数的数据（这些数据行数可以数出来，但是会不同的文本会变化），我该怎么定义数组，并且将这些数据写入数组中

再次顿首感谢老师的指教！请大家不吝赐教！

HeISeTH

li913 发表于 2022-1-21 11:48
获取文件行列数，网站有文章。但是你这个可能不需要定义数组来存储，你只需要开一个9元素的数组，存储每个 ...

谢谢您！

li913

获取文件行列数，网站有文章。但是你这个可能不需要定义数组来存储，你只需要开一个9元素的数组，存储每个类型是否出现

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

integer n(9), i,j, ntype
n = 0
open(10,file=...)
do 
read(10,*,iostat=j) i
if(j/=0) exit
n(i) = 1
end do 
ntype = sum(n)

。