数组去重比较

明天自然醒

数组去重复.zip (1.18 MB, 下载次数: 123)

2023-1-31 14:51 上传

点击文件名下载附件

去重测试：文本型，20%纯文字，40%纯数字，40%纯字母，测试数量2w
（调试环境下，速度慢。编译后，速度大大提升）




去重测试：1000万整数型。上个帖子用时139ms，哈希表asm 203.25ms
https://bbs.125.la/forum.php?mod=viewthread&tid=14762149&extra=

明天自然醒

搞错了，还是原来的快

  

子程序名	返回值类型	公开	备 注
数组_去重复_整数型5	整数型		返回剩余不重复数组的成员数量
参数名	类 型	参考	可空	数组	备 注
整数数组	整数型				要去重复的 整数数组

变量名	类 型	静态	数组	备 注
i	整数型
局_参考空间	逻辑型		0	空间
局_最大值	整数型
局_最小值	整数型
数组长度	整数型
a	整数型
参数1	双精度小数型

' 不需要用长整数，易语言数组容量应该超不过整数型极限2147483648
如果真 (取数组成员数 (整数数组) ＝ 0)
返回 (0)

连续赋值 (整数数组 [1], 局_最大值, 局_最小值)
变量循环首 (2, 取数组成员数 (整数数组), 1, i)
如果 (整数数组 [i] ＞ 局_最大值)
局_最大值 ＝ 整数数组 [i]
如果真 (整数数组 [i] ＜ 局_最小值)
局_最小值 ＝ 整数数组 [i]


变量循环尾 ()
数组长度 ＝ 局_最大值 － 局_最小值 ＋ 1
参数1 ＝ 局_最小值 － 1
' 开辟空间
重定义数组 (局_参考空间, 假, 数组长度)
计次循环首 (取数组成员数 (整数数组), i)
如果真 (局_参考空间 [整数数组 [i] － 参数1] ＝ 假)
局_参考空间 [ASM_减 (整数数组 [i], 参数1)] ＝ 真

计次循环尾 ()
计次循环首 (取数组成员数 (局_参考空间), i)
如果真 (局_参考空间 [i])
a ＝ ASM_加 (a, 1)
整数数组 [a] ＝ ASM_加 (i, 参数1)

计次循环尾 ()
重定义数组 (整数数组, 真, a)
返回 (a)

.版本 2<br /> <br /> .子程序 数组_去重复_整数型5, 整数型, 公开, 返回剩余不重复数组的成员数量<br /> .参数 整数数组, 整数型, 数组, 要去重复的 整数数组<br /> .局部变量 i, 整数型<br /> .局部变量 局_参考空间, 逻辑型, , "0", 空间<br /> .局部变量 局_最大值, 整数型<br /> .局部变量 局_最小值, 整数型<br /> .局部变量 数组长度, 整数型<br /> .局部变量 a, 整数型<br /> .局部变量 参数1, 双精度小数型<br /> <br /> ' 不需要用长整数，易语言数组容量应该超不过整数型极限2147483648<br /> .如果真 (取数组成员数 (整数数组) ＝ 0)<br />     返回 (0)<br /> .如果真结束<br /> <br /> 连续赋值 (整数数组 [1], 局_最大值, 局_最小值)<br /> .变量循环首 (2, 取数组成员数 (整数数组), 1, i)<br />     .如果 (整数数组 <i> ＞ 局_最大值)<br />         局_最大值 ＝ 整数数组 <i><br />     .否则<br />         .如果真 (整数数组 <i> ＜ 局_最小值)<br />             局_最小值 ＝ 整数数组 <i><br />         .如果真结束<br /> <br />     .如果结束<br /> <br /> .变量循环尾 ()<br /> 数组长度 ＝ 局_最大值 － 局_最小值 ＋ 1<br /> 参数1 ＝ 局_最小值 － 1<br /> ' 开辟空间<br /> 重定义数组 (局_参考空间, 假, 数组长度)<br /> .计次循环首 (取数组成员数 (整数数组), i)<br />     .如果真 (局_参考空间 [整数数组 <i> － 参数1] ＝ 假)<br />         局_参考空间 [ASM_减 (整数数组 <i>, 参数1)] ＝ 真<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> .计次循环首 (取数组成员数 (局_参考空间), i)<br />     .如果真 (局_参考空间 <i>)<br />         a ＝ ASM_加 (a, 1)<br />         整数数组 [a] ＝ ASM_加 (i, 参数1)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 重定义数组 (整数数组, 真, a)<br /> 返回 (a)

xab111

来咯来咯来咯来咯来咯来咯来咯来咯来咯来咯来咯来咯来咯来咯v来咯来咯来咯来咯来咯来咯

xab111

来咯来咯来咯来咯来咯来咯来咯来咯来咯来咯来咯来咯来咯来咯

xab111

看到好多次了，赵雷好几个都不想

明天自然醒

果心豆腐酱 发表于 2023-4-16 13:41
[e=0].版本 2

.数据类型 微博信息2, 公开

看模块例程

cy5916

感谢分享

果心豆腐酱

  

数据类型名	公开	备 注
微博信息2
成员名	类 型	传址	数组	备 注
序号	字节集
文件名	字节集
ID	字节集
md5	字节集
大小	字节集
类型	字节集
修改时间	字节集

.版本 2<br /> <br /> .数据类型 微博信息2, 公开<br />     .成员 序号, 字节集<br />     .成员 文件名, 字节集<br />     .成员 ID, 字节集<br />     .成员 md5, 字节集<br />     .成员 大小, 字节集<br />     .成员 类型, 字节集<br />     .成员 修改时间, 字节集

这个类型的数组，怎么去重啊？用常规的需要90秒，

.版本 2

.数据类型 微博信息, 公开
    .成员 序号, 文本型
    .成员 文件名, 文本型
    .成员 ID, 文本型
    .成员 md5, 文本型
    .成员 大小, 文本型
    .成员 类型, 文本型
    .成员 修改时间, 文本型


这种类型需要26秒。


如果用哈希，该怎么使用啊

weihua2018

我下载了2次啊

miku2033

支持开源~！感谢分享

yangdoudou

谢谢分享