Hi to all!(adsbygoogle = window.adsbygoogle || []).push({});

Again I have a question in mathematica.

Lets us define a system of equations e.q.

and we want to find the solution by optimization withCode (Text):eqs1 =-0.17544 Csc[\[Theta]]^2 + Sin[2 \[Phi]] == 0 &&

0.001447 - 0.0864 Cos[\[Theta]] + 0.0288 Cos[\[Theta]]^3 == 0;

The result we obtain for example is something like hereCode (Text):Reduce[{eqs1 && 0 <= \[Phi] <= 2 \[Pi] &&

0 <= \[Theta] <= \[Pi]}, {\[Phi], \[Theta]}, Reals]

We obtain 4 pairs of solutions.Code (Text):(\[Phi] == 0.0882006 && \[Theta] == 1.55405) || (\[Phi] ==

1.4826 && \[Theta] == 1.55405) || (\[Phi] ==

3.22979 && \[Theta] == 1.55405) || (\[Phi] ==

4.62419 && \[Theta] == 1.55405)

The question is, how we can store these pairs of solutions Phi and Theta into a table as elements so we can easily use them later for instance we want to store the pair solution

\[Phi]=0.0882006 , \[Theta] = 1.55405

as matrix elements like this A[1,1]=0.0882006, A[1,2]= 1.55405.

How this can be done automatically without repeated copy-paste with the mouse for houres?

**Physics Forums | Science Articles, Homework Help, Discussion**

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

# Mathematica: Tables

Loading...

Similar Threads for Mathematica Tables |
---|

Mathematica Storing Mathematica output |

Mathematica Mathematica to MATLAB |

Mathematica Cannot do the integral of the Hyper-geometric function? |

Mathematica Cannot Plot This Function in Mathematica |

Mathematica While Loop in Mathematica |

**Physics Forums | Science Articles, Homework Help, Discussion**