Message Boards

WOLFRAM COMMUNITY

2981 Views

1 Reply

1 Total Likes

View groups...

Follow this post

Share this post:

GROUPS:

Wolfram|Alpha Algebra Wolfram Language

How to put Wolfram|Alpha output in a Block

Aditya Srivastav

Aditya Srivastav, Phd ,IIT

Posted 3 years ago

Hi Everyone, I am using Wolfram\|Alpha inside a Mathematica notebook for getting a permutation matrix for a particular order. I want to use output of this inside a Block but its not happening.

POSTED BY: Aditya Srivastav

1 Reply

Sort By:

Rohit Namjoshi

Posted 3 years ago

Hi Aditya `MatrixForm` is not computable. Also avoid use of symbol names starting with an uppercase letter, WL built-in symbols use that convention. And using `%`, especially in a function definition is asking for trouble. m = WolframAlpha[ "matrix of the permutation (4 3 2)(1)", {{"PermutationMatrix", 1}, "ComputableData"}] // ReleaseHold my[r_] := Block[{a, b}, a = m; b = a . r . a\[Transpose]]; (* Why do you need Block here? ) my[{{1/2, 0, 0, -(1/2)}, {-(1/2), 1, 0, -(1/2)}, {-(1/2), 0, 1, -(1/2)}, {-(1/2), 0, 0, 1/2}}] ( {{1/2, -(1/2), 0, 0}, {-(1/2), 1/2, 0, 0}, {-(1/2), -(1/2), 1, 0}, {-(1/2), -(1/2), 0, 1}} *)

Hi Aditya

MatrixForm is not computable. Also avoid use of symbol names starting with an uppercase letter, WL built-in symbols use that convention. And using %, especially in a function definition is asking for trouble.

m = WolframAlpha[
   "matrix of the permutation (4 3 2)(1)", {{"PermutationMatrix", 1}, 
    "ComputableData"}] // ReleaseHold

my[r_] := Block[{a, b}, a = m; b = a . r . a\[Transpose]]; (* Why do you need Block here? *)

my[{{1/2, 0, 0, -(1/2)}, {-(1/2), 1, 0, -(1/2)}, {-(1/2), 0, 1, -(1/2)}, {-(1/2), 0, 0, 1/2}}]
(* {{1/2, -(1/2), 0, 0}, {-(1/2), 1/2, 0, 0}, {-(1/2), -(1/2), 1, 0}, {-(1/2), -(1/2), 0, 1}} *)

POSTED BY: Rohit Namjoshi

Reply to this discussion

Reply Preview

Attachments

Remove Add a file to this post

Follow this discussion

or Discard

Group Abstract

Feedback