New answers tagged combinatorics
4
votes
1
vote
1
vote
Robinson Schensted correspondence
J, 60 bytes
g=.<`(/:~(-.;$:@])&;2<@-./\_"+]F:.(]`I.`[}~)])@.(1<#)
,:&g/:
Attempt This Online!
(Note: code won't actually run because ATO's J ...
- 33k
3
votes
Robinson Schensted correspondence
R, 115 bytes
\(x){P=Q=!x%o%x;for(i in x){r=1;while(i<-P[r,w<-which.min(P[r,]%in%1:i)]-!(P[r,w]=i))r=r+1;Q[r,w]=F=F+1};list(P,Q)}
Attempt This Online!
For an ...
- 13.7k
2
votes
4
votes
4
votes
Robinson Schensted correspondence
Charcoal, 66 bytes
≔Ｅθ⟦⟧ηＦθ«≔⁰ζＷΦ§ηζ›λ髧≔§ηζ⌕§ηζ⌊κι≔⌊κι≦⊕ζ»⊞§ηζι⊞υζ»Ｅ⟦η⊕Ｅθ⌕Ａυκ⟧⭆¹Φιν
Try it online! Link is to verbose version of code. Explanation:
...
- 166k
Top 50 recent answers are included