1,2

(MAGMA) for a in [1..5] do b := 0; for c in CartesianPower([0, 1], a^2) do b + := Rank(Matrix(a, a, [aa : aa in c])); end for; print b; end for;

Sequence in context: A012183 A012230 A086098 this_sequence A012211 A036059 A036519

Adjacent sequences: A086872 A086873 A086874 this_sequence A086876 A086877 A086878

hard,more,nonn

Tom Womack (tom(AT)womack.net), Aug 21 2003