Data update
This commit is contained in:
parent
29a5eea0d4
commit
5c1bb7bfa9
2011 changed files with 35081 additions and 3229 deletions
|
|
@ -0,0 +1,16 @@
|
|||
[ 1 ] is red ( --> n )
|
||||
[ 2 ] is white ( --> n )
|
||||
[ 3 ] is blue ( --> n )
|
||||
|
||||
randomise
|
||||
|
||||
[] ' [ red white blue ]
|
||||
witheach
|
||||
[ nested swap
|
||||
5 random times [ over join ]
|
||||
swap join ]
|
||||
|
||||
dup [ shuffle 2dup != until ] nip
|
||||
|
||||
say "Before sorting: " dup echo cr
|
||||
say " After sorting: " sortwith [ dip do do > ] echo cr
|
||||
|
|
@ -0,0 +1,3 @@
|
|||
&p.[⍥(⊡⌊×3⚂"RWB")30] # Build it.
|
||||
&p.⊏▽⊸>2⍏⊛.⊂"RWB" # Sort it, providing model for sort order.
|
||||
&p⨬("oops"|"good")≍⊏⊸⍏.⊛ # Confirm it's sorted.
|
||||
Loading…
Add table
Add a link
Reference in a new issue