title: Decimal places in Summary(model) output in R
body: <p>I am trying to get more than 2 decimal places from model summary output when I use <code>nnet</code> package. I read other threads regarding this and none of those solutions seem to work for me. I tried:  </p>
  
  <pre><code>options(digits=10)
  summary(model)
  
   b-&gt;h1 i1-&gt;h1 i2-&gt;h1 i3-&gt;h1 i4-&gt;h1 i5-&gt;h1 
    0.94  -2.67   0.83  -1.06  -2.51  -0.69 
   b-&gt;o1 h1-&gt;o1 
    1.14  -3.41 
   b-&gt;o2 h1-&gt;o2 
   -0.62   3.92 
  </code></pre>
  
  <p>I also tried:  </p>
  
  <pre><code>summary(model,digits=10)
  
   b-&gt;h1 i1-&gt;h1 i2-&gt;h1 i3-&gt;h1 i4-&gt;h1 i5-&gt;h1 
    0.94  -2.67   0.83  -1.06  -2.51  -0.69 
   b-&gt;o1 h1-&gt;o1 
    1.14  -3.41 
   b-&gt;o2 h1-&gt;o2 
   -0.62   3.92 
  </code></pre>
  
  <p>None of those solutions work for me. I have to use <code>caputure.output</code> after summary output If i output the entire model or use <code>coefnames</code> I can get more than 2 decimal places but that is not going to help me if I use <code>caputre.output</code>.</p>