Weave Strings Together
Given a list of strings(and optionally, their length) as input, weave the strings together.
Intro
Your goal is to mimic the WV operator in Pip. Take a list of strings and alternate between their characters like so:
hello,
world, → hwc,eoo,lrd,lle,od → hwceoolrdlleod
code
Effectively, you need to group the characters at each index, and join them into a single string.
The strings may have spaces.
No truncation should be done, and all the characters of each string must be used.
Test Cases
["kino","cinema","movie"] → kcmiionnvoeimea
["code","golf"] → cgoodlef
["Hi","","There"] → HTihere
["Explanation"] → Explanation
["Dyalog APL","Cultivation","Orchard"] → DCOyuralclthoiagvr adAtPiLon
You check any other test cases with this program.
[Jelly], 2 1 byte Z …
~1mo ago
[APL (Dyalog Unicode)], 10 byt …
7mo ago
[Haskell], 40 bytes ```hask …
7mo ago
Japt `-P`, 7 2 bytes Õc …
7mo ago
BQN, 8 bytesSBCS ``` ∾⊒˜¨⊔ …
~2mo ago
[JavaScript (Node.js)], 53 byt …
7mo ago
6 answers
APL (Dyalog Unicode), 10 bytes
Full program. Prompts for list of strings from stdin.
0~⍨,⍉↑0,¨⎕
⎕ prompt for list of strings
0,¨ prepend a zero to each
↑ convert to orthogonal matrix (increase rank at cost of depth), padding with 0s
⍉ transpose
, ravel (flatten)
0~⍨ remove 0s
0 comments
Jelly, 2 1 byte
Z
-1 byte thanks to Razetime!
Full program
How it works
Z - Main link. Takes a list L on the left
Z - Transpose
Implicitly print, smashing lists together to form one string
2 comments
doesn't Jelly smash print, removing the need for F?
@Razetime Indeed it does, thanks!
BQN, 8 bytesSBCS
∾⊒˜¨⊔○∾⊢
Run online! and parsing diagram
The idea here is to build a list of groups, with group i containing the ith character of each string that has one, then join the groups. The structure ∾ ⊒˜¨ ⊔○∾ ⊢ is a train of four functions: the last three form a 3-train and then Join (∾) is applied to the result.
∾⊒˜¨⊔○∾⊢
⊢ # Argument, unchanged
⊒˜¨ # Indices for each string
⊔○∾ # Join both and group
∾ # Join group result
The function ⊒˜¨ converts a list of strings such as ⟨"ab","cde"⟩ into indices ⟨0‿1,0‿1‿2⟩. Occurrence Count searches for cells of the right argument in the left argument, taking the first match and never matching a cell more than once. When applied with the same list as left and right argument using ˜, it always matches each cell to itself as any previous cells that match it are used up. The result is the index of each match, giving sequential indices. Each (¨) simply applies this function to each string.
Group moves each character to the group with the specified index. For example, 0‿1‿0‿1‿2⊔"abcde" is ⟨"ac","bd","e"⟩. Since its arguments must be flat lists, not nested ones, it's applied as Group Over (○) Join, joining both arguments before applying. Instead of grouping and joining, it's also possible to sort by the indices with ⊒˜¨⍋⊸⊏○∾⊢. But longer.
0 comments
3 comments
Ugh, the "strings may have spaces" and the way you don't pad the strings makes it unusually annoying. — Quintec 7 months ago
Can we take the strings as an array of characters? — Shaggy 7 months ago
@Shaggy yes, you can — Razetime 7 months ago