title: skimr: how to remove histogram?
body: <p>I want to use the function <code>skim</code> from R package <code>skimr</code> on Windows. Unfortunately, in many situations column, <code>hist</code> is printed incorrectly (with many <code>&lt;U+2587&gt;</code>-like symbols), as in the example below. </p>
  
  <p><strong>Question:</strong> is there an easy way to either disable column "hist" and prevent it from being printed or prevent it from being calculated at all? Is there an option like <code>hist = FALSE</code>? </p>
  
  
  
  <pre class="lang-r prettyprint-override"><code>capture.output(skimr::skim(iris))
  #&gt;  [1] "Skim summary statistics"                                                                         
  #&gt;  [2] " n obs: 150 "                                                                                    
  #&gt;  [3] " n variables: 5 "                                                                                
  #&gt;  [4] ""                                                                                                
  #&gt;  [5] "-- Variable type:factor ------------------------------------------------------------------------"
  #&gt;  [6] " variable missing complete   n n_unique                       top_counts"                        
  #&gt;  [7] "  Species       0      150 150        3 set: 50, ver: 50, vir: 50, NA: 0"                        
  #&gt;  [8] " ordered"                                                                                        
  #&gt;  [9] "   FALSE"                                                                                        
  #&gt; [10] ""                                                                                                
  #&gt; [11] "-- Variable type:numeric -----------------------------------------------------------------------"
  #&gt; [12] "     variable missing complete   n mean   sd  p0 p25  p50 p75 p100"                              
  #&gt; [13] " Petal.Length       0      150 150 3.76 1.77 1   1.6 4.35 5.1  6.9"                              
  #&gt; [14] "  Petal.Width       0      150 150 1.2  0.76 0.1 0.3 1.3  1.8  2.5"                              
  #&gt; [15] " Sepal.Length       0      150 150 5.84 0.83 4.3 5.1 5.8  6.4  7.9"                              
  #&gt; [16] "  Sepal.Width       0      150 150 3.06 0.44 2   2.8 3    3.3  4.4"                              
  #&gt; [17] "     hist"                                                                                       
  #&gt; [18] " &lt;U+2587&gt;&lt;U+2581&gt;&lt;U+2581&gt;&lt;U+2582&gt;&lt;U+2585&gt;&lt;U+2585&gt;&lt;U+2583&gt;&lt;U+2581&gt;"                               
  #&gt; [19] " &lt;U+2587&gt;&lt;U+2581&gt;&lt;U+2581&gt;&lt;U+2585&gt;&lt;U+2583&gt;&lt;U+2583&gt;&lt;U+2582&gt;&lt;U+2582&gt;"                               
  #&gt; [20] " &lt;U+2582&gt;&lt;U+2587&gt;&lt;U+2585&gt;&lt;U+2587&gt;&lt;U+2586&gt;&lt;U+2585&gt;&lt;U+2582&gt;&lt;U+2582&gt;"                               
  #&gt; [21] " &lt;U+2581&gt;&lt;U+2582&gt;&lt;U+2585&gt;&lt;U+2587&gt;&lt;U+2583&gt;&lt;U+2582&gt;&lt;U+2581&gt;&lt;U+2581&gt;"
  </code></pre>
  
  <p>Changing the locale to Chinese (as in <a href="https://stackoverflow.com/a/44264760/4783029">this answer</a>) does not solve the problem, but makes it worse:</p>
  
  
  
  <pre class="lang-r prettyprint-override"><code>Sys.setlocale(locale = "Lithuanian")
  df &lt;- data.frame(x = 1:5, y = c("Ą", "Č", "Ę", "ū", "ž"))
  
  Sys.setlocale(locale = "Chinese")
  capture.output(skimr::skim(df))
  
  #&gt; Error in substr(names(x), 1, options$formats$.levels$max_char) : invalid multibyte string at '&lt;c0&gt;'
  </code></pre>