Walsh matrix: Difference between revisions
Content deleted Content added
added RPL |
Add Mathematica/Wolfram Language implementation |
||
Line 885:
</pre>
[[File:Walsh_subplots.svg|center]]
=={{header|Mathematica}}/{{header|Wolfram Language}}==
<syntaxhighlight lang="Mathematica">
WalshMatrix = Nest[ArrayFlatten@{{#, #}, {#, -#}} &, 1, #] &;
WalshMatrix[4] // MatrixPlot
</syntaxhighlight>
{{out}}
[[File:Walsh4Mathematica.png|thumb|center]]
=={{header|Maxima}}==
|