=LET(zhishu,LAMBDA(num,REDUCE(num,SEQUENCE(ROUNDUP(num^0.5,0)-1,,2),LAMBDA(a,b,IF(a<>"",IF(MOD(a,b)=0,"",a),"")))),beixuan,LAMBDA(a,FILTER(SEQUENCE(a),VSTACK({0;1;1;0;1;0},--(ABS(SEQUENCE(a-6)-ROUND(SEQUENCE(a-6)/6,0)*6)=1)))),r,MAP(beixuan(100000),LAMBDA(a,zhishu(a))),VSTACK({2},FILTER(r,r<>"")))