Tips for golfing in Mathematica What general tips do you have for golfing in Mathematica? I'm looking for ideas that can be applied to code golf problems in general that are at least somewhat specific to Mathematica (e.g. "remove comments" is not an answer).
Some built-in functions with long names can be replaced with shorter expressions. 

For example:


Total => Tr
Transpose => Thread or \[Transpose]
True => 1&lt;2
False => 1&gt;2
Times => 1##&amp;
Alternatives => $|##&amp;
IntegerQ => ⌊#⌋==#&amp;
a[[1]] => #&amp;@@a
a[[All,1]] => #&amp;@@@a
ConstantArray[a,n] => Array[a&amp;,n] or Table[a,{n}]
Union@a => {}⋃a or a⋃a
ToExpression@n => FromDigits@n if n is a number
Divisible[n,m] => m∣n
FromDigits[n,2] => Fold[#+##&amp;,n] if n is a list of 0s and 1s
Complex@z => {1,I}.z where z is a list of the form {x,y}