title: Convert summary to data.frame
body: <p>I have this <code>admission_table</code> containing <code>ADMIT</code>, <code>GRE</code>, <code>GPA</code> and <code>RANK</code>.</p>
  
  <pre><code>&gt; head(admission_table)
    ADMIT GRE  GPA RANK
  1     0 380 3.61    3
  2     1 660 3.67    3
  3     1 800 4.00    1
  4     1 640 3.19    4
  5     0 520 2.93    4
  6     1 760 3.00    2
  </code></pre>
  
  <p>I'm trying to convert the summary of this table into <code>data.frame</code>. I want to have <code>ADMIT</code>, <code>GRE</code>, <code>GPA</code> and <code>RANK</code> as my column headers.</p>
  
  <pre><code>&gt; summary(admission_table)
       ADMIT             GRE             GPA             RANK      
   Min.   :0.0000   Min.   :220.0   Min.   :2.260   Min.   :1.000  
   1st Qu.:0.0000   1st Qu.:520.0   1st Qu.:3.130   1st Qu.:2.000  
   Median :0.0000   Median :580.0   Median :3.395   Median :2.000  
   Mean   :0.3175   Mean   :587.7   Mean   :3.390   Mean   :2.485  
   3rd Qu.:1.0000   3rd Qu.:660.0   3rd Qu.:3.670   3rd Qu.:3.000  
   Max.   :1.0000   Max.   :800.0   Max.   :4.000   Max.   :4.000  
  
   &gt; as.data.frame(summary(admission_table))
     Var1      Var2             Freq
  1           ADMIT Min.   :0.0000  
  2           ADMIT 1st Qu.:0.0000  
  3           ADMIT Median :0.0000  
  4           ADMIT Mean   :0.3175  
  5           ADMIT 3rd Qu.:1.0000  
  6           ADMIT Max.   :1.0000  
  7             GRE  Min.   :220.0  
  8             GRE  1st Qu.:520.0  
  9             GRE  Median :580.0  
  10            GRE  Mean   :587.7  
  11            GRE  3rd Qu.:660.0  
  12            GRE  Max.   :800.0  
  13            GPA  Min.   :2.260  
  14            GPA  1st Qu.:3.130  
  15            GPA  Median :3.395  
  16            GPA  Mean   :3.390  
  17            GPA  3rd Qu.:3.670  
  18            GPA  Max.   :4.000  
  19           RANK  Min.   :1.000  
  20           RANK  1st Qu.:2.000    
  21           RANK  Median :2.000  
  22           RANK  Mean   :2.485  
  23           RANK  3rd Qu.:3.000  
  24           RANK  Max.   :4.000  
  </code></pre>
  
  <p>As I'm trying to convert into <code>data.frame</code>, this is the only result I get. I want the data frame have the exact output just like the summary table because after that I want to insert that into Oracle database using this line of code:</p>
  
  <pre><code>dbWriteTable(connection,name="SUM_ADMISSION_TABLE",value=as.data.frame(summary(admission_table)),row.names = FALSE, overwrite = TRUE ,append = FALSE)
  </code></pre>
  
  <p>Is the any way to do so?</p>