Tally: Difference between revisions

 ≢

Tally () or Count is a primitive monadic function which returns the number of major cells in its argument. The Tally of an array is also the first element of its shape, or 1 if it is a scalar (since a scalar is its own major cell by convention). Tally counts the first axis rather than the last because the number of major cells is more useful in leading axis theory.

Examples

Tally can compute the length of a numeric vector or string. <source lang=apl>

≢⍳12

12

≢'string'

6 </syntaxhighlight> It gives the length of the first axis in a higher-rank array. Tally applied to an array's shape gives its rank. <source lang=apl>

≢5 4 3 2⍴1 'b' 3 'd'

5

≢⍴5 4 3 2⍴1 'b' 3 'd'

4 </syntaxhighlight> The Tally of a scalar is always 1. <source lang=apl>

≢3.14

1 </syntaxhighlight>

Description

Tally returns the length of the first axis of its argument if it has any axes (that is, if it is not a scalar), and 1 otherwise. This can be modelled easily with Shape and First: <source lang=apl> Tally ← {⊃(⍴⍵),1} </syntaxhighlight> An alternative implementation is to count the major cells by turning each into a scalar 1 with the Rank operator, then adding them up: <source lang=apl> Tally ← +⌿ {1}⍤¯1 </syntaxhighlight>

History

Tally was introduced in A with the name "count" and symbol <source lang=j inline>#</syntaxhighlight>. The same notation was carried forward to A+, as well as J following Arthur Whitney's suggestion. The primitive was present in NARS2000 by 2010, with the name "Tally" and symbol <source lang=apl inline>></syntaxhighlight>[1]. The symbol <source lang=apl inline>≢</syntaxhighlight> for Tally was introduced in Dyalog APL 14.0, and quickly adopted by NARS2000. It was later added to GNU APL and has been included in many recent APLs based on Dyalog, such as ngn/apl, dzaima/APL, and APL\iv.

Before the addition of Tally (and Zilde), there were numerous ways to get the length of a vector as a scalar:[2] <source lang=apl> ⍴⍴v (⍴0)⍴⍴v (⍳0)⍴⍴v (⍴v)[0] ×/⍴v ⍝ shortest and obscure 0⊥⍴v ⍝ shortest and obscurest </syntaxhighlight>