Message Boards Message Boards

0
|
4122 Views
|
2 Replies
|
1 Total Likes
View groups...
Share
Share this post:

How can I solve Equations to complicated for Solve containing Tan[x]?

Posted 10 years ago

Hi everyone, I have been working myself through pages of documentation to find out the functions and possibilities Mathematica offers. Nevertheless I am not able to solve following problem on my own:

inv[alpha_] := Tan[alpha] - alpha;
InvAlph=0.0149044;
Solve[InvAlph == inv[Alpha], Alpha]

I suppose Solve is not the right function to solve this equation, due to infinite solutions, but I have not discovered the appropriate function jet. If anybody has any advice, I will appreciate it a lot! Thanks in advance David

2 Replies
In[13]:= inv[alpha_] := Tan[alpha] - alpha;
InvAlph = 0.0149044;
FindRoot[InvAlph == inv[alpha], {alpha, 1}]

Out[15]= {alpha -> 0.349066}
POSTED BY: Frank Kampas

That is exactly what I was looking for. Thank you very much!

Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard

Group Abstract Group Abstract