Use FullForm
to see the differences
sol3 = NumberForm[x /. Solve[x^2-3 == 0, x]//N, 6]
(* {-1.73205,1.73205} *)
This definition includes the NumberForm
wrapper that was intended just for printing.
sol3//FullForm
(* NumberForm[List[-1.7320508075688772`,1.7320508075688772`],6] *)
Alternatively, use Information
to look at the stored definition
?sol3
(* Global`sol3
sol3=NumberForm[{-1.73205,1.73205},6] *)
Consequently, the input to Sin
is neither numeric nor a List
of numeric values
Sin[sol3]//FullForm
(* Sin[NumberForm[List[-1.7320508075688772`,1.7320508075688772`],6]] *)
You could Map
the Sin
to the appropriate level
Map[Sin,sol3,{2}]//FullForm
(* NumberForm[List[-0.9870266449903538`,0.9870266449903538`],6] *)
However, the common approach is to put the wrapper outside the definition
NumberForm[sol32=x/.Solve[x^2-3==0,x]//N,6]//FullForm
(* NumberForm[List[-1.7320508075688772`,1.7320508075688772`],6] *)
However, you have to use NumberForm
again if you want the output of Sin
to also be formatted with NumberForm
Sin[sol32]//FullForm
(* List[-0.9870266449903538`,0.9870266449903538`] *)
NumberForm[Sin[sol32],6]//FullForm
(* NumberForm[List[-0.9870266449903538`,0.9870266449903538`],6] *)