[第79期]按部门随机选取啦啦队队员(已总结)

cleverzhzhf

1. =INDEX(B$2:B$31,INDEX(SMALL(IF(A$2:A$31=INDEX(A$2:A$31,SMALL(IF(MATCH(A$2:A$31,A$2:A$31,)=ROW($1:$30),ROW($1:$30)),ROW()-1)),ROW($1:$30)),ROW($1:$30)),RANDBETWEEN(1,COUNTIF(A$2:A$31,INDEX(A$2:A$31,SMALL(IF(MATCH(A$2:A$31,A$2:A$31,)=ROW($1:$30),ROW($1:$30)),ROW()-1))))))

复制代码

数组公式。
目前想到的，应该是一种比较普遍的思路，回头接着考虑~~~

山桑弓

先不考虑加载项函数
=INDEX(B:B,SMALL(IF(MMULT(N(A$2:A$31=TRANSPOSE(IF(COUNTIF(D$1:D1,B$2:B$31),A$2:A$31))),ROW(2:31)^0)=0,ROW($2:$31)),ROUNDUP(RAND()*(ROWS(A$2:A$31)-SUM(COUNTIF(A$2:A$31,A$2:A$31)*COUNTIF(D$1:D1,B$2:B$31))),)))
如果怕RAND返回0，公式出错，改为
=INDEX(B:B,SMALL(IF(MMULT(N(A$2:A$31=TRANSPOSE(IF(COUNTIF(D$1:D1,B$2:B$31),A$2:A$31))),ROW(2:31)^0)=0,ROW($2:$31)),INT(RAND()*(ROWS(A$2:A$31)-SUM(COUNTIF(A$2:A$31,A$2:A$31)*COUNTIF(D$1:D1,B$2:B$31)))+1)))
如果总个数30可以直接用，不用公式ROWS求出，再略简点
=INDEX(B:B,SMALL(IF(MMULT(N(A$2:A$31=TRANSPOSE(IF(COUNTIF(D$1:D1,B$2:B$31),A$2:A$31))),ROW(2:31)^0)=0,ROW($2:$31)),INT(RAND()*(30-SUM(COUNTIF(A$2:A$31,A$2:A$31)*COUNTIF(D$1:D1,B$2:B$31)))+1)))

[ 本帖最后由 山桑弓 于 2011-8-6 18:51 编辑 ]

sunya_0529

先偷鸡占个位：

165字符，数组公式（20110802）——公式理论上符合概率分布，实则不然：

1. =INDIRECT("B"&RIGHT(INDEX(SMALL(--(MATCH($A$2:$A$31,$A$2:$A$31,0)&TEXT(ROW($A$2:$A$31),"00")),ROW($1:$30)),INDEX(RAND()*{6,5,2,2,6,3}+{1,8,14,17,20,27},ROW(A1))),2))

复制代码

190字符，数组公式（20110803）——“REPT(RAND()*10^15,2)”这里偷了一个懒，概率分布不符合要求：

1. =INDIRECT("B"&RIGHT(MAX((A$2:A$31=INDEX(A:A,LARGE((COUNTIF(OFFSET(A$1,,,ROW($1:$30)),A$2:A$31)=0)*ROW($2:$31),ROW(A1))))*(MID(REPT(RAND()*10^15,2),ROW($1:$30),1)&TEXT(ROW($2:$31),"00"))),2))

复制代码

195字符，数组公式（201100805）——概率分布基本符合要求（如附件演示）：

1. =INDIRECT("B"&RIGHT(MAX((A$2:A$31=INDEX(A:A,LARGE((COUNTIF(OFFSET(A$1,,,ROW($1:$30)),A$2:A$31)=0)*ROW($2:$31),ROW(A1))))*(MID(RAND()*10^15&RAND()*10^15,ROW($1:$30),1)&TEXT(ROW($2:$31),"00"))),2))

复制代码

附件中用VBA模拟了10000次运算后的概率分布，结果一目了然。

[ 本帖最后由 sunya_0529 于 2011-8-5 17:44 编辑 ]

wkbu

公式一：256字符（数组）部门固定、人员随机

=INDEX(B$2:B$31,SMALL(IF(A$2:A$31=INDEX(A:A,SMALL(IF(MATCH(A$2:A$31,A$2:A$31,)=ROW($1:$30),ROW($2:$31),33),ROW(A1))),ROW(A$1:A$30)),INT(RAND()*(COUNTIF(A$2:A$31,INDEX(A:A,SMALL(IF(MATCH(A$2:A$31,A$2:A$31,)=ROW($1:$30),ROW($2:$31),33),ROW(A1))))-1)+1.5)),1)

公式二：217字符（数组）部门、人员均随机

=INDEX(B$2:B$31,SMALL(IF(MMULT((A$2:A$31=TRANSPOSE(IF(COUNTIF(D$1:D1,B$2:B$31),A$2:A$31,0)))*1,1^ROW($A$2:$A$31))=0,ROW(A$1:A$30),33),INT(RAND()*(30-SUM(COUNTIF(A$2:A$31,IF(COUNTIF(D$1:D1,B$2:B$31),A$2:A$31)))))+1),1)

公式三：179字符（数组）部门、人员均随机

=INDEX(B$2:B$31,LARGE(ISNA(MATCH(A$2:A$31,IF(COUNTIF(D$1:D1,B$2:B$31),A$2:A$31),0))*ROW($1:$30),INT(RAND()*(30-SUM(COUNTIF(A$2:A$31,IF(COUNTIF(D$1:D1,B$2:B$31),A$2:A$31))))+1)),1)

公式四：168字符（数组）部门、人员均随机
=OFFSET(B$1,LARGE(ISNA(MATCH(A$2:A$31,IF(COUNTIF(D$1:D1,B$2:B31),A$2:A31),0))*ROW($1:$30),INT(RAND()*(30-COUNT(MATCH(1&A$2:A31,COUNTIF(D$1:D1,B$2:B31)&A$2:A31,)))+1)),)

[ 本帖最后由 wkbu 于 2011-8-11 14:53 编辑 ]

绿玉人

=INDEX(B:B,LARGE((A$2:A$31=INDEX(A:A,LARGE((MATCH(A$2:A$31,A$2:A$31,)=ROW($1:$30))*ROW($2:$31),ROW(A1))))*ROW($2:$31),INT(RAND()*COUNTIF(A:A,INDEX(A:A,LARGE((MATCH(A$2:A$31,A$2:A$31,)=ROW($1:$30))*ROW($2:$31),ROW(A1))))+1)))

huoxieshen

改成这样先，到时再想想，能精简不，唉：

1. =INDEX(B:B,LARGE((A$2:A$31=INDEX(A:A,SMALL(IF(FREQUENCY(MATCH(A$2:A$31,A$2:A$31,),MATCH(A$2:A$31,A$2:A$31,)),ROW(A$2:A$31),4^8),ROW(1:1))))*ROW(A$2:A$31),INT(RAND()*COUNTIF(A$2:A$31,OFFSET(A$1,SMALL(IF(MATCH(A$2:A$31,A$2:A$31,)=ROW(A$2:A$31)-1,ROW(A$1:A$30)),ROW(1:1)),)))+1))

复制代码

[ 本帖最后由 huoxieshen 于 2011-8-7 08:35 编辑 ]

xinzijin2006

试一下
=INDEX(B$2:B$31,LARGE(IF(A$2:A$31=INDEX(A$2:A$31,SMALL(IF((MATCH(A$2:A$31,A$2:A$31,)=ROW($1:$30)),ROW($1:$30),9^9),ROW(A1))),ROW($1:$30),-9^9),INT(RAND()*(SUM(--(A$2:A$31=INDEX(A:A,SMALL(IF(MATCH(A$2:A$31,A$2:A$31,)=ROW($1:$30),ROW($2:$31),9^9),ROW(A1))))))+1)))
修改
=INDEX(B$2:B$31,LARGE(IF(A$2:A$31=INDEX(A:A,SMALL(IF((MATCH(A$2:A$31,A$2:A$31,)=ROW($1:$30)),ROW($2:$31),9^9),ROW(A1))),ROW($1:$30),-9^9),INT(RAND()*(SUM(--(A$2:A$31=INDEX(A:A,SMALL(IF(MATCH(A$2:A$31,A$2:A$31,)=ROW($1:$30),ROW($2:$31),9^9),ROW(A1))))))+1)))

[ 本帖最后由 xinzijin2006 于 2011-8-9 09:24 编辑 ]

bywl2009

看看你的答案

Zaezhong

开始思路刚好是170

1. =INDEX(B:B,LARGE(ISNA(MATCH(A$2:A$31,T(OFFSET(A$1,MATCH(D$1:D1,B:B,)-1,)),))*ROW($2:$31),INT(1+RAND()*(30-COUNT(MATCH(A$2:A$31,T(OFFSET(A$1,MATCH(D$1:D1,B:B,)-1,)),))))))

复制代码

简化一下162字符，但是不知道效率是否有提升

1. =INDEX(B:B,LARGE(ISNA(MATCH(A$2:A$31,IF(COUNTIF(D$1:D1,B$2:B$31),A$2:A$31),))*ROW($2:$31),INT(RAND()*(30-SUM(COUNTIF(D$1:D1,B$2:B$31)*COUNTIF(A:A,A$2:A$31)))+1)))

复制代码

wangg913

升级导致楼主可见失效，明天看看情况.

题目结束，请参赛者勿再修改；请楼主做出总结、汇总评分。