aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data commit

Browse source
This commit is contained in:
Ingy döt Net 2023-07-01 11:58:00 -04:00
parent 7387c8f97b
commit cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Task/Run-length-encoding/J/run-length-encoding-1.j Normal file
View file

@ -0,0 +1,2 @@
rle=: ;@(<@(":@(#-.1:),{.);.1~ 1, 2 ~:/\ ])
rld=: ;@(-.@e.&'0123456789' <@({:#~1{.@,~".@}:);.2 ])

5
Task/Run-length-encoding/J/run-length-encoding-2.j Normal file
View file

@ -0,0 +1,5 @@
rle 'WWWWWWWWWWWWBWWWWWWWWWWWWBBBWWWWWWWWWWWWWWWWWWWWWWWWBWWWWWWWWWWWWWW'
12W1B12W3B24W1B14W
rld '12W1B12W3B24W1B14W'
WWWWWWWWWWWWBWWWWWWWWWWWWBBBWWWWWWWWWWWWWWWWWWWWWWWWBWWWWWWWWWWWWWW

1
Task/Run-length-encoding/J/run-length-encoding-3.j Normal file
View file

@ -0,0 +1 @@
rle=: ;@(<@(":@#,{.);.1~ 2 ~:/\ (a.{.@-.{.),])

2
Task/Run-length-encoding/J/run-length-encoding-4.j Normal file
View file

@ -0,0 +1,2 @@
torle=: (#, {.);.1~ 1,2 ~:/\ ]
frle=: #/@|:

10
Task/Run-length-encoding/J/run-length-encoding-5.j Normal file
View file

@ -0,0 +1,10 @@
torle a.i.'WWWWWWWWWWWWBWWWWWWWWWWWWBBBWWWWWWWWWWWWWWWWWWWWWWWWBWWWWWWWWWWWWWW'
12 87
1 66
12 87
3 66
24 87
1 66
14 87
u: frle torle a.i.'WWWWWWWWWWWWBWWWWWWWWWWWWBBBWWWWWWWWWWWWWWWWWWWWWWWWBWWWWWWWWWWWWWW'
WWWWWWWWWWWWBWWWWWWWWWWWWBBBWWWWWWWWWWWWWWWWWWWWWWWWBWWWWWWWWWWWWWW