title: lm() function; extract the statiscal significance of the intercept; store in variable
body: <p>In R, If I write:</p>
  
  <pre><code>reg1 &lt;- lm(y ~ x, data = ds)
  </code></pre>
  
  <p>the regression model information is stored in reg1 which has a structure of a list. </p>
  
  <p>I can write:</p>
  
  <pre><code>value.of.intercept &lt;- reg1$coefficients[1] 
  </code></pre>
  
  <p>to save the value of the intercept to the variable named "value.of.intercept"</p>
  
  <p>What do I write to save the statistical significance value of the intercept to the variable "p.value.of.intercept"?</p>
  
  <p>I can see the value, in the summary. If I write:</p>
  
  <pre><code>summary(reg1)
  </code></pre>
  
  <p>the statistical significance value of the intercept is immediately under this text: <code>Pr(&gt;|t|)</code></p>