Adám‭

Profile Activity Vote Summary All Communities

aplwiki.com

I'm an orthodox Jew working full time as an APL programmer at Dyalog Ltd (and we're hiring).

That's good, because my main interests are Judaism and APL.

I'm always excited to teach, provide help, or answer questions; just ping @Adám in The APL Orchard.

Posts

See all 13 »

81%

+7 −0

Challenges Is it a near-anagram?

APL (Dyalog Extended), 18 bytes Anonymous tacit prefix function taking a list of two strings as argument. 2=1⊥(≠⌿∊≢⍤⊢⌸⍤,⍤1↑) Try it online! (…) apply the following tacit function to the arg...

posted 3y ago by Adám‭

Answer

80%

+6 −0

Challenges Shape of an array

Given a non-ragged array (an array where all sub-arrays at a particular level have the same length) of non-negative integers, answer its shape, that is, the length along every dimension. You may as...

6 answers · posted 4y ago by Adám‭ · last activity 3y ago by south‭

Question code-golf

80%

+6 −0

Challenges Word Set Square

APL (Dyalog Unicode), 23 bytes Anonymous tacit prefix function. Reuires 0-based indexing (⎕IO←0) (⊢⍪⍨¯1↓⊢,∘↑-∘⍳∘≢↑¨⊢)⊢,⌽ Try it online! ⌽ reverse the argument ⊢, prepend the argument (…) ...

posted 3y ago by Adám‭

Answer

77%

+5 −0

Challenges Weave Strings Together

APL (Dyalog Unicode), 10 bytes Full program. Prompts for list of strings from stdin. 0~⍨,⍉↑0,¨⎕ Try it online! ⎕ prompt for list of strings 0,¨ prepend a zero to each ↑ convert to orthogona...

posted 4y ago by Adám‭ · edited 4y ago by Adám‭

Answer

75%

+4 −0

Challenges It's Hip to be Square

APL (Dyalog Extended), 3 bytes √∊… Try it online! Is the square root in the range?

posted 3y ago by Adám‭ · edited 3y ago by Adám‭

Answer

75%

+4 −0

Challenges Are All Elements Equal?

APL (Dyalog Unicode), 3 bytes ⍋≡⍒ Try it online! ⍋ computes the permutation vector that would sort the argument into ascending order ⍒ computes the permutation vector that would sort the ar...

posted 3y ago by Adám‭

Answer

71%

+3 −0

Meta Link with Stack Exchange

When editing my profile, I see: Link with Stack Exchange You can't link a Stack Exchange account to your account on this site because there is no associated Stack Exchange site from which to ...

1 answer · posted 4y ago by Adám‭ · last activity 4y ago by Mithical‭

Question feature-request

71%

+3 −0

Challenges Multiply two strings

BQN, 3 bytes Anonymous tacit infix function, taking the second string as left argument and the first string as right argument. ⥊⌊⌜ ⌊⌜ minimum table ⥊ deshape (flatten) BQN treats characters ...

posted 3y ago by Adám‭ · edited 3y ago by Adám‭

Answer

66%

+2 −0

Challenges Word Count Tool

APL (Dyalog Unicode), 27 bytes Anonymous tacit prefix function '\w+' '.' '[^ ]'{≢⍺⎕S⍬⊢⍵}¨⊂ Try it online! '\w+' '.' '[^ ]'{…}¨⊂ apply the following anonymous lambda on each of the PCRE patt...

posted 3y ago by Adám‭ · edited 3y ago by Adám‭

Answer

66%

+2 −0

Challenges Reduce over the range [1..n]

APL (Dyalog Unicode), 4 bytes ⎕/⍳⎕ Try it online! ⎕ input / reduction over ⍳ the integers until ⎕ input.

posted 3y ago by Adám‭ · edited 3y ago by Adám‭

Answer

66%

+2 −0

Challenges Repeat the characters

APL (Dyalog Unicode), 1 byte / Try it online! / is called Replicate.

posted 3y ago by Adám‭

Answer

60%

+1 −0

Challenges Small integer swapping

APL (Dyalog Extended), 3 bytes ⊢⍮⌽ Try it online! ⊢ the argument ⍮ paired up with ⌽ its reverse

posted 3y ago by Adám‭

Answer

50%

+0 −0

Challenges Make a frequency table (histogram)

APL(Dyalog Unicode), 4 bytes SBCS Anonymous tacit prefix function. ,∘≢⌸ Try it on APLgolf! …⌸ between each unique element and its indices, apply: ,∘≢ concatenate the unique element to the ta...

posted 2y ago by Adám‭

Answer

See all 13 »

Reputation		436
Number of top-level posts		2
Number of answers		11
Sum of received votes (up minus down)		45
Number of edits made		8

Earned Abilities

Statistics

Posts
Count		13
Questions		2
Answers		11
Articles		0

Votes cast
Count		20

Flags raised
Count		1