如何求众数?(出现频率最高的数)

wuyaobin 2003-07-02 06:39:58

例如我有一个数组A=[33,34,33,36,33,38,33,58,33]
如何求出33这个数呢?数组比较大,要求较快的算法.

...全文

1654 26 打赏收藏转发到动态举报

写回复

用AI写文章

26 条回复

切换为时间正序

请发表友善的回复…

发表回复

azure711 2003-07-12

打赏
举报

同意用散列法

ZhangYv 2003-07-12

打赏
举报

9494...依照数据的特殊性(大小,范围等)可以设计出O(n)的算法,如果需要一个通用的算法,是需要O(nlogn).

eion 2003-07-11

打赏
举报

我有一法：

作一个Hash表，先添Hash表，然后再分析冲突最多的数据

当然，Hash表要选择好，或者几个Hash表，再分析

ZhangYv 2003-07-11

打赏
举报

还有就上面的 happy__888([顾问团]寻开心) 和 BlueSky2008() 的方法也可以到O(N),排序算法最快是线性排序,只有比较类的排序最快才是O(nlogn).当N上万时候,随机算法的效率要高于普通的O(n)算法.

ZhangYv 2003-07-11

打赏
举报

还有就上面的 happy__888([顾问团]寻开心) 和 BlueSky2008() 的方法也可以到O(N),排序算法最快是线性排序,只有比较类的排序最快才是O(nlongn)

ZhangYv 2003-07-11

打赏
举报

to aliceZOOZ(alice):
请参阅<<计算机算法设计与分析>>,王晓东编著,7.5章节蒙特卡罗(Monte Carlo)算法主元素问题.当N非常大时候,使用随机算法是必要的.

aliceZOOZ 2003-07-11

打赏
举报

老大，散列的复杂度与散列的大小有关，与冲突的可能也有关；
这道题目，你选择哪种排序算法是“合适的线性”的？

ZhangYv 2003-07-11

打赏
举报

ft...反正至少有3种O(n)的方法:
1. 选择一种合适的线性排序算法
2. 用散列法
3. 随机算法

aliceZOOZ 2003-07-11

打赏
举报

我记得基数排序算法的复杂度是O(N*B)，B是字长，
B可以等于logN，如果数都不相同的话，
而且B也可能大于logN，当然也可能小于logN；

aliceZOOZ 2003-07-11

打赏
举报

To ZhangYv(我要数学ing)
BlueSky2008() 说得好如果数值在一定是范围内

happy__888([顾问团]寻开心) 的方法第一种要求如果数是有范围的，而且范围比较小，
第二种方法要用平衡二叉树，而且建树复杂度也是O(nlogn)

再说，排序算法最快是线性排序，这个是有前提的，而这道题目来说并不满足；

至于王晓东的书，我没看过，不作评论

kbsoft 2003-07-11

打赏
举报

eion好久不见:)

aliceZOOZ 2003-07-10

打赏
举报

求众数有O(N)的算法吗?愿闻其祥

aliceZOOZ 2003-07-10

打赏
举报

ft...这样的题目居然用随机算法，不知道是怎么想的；
而且最笨的统计居然是O(N)？排序是O(logN)，还可以从O(logN)“降”到O(N)...

ZhangYv 2003-07-09

打赏
举报

排序是可以的,但效率是O(logn)略低.如果采用用空间换时间可以到O(n),用我所说的近似算法对于N很大(>10000)还可以更快...

wuyaobin 2003-07-09

打赏
举报

下面是我实现的具体算法：(用Pascal)

//求众数
function Most(var a: array of Integer): Integer;
//快速排序
procedure QuickSort(var a: array of Integer; iLo, iHi: Integer);
var
Lo, Hi, Mid, T: Integer;
begin
Lo:=iLo;
Hi:=iHi;
Mid:=a[(Lo+Hi)div 2];
repeat
while a[Lo]<Mid do
Inc(Lo);
while a[Hi]>Mid do
Dec(Hi);
if Lo<=Hi then begin
T:=a[Lo];
a[Lo]:=a[Hi];
a[Hi]:=T;
Inc(Lo);
Dec(Hi);
end;
until Lo>Hi;
if Hi>iLo then
QuickSort(a, iLo, Hi);
if Lo<iHi then
QuickSort(a, Lo, iHi);
end;
var
i, PreNum, PreCount, CurNum, CurCount: Integer;
begin
QuickSort(a, low(a), high(a));
PreNum:=-1;
PreCount:=-1;
CurNum:=-1;
CurCount:=-1;
for i:=low(a)to high(a) do begin
if CurNum=a[i] then begin
Inc(CurCount);
end
else begin
if CurCount>PreCount then begin
PreNum:=CurNum;
PreCount:=CurCount;
end;
CurNum:=a[i];
CurCount:=0;
Inc(CurCount);
end;
end;
if CurCount>PreCount then
Result:=CurNum
else
Result:=PreNum;
end;
//若有错误，请帮忙修改，谢谢！

ZhangYv 2003-07-06