[开_159]排名统计（已总结）

满坛皆为吾师

一、题目说明：
      1. 上图为某集团在各国1-12月的销售额，月销售额区间[0,999999]整数。
      2. 要求按照将1-12月销售总额降序排列销售区域并统计对应的销售总额。
      3. 销售总额相同情况下，销售区域可随意排序，总额文本数值格式均可。

二、答题要求：
      1. 一条公式完成，答案请用代码模式提交（非代码模式不予评分）。
      2. B2:M8区域只能引用一次。
      3. 答题区域为P2:Q8单元格。
      4. 禁止占楼，一人一层。

三、评分规则：
      1. 2013及以下版本，公式正确且字符数最少评为最优解。
      2. 最优解技术分+2，字符数<=最优解字符数*1.23 技术分+1。（众坛友要求适当增大系数，原*1.15）
      3. 主体使用M365版本函数公式正确且字符数最少，技术分+1。（本期禁用SORT/SORTBY/LET三个函数）

四、题外闲话：
      1. 本题类似论坛可见，数值放大，当是老瓶新酒。
      2. M365版本排序47字符，未起到思考练习的作用。

五、竞赛日期：
      2023-4-25至2023-5-20

[开_159]排名统计.rar (11.32 KB, 下载次数: 346) 2023-4-25 18:08 上传 点击文件名下载附件

本期题目采纳自坛友：静听溪流

tchh666

1. =TEXT(TEXT(TEXT(TEXT(RIGHT(LARGE(MMULT(B2:M8,Z1:Z12+1)+ROW()%,ROW()-1),{1,19}),"[=2]俄罗斯;[=3]中国;0%"),"[=4]英国;[=5]加拿大;0%"),"[=6]澳大利亚;[=7]美国;0%"),"[=8]日本;0")

复制代码

区域数组

1. =MAP(INT(RIGHT(LARGE(MMULT(B2:M8,Z1:Z12+1)+ROW()%,ROW()-1),{1,19})),LAMBDA(X,IF(X<9,INDEX(A:A,X),X)))

复制代码

1. =MAP(RIGHT(LARGE(MMULT(B2:M8,Z1:Z12+1)+ROW()%,ROW()-1),{1,19}),LAMBDA(X,IF(MOD(X,1),INT(X),INDEX(A:A,X))))

复制代码

1. =TEXT({1,0},MAP(LARGE(MMULT(B2:M8,Z1:Z12+1)+ROW()%,ROW()-1),LAMBDA(X,INDEX(A:A,RIGHT(X))&";;"&INT(X))))

复制代码

楼兰城主TT

2003版本121字符

1. =TEXT({-1,1}%,VLOOKUP("*;*",SUBSTITUTE(LARGE(MMULT(B$2:M$8,N1:N12+1)+ROW($1:$7)%,ROW(A1)),".0"&ROW($1:7),";"&A$2:A8),1,))

复制代码

2016版本121字符

1. =TEXT({-1,1}%,CONCAT(TEXT(SUBSTITUTE(LARGE(MMULT(B$2:M$8,N1:N12+1)+ROW($1:$7)%,ROW(A1)),".0"&ROW($1:7),";"&A$2:A8),";")))

复制代码

365版本91字符

1. =LAMBDA(x,y,HSTACK(XLOOKUP(LARGE(y,x),y,A2:A8),LARGE(y,x)))(ROW(1:7),MMULT(B2:M8,N1:N12+1))

复制代码

365版本94字符

1. =LAMBDA(x,HSTACK(INDEX(A:A,RIGHT(x)),INT(x)))(LARGE(MMULT(B2:M8,N1:N12+1)+ROW(2:8)%,ROW(1:7)))

复制代码

365版本108字符

1. =TEXT({1,-1}%,MAP(LARGE(MMULT(B2:M8,N1:N12+1)+ROW(2:8)%,ROW(1:7)),LAMBDA(x,INDEX(A:A,RIGHT(x))&";"&INT(x))))

复制代码

365版本124字符

1. =DROP(REDUCE(0,SMALL(MMULT(B2:M8,N1:N12+1)+ROW(2:8)%,ROW(1:7)),LAMBDA(x,y,VSTACK(HSTACK(INDEX(A:A,RIGHT(y)),INT(y)),x))),-1)

复制代码

陆离Lowry

先交个365版区域数组101，存在理论bug，单行和不超过9有问题，但是概率上100万次测试通过

1. =MAP(INT(RIGHT(LARGE(MMULT(B2:M8,Z1:Z12+1)+ROW()%,ROW()-1),{1,19})),LAMBDA(X,IF(X<9,INDEX(A:A,X),X)))

复制代码

求和+9修正bug,105

1. =MAP(INT(RIGHT(LARGE(MMULT(B2:M8,Z1:Z12+1)+9+ROW()%,ROW()-1),{1,19})),LAMBDA(X,IF(X<9,INDEX(A:A,X),X-9)))

复制代码

低版P2:Q2区域数组，121。。

1. =VLOOKUP("??*",TEXT(RIGHT(LARGE(MMULT(B$2:M$8,Z1:Z12+1)+ROW($2:$8)%,ROW(A1)),{1,19})-ROW($3:9)*{1,0},"0;"&A$2:A8),{1,2},)

复制代码

卡整列的事就不干了，太卡了。。。

sayhi95

1. =VLOOKUP(,IF({1,1,0},ROUND(MOD(LARGE(MMULT(B$2:M$8,Z1:Z12+1)+ROW($2:$8)%,ROW(A1)),10^{0,12}),2)-ROW($2:8)%,A$2:A8),{3,2},)

复制代码

好像8次方就够了，减1个

1. =VLOOKUP(,IF({1,1,0},ROUND(MOD(LARGE(MMULT(B$2:M$8,Z1:Z12+1)+ROW($2:$8)%,ROW(A1)),10^{0,8}),2)-ROW($2:8)%,A$2:A8),{3,2},)

复制代码

再减1个，不知道数据范围有没有BUG

1. =VLOOKUP(,IF({1,1,0},ROUND(MOD(LARGE(MMULT(B$2:M$8,Z1:Z12+1)+ROW($2:$8)%,ROW(A1)),9^{0,9}),2)-ROW($2:8)%,A$2:A8),{3,2},)

复制代码

无耻整列

1. =VLOOKUP(,IF({1,1,0},ROUND(MOD(LARGE(MMULT(B$2:M$8,Z1:Z12+1)+ROW($2:$8)%,ROW(A1)),9^{0,9}),2)-ROW(A:A)%,A:A),{3,2},)

复制代码

shaowu459

90字符（P2:Q8区域数组公式）：

1. =LAMBDA(x,INDEX(HSTACK(A2:A8,x),RIGHT(LARGE(x+ROW(1:7)%,ROW()-1))))(MMULT(B2:M8,V1:V12+1))

复制代码

101字符（P2:Q8区域数组公式）：

1. =REDUCE(MMULT(B2:M8,V1:V12+1),1,LAMBDA(x,y,INDEX(HSTACK(A2:A8,x),RIGHT(LARGE(x+ROW(1:7)%,ROW()-1)))))

复制代码

103字符（P2:Q8区域数组公式）：

1. =REDUCE(MMULT(B2:M8,V1:V12+1)+ROW(1:7)%,1,LAMBDA(x,y,XLOOKUP(LARGE(x,ROW()-1),x,HSTACK(A2:A8,INT(x)))))

复制代码

105字符：

1. =REDUCE(LARGE(MMULT(B2:M8,V1:V12+1)+ROW(2:8)%,ROW(1:7)),1,LAMBDA(x,y,HSTACK(INDEX(A:A,RIGHT(x)),INT(x))))

复制代码

106字符：

1. =REDUCE(MMULT(B$2:M$8,V1:V12+1)+ROW(1:7)%,1,LAMBDA(x,y,FILTER(HSTACK(A$2:A$8,INT(x)),LARGE(x,ROW()-1)=x)))

复制代码

107字符：

1. =REDUCE(MMULT(B$2:M$8,V1:V12+1)+ROW(1:7)%,1,LAMBDA(x,y,XLOOKUP(LARGE(x,ROW()-1),x,HSTACK(A$2:A$8,INT(x)))))

复制代码

110字符：

1. =MAP(RIGHT(LARGE(MMULT(B2:M8,V1:V12+1)+ROW(2:8)%,ROW(1:7)),{2,99}),LAMBDA(x,IF(LEN(x)=2,INDEX(A:A,x),INT(x))))

复制代码

116字符：

1. =REDUCE(HSTACK(A2:A8,MMULT(B2:M8,V1:V12+1)),ROW(1:7),LAMBDA(x,y,UNIQUE(VSTACK(FILTER(x,TAKE(x,,-1)=SMALL(x,y)),x))))

复制代码

无

dim麻辣君

1. =MAP(INT(RIGHT(LARGE(MMULT(B2:M8,Z1:Z12+1)+ROW(1:7)%,ROW(1:7)),{2,10})),LAMBDA(x,IF(x<9,OFFSET(A1,x,),x)))

复制代码

高个子

1. =MAP(INT(MOD(LARGE(MMULT(B2:M8,Y1:Y12+1)/1%+ROW(A1),ROW(A1)),10^{1,9})/10^{0,2}),LAMBDA(a,IF(a<9,OFFSET(A1,a,),a)))

复制代码

笑着...两年过去

1. =CHOOSE({1,2},INDEX(A:A,RIGHT(LARGE(MMULT(B2:M8,U1:U12+1)+ROW()%,ROW()-1))),LARGE(MMULT(B2:M8,U1:U12+1),ROW()-1))

复制代码

剑指E

1. =LAMBDA(x,y,INDEX(HSTACK(A2:A8,x),RIGHT(LARGE(x*10+y,y)),{1,2}))(MMULT(B2:M8,Z1:Z12+1),ROW(1:7))

复制代码