麻烦各位老师帮忙，用函数的方式，对内存数组的多个区域标识最高值

一块臭豆腐

edwin11891 发表于 2024-10-8 17:04
s与F行数不相同，s少30行。虽然筛选的数据源是具有相同的行，但是s是从第36行开始到2787行，F是从第6行到 ...

谢谢您，真不是一般的牛

一块臭豆腐

solextrade 发表于 2024-10-8 18:00
=N(MAXIFS(B:B,A:A,A5)=B5)

谢谢您的关注

一块臭豆腐

edwin11891 发表于 2024-10-8 17:04
s与F行数不相同，s少30行。虽然筛选的数据源是具有相同的行，但是s是从第36行开始到2787行，F是从第6行到 ...

老师您好，请问我在G36处输入=IF(B36:B2787/B6:B2757>1.005,1,0)回车，会把B列中高于1.005倍的数标出来，显示如G例。在H36输入=DROP(LET(s,FILTER(B36:B2787,B36:B2787<>""),F,FILTER(B6:B2757,B6:B2757<>""),t,IF(s/F>1.005,1,0),a,SCAN(0,SEQUENCE(ROWS(t)-1,,2),LAMBDA(x,y,IF(INDEX(t,y)=INDEX(t,y-1),x,1+x))),b,VSTACK(0,a),c,REDUCE("",UNIQUE(b),LAMBDA(x,y,VSTACK(x,LET(Sf,FILTER(s,b=y),Isone,FILTER(t,b=y),IF((Sf=MAX(Sf))*(Isone=1),1,0))))),d,DROP(c,1),d),-1)，可以准确地把连续标识为“1”的区域的最高值标识出来，如H39、H94、H95等，请问，有没有什么办法，能够把该最高值之前、已经连续标识为“1”的区域标识出来，而在该最高值之后的标识为“零”，如图所示J列所示：

edwin11891

一块臭豆腐 发表于 2024-10-10 14:56
老师您好，请问我在G36处输入=IF(B36:B2787/B6:B2757>1.005,1,0)回车，会把B列中高于1.005倍的数标出来， ...

1. =LET(s,FILTER(B36:B4969,B36:B4969<>""),F,DROP(FILTER(B6:B4939,B6:B4939<>""),-30),t,IF(s/F>1.005,1,0),a,SCAN(0,SEQUENCE(ROWS(t)-1,,2),LAMBDA(x,y,IF(INDEX(t,y)=INDEX(t,y-1),x,1+x))),b,VSTACK(0,a),c,REDUCE("",UNIQUE(b),LAMBDA(x,y,VSTACK(x,LET(Sf,FILTER(s,b=y),Isone,FILTER(t,b=y),n,MATCH(MAX(Sf),Sf,0),m,MAP(SEQUENCE(ROWS(Sf)),LAMBDA(xx,IF(xx<=n,1,0))),m*(Isone=1))))),d,DROP(c,1),d)

复制代码

另：如果有效数据行数是明确的，s、F可以不用Filter函数筛选，直接s, B36:B2787, F, B6:B2757.

edwin11891

还可以用EXPAND函数替换MAP函数方法：

1. =LET(s,FILTER(B36:B4969,B36:B4969<>""),F,DROP(FILTER(B6:B4939,B6:B4939<>""),-30),t,IF(s/F>1.005,1,0),a,SCAN(0,SEQUENCE(ROWS(t)-1,,2),LAMBDA(x,y,IF(INDEX(t,y)=INDEX(t,y-1),x,1+x))),b,VSTACK(0,a),c,REDUCE("",UNIQUE(b),LAMBDA(x,y,VSTACK(x,LET(Sf,FILTER(s,b=y),Isone,FILTER(t,b=y),n,MATCH(MAX(Sf),Sf,0),m,EXPAND(REPTARRAY(1,n,1),ROWS(Sf),,0),m*(Isone=1))))),d,DROP(c,1),d)

复制代码

一块臭豆腐

edwin11891 发表于 2024-10-10 20:04
另：如果有效数据行数是明确的，s、F可以不用Filter函数筛选，直接s, B36:B2787, F, B6:B2757.

真是看得我眼花缭乱，膜拜中！不过我一直没理解，为什么您用B36:B4969与B6:B4939能计算出来，而我如果改回：=LET(s,FILTER(B36:B2787,B36:B2787<>""),F,DROP(FILTER(B6:B2757,B6:B2757<>""),-30),t,IF(s/F>1.005,1,0),a,SCAN(0,SEQUENCE(ROWS(t)-1,,2),LAMBDA(x,y,IF(INDEX(t,y)=INDEX(t,y-1),x,1+x))),b,VSTACK(0,a),c,REDUCE("",UNIQUE(b),LAMBDA(x,y,VSTACK(x,LET(Sf,FILTER(s,b=y),Isone,FILTER(t,b=y),n,MATCH(MAX(Sf),Sf,0),m,MAP(SEQUENCE(ROWS(Sf)),LAMBDA(xx,IF(xx<=n,1,0))),m*(Isone=1))))),d,DROP(c,1),d)就出错了，明明文档中只有2787行啊？－－－可能我提这样的问题水平太低了，让您见笑了

edwin11891

一块臭豆腐 发表于 2024-10-11 14:05
真是看得我眼花缭乱，膜拜中！不过我一直没理解，为什么您用B36:B4969与B6:B4939能计算出来，而我如果改 ...

错在 F,DROP(FILTER(B6:B2757,B6:B2757<>""),-30),。如果是2757，就不需要再用DROP函数再去掉后30行了。

一块臭豆腐

edwin11891 发表于 2024-10-11 20:56
错在 F,DROP(FILTER(B6:B2757,B6:B2757""),-30),。如果是2757，就不需要再用DROP函数再去掉后30行了。

感谢您每次都不厌其烦地及时回复，让我获益良多

一块臭豆腐

edwin11891 发表于 2024-10-11 20:56
错在 F,DROP(FILTER(B6:B2757,B6:B2757""),-30),。如果是2757，就不需要再用DROP函数再去掉后30行了。

老师您好，用＝LET(s,FILTER(B36:B4969,B36:B4969<>""),F,DROP(FILTER(B6:B4939,B6:B4939<>""),-30),t,IF(s/F>＝1.005,1,0),a,SCAN(0,SEQUENCE(ROWS(t)-1,,2),LAMBDA(x,y,IF(INDEX(t,y)=INDEX(t,y-1),x,1+x))),b,VSTACK(0,a),c,REDUCE("",UNIQUE(b),LAMBDA(x,y,VSTACK(x,LET(Sf,FILTER(s,b=y),Isone,FILTER(t,b=y),n,MATCH(MAX(Sf),Sf,0),m,MAP(SEQUENCE(ROWS(Sf)),LAMBDA(xx,IF(xx<=n,1,0))),m*(Isone=1))))),d,DROP(c,1),d)在H36输入后回车显示如图，请问，如果用函数公式的话，怎样才能将连续标识次数小于3的剃除，改为标识为“0”，而次数超过3次的仍标识为“1”不变，意图显示的效果如下图J列：

edwin11891

一块臭豆腐 发表于 2024-10-14 08:18
老师您好，用＝LET(s,FILTER(B36:B4969,B36:B4969""),F,DROP(FILTER(B6:B4939,B6:B4939""),-30),t,IF(s/F ...

方法1：只需要再原来的公式上判断一下行数即可：

1. =LET(s,FILTER(B36:B4969,B36:B4969<>""),F,DROP(FILTER(B6:B4939,B6:B4939<>""),-30),t,IF(s/F>1.005,1,0),a,SCAN(0,SEQUENCE(ROWS(t)-1,,2),LAMBDA(x,y,IF(INDEX(t,y)=INDEX(t,y-1),x,1+x))),b,VSTACK(0,a),c,REDUCE("",UNIQUE(b),LAMBDA(x,y,VSTACK(x,LET(Sf,FILTER(s,b=y),Isone,FILTER(t,b=y),n,MATCH(MAX(Sf),Sf,0),m,MAP(SEQUENCE(ROWS(Sf)),LAMBDA(xx,IF(xx<=n,1,0))),m*(Isone=1)*(n>2))))),d,DROP(c,1),d)

复制代码

方法2：在原方法的最终结果上再处理。由于类似“01010”这种结构，需要处理两次，所以SUBSTITUTE函数连续用了两次，这样子下来公式就超长了，由于每步都定义了名称，可以逐步输出结果查看分步结果：

1. =LET(s,FILTER(B36:B4969,B36:B4969<>""),F,DROP(FILTER(B6:B4939,B6:B4939<>""),-30),t,IF(s/F>1.005,1,0),a,SCAN(0,SEQUENCE(ROWS(t)-1,,2),LAMBDA(x,y,IF(INDEX(t,y)=INDEX(t,y-1),x,1+x))),b,VSTACK(0,a),c,REDUCE("",UNIQUE(b),LAMBDA(x,y,VSTACK(x,LET(Sf,FILTER(s,b=y),Isone,FILTER(t,b=y),n,MATCH(MAX(Sf),Sf,0),m,MAP(SEQUENCE(ROWS(Sf)),LAMBDA(xx,IF(xx<=n,1,0))),m*(Isone=1))))),d,DROP(c,1),e,CONCAT(0,d,0),ga,SUBSTITUTE(SUBSTITUTE(e,"010","000"),"010","000"),g,SUBSTITUTE(SUBSTITUTE(ga,"0110","0000"),"0110","0000"),h,1*DROP(DROP(TOCOL(REGEXP(g,".")),1),-1),h)

复制代码