title: Smart transpose of a data frame in R
body: <p>I have multiple numeric columns in R <code>(mydata = summary(labo[sapply(mydata, is.numeric)]))</code> then performed a data frame transformation <code>mydata&lt;-as.data.frame(mydata)</code> and I have this as 'data have' :</p>
  
  <pre><code>Var1         Var2           Freq    
  1            cars Min.   : 1.100  
  2            cars 1st Qu.: 3.375  
  3            cars Median : 4.500  
  4            cars Mean   :12.075  
  5            cars 3rd Qu.:12.350  
  6            cars Max.   :12.000  
  7            cars      NA's   :3  
  8            bikes Min.   : 12.00  
  9            bikes 1st Qu.: 23.00  
  10           bikes Median : 12.00  
  11           bikes Mean   : 10.14  
  12           bikes 3rd Qu.: 12.00  
  13           bikes Max.   :12.00  
  14           bikes     NA's   :2  
  15           wheels  Min.   :10.00  
  16            wheels  1st Qu.:12.00  
  17            wheels  Median :10.00  
  18            wheels  Mean   :10.54  
  19            wheels  3rd Qu.:12.00  
  20            wheels  Max.   :20.00  
  21            wheels     NA's   :3  
  </code></pre>
  
  <p>I'm looking a way to smartly transpose the output of the dataframe to this:</p>
  
  <p>data want:</p>
  
  <p><div class="snippet" data-lang="js" data-hide="false" data-console="true" data-babel="false">
  <div class="snippet-code">
  <pre class="snippet-code-html lang-html prettyprint-override"><code>Var2 ! Min ! 1st Qu. ! Median ! 3rd Qu. ! Max. !  NA's 
  cars !1.100! 3.375. .....
  bikes!12.00! 23.00......</code></pre>
  </div>
  </div>
  </p>