Group Abstract Group Abstract

Message Boards Message Boards

Loop NSolve of simultaneous equations n=100 times?

Posted 8 years ago

Hello everyone, I am new to Mathematica. I have written this code which I want to run for say n=100 times to get new solutions for every randomly generated seed for each run. Can anyone please tell me how can I run this code for n=100 times? Thank you in advance.

Code that I have written:enter code here

Sin[Subscript[\[Theta], 12]] = RandomReal[{0.081}]
f[\[Alpha], \[Beta]] = %*Sin[\[Alpha]]*Cos[\[Beta]]
g[\[Alpha], \[Beta]] = (%%)^2*(Sin[\[Alpha]])^3*(Cos[\[Beta]])^2
NSolve[{f[\[Alpha], \[Beta]] == 0, 
g[\[Alpha], \[Beta]] == 0}, {\[Alpha], \[Beta]}]
POSTED BY: RICKY DEVI
POSTED BY: EDITORIAL BOARD
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard