I have a nonlinear equation in single variable( $x \tan(x)=5$ ) and it have an infinite number of roots , I got some of them and I want to add them in a table this is my code
please, tell me how to do this?
(* In[1]:= *) Reduce[x Tan[x] == 5 && 0 <= x <= 100, x]
then I used a ToRule
to convert the ||
to
(* In[2]:= *) ToRules[Out[1]]
then I used export to export all roots to excel sheet but i got failed
Export["myfile.xls", Out[2]]
Export::noelem:
{x->Root[{-5+#1 Tan[Slot[<<1>>]]&,4.0335677903399816532}]}
is not a valid set of export elements for the XLS format.
(* Out[3] = $Failed *)