撇去:如何删除直方图？

Question

我想在Windows上使用来自R包skimr的函数skimr。不幸的是，在许多情况下，hist被错误地打印(带有许多<U+2587>-like符号)，如下面的示例所示。

问题：是否有一种简单的方法可以禁用列"hist“并阻止它被打印，或者完全阻止它的计算？有像hist = FALSE这样的选项吗？

capture.output(skimr::skim(iris))
#>  [1] "Skim summary statistics"                                                                         
#>  [2] " n obs: 150 "                                                                                    
#>  [3] " n variables: 5 "                                                                                
#>  [4] ""                                                                                                
#>  [5] "-- Variable type:factor ------------------------------------------------------------------------"
#>  [6] " variable missing complete   n n_unique                       top_counts"                        
#>  [7] "  Species       0      150 150        3 set: 50, ver: 50, vir: 50, NA: 0"                        
#>  [8] " ordered"                                                                                        
#>  [9] "   FALSE"                                                                                        
#> [10] ""                                                                                                
#> [11] "-- Variable type:numeric -----------------------------------------------------------------------"
#> [12] "     variable missing complete   n mean   sd  p0 p25  p50 p75 p100"                              
#> [13] " Petal.Length       0      150 150 3.76 1.77 1   1.6 4.35 5.1  6.9"                              
#> [14] "  Petal.Width       0      150 150 1.2  0.76 0.1 0.3 1.3  1.8  2.5"                              
#> [15] " Sepal.Length       0      150 150 5.84 0.83 4.3 5.1 5.8  6.4  7.9"                              
#> [16] "  Sepal.Width       0      150 150 3.06 0.44 2   2.8 3    3.3  4.4"                              
#> [17] "     hist"                                                                                       
#> [18] " <U+2587><U+2581><U+2581><U+2582><U+2585><U+2585><U+2583><U+2581>"                               
#> [19] " <U+2587><U+2581><U+2581><U+2585><U+2583><U+2583><U+2582><U+2582>"                               
#> [20] " <U+2582><U+2587><U+2585><U+2587><U+2586><U+2585><U+2582><U+2582>"                               
#> [21] " <U+2581><U+2582><U+2585><U+2587><U+2583><U+2582><U+2581><U+2581>"

将语言环境改为中文(如在this answer中)并不能解决问题，但会使问题变得更糟：

Sys.setlocale(locale = "Lithuanian")
df <- data.frame(x = 1:5, y = c("Ą", "Č", "Ę", "ū", "ž"))

Sys.setlocale(locale = "Chinese")
capture.output(skimr::skim(df))

#> Error in substr(names(x), 1, options$formats$.levels$max_char) : invalid multibyte string at '<c0>'

Answer 1

skim_with(numeric = list(hist = NULL)) --这是在“使用Skimr”中的小插曲。

Answer 2

您也可以使用skim_without_charts而不是skim。

这里的文档中有更多的细节：

https://www.rdocumentation.org/packages/skimr/versions/2.0.2/topics/skim

Answer 3

还请记住，skimr的输出是一个dataframe，因此可以这样做：

# I'm using tidyverse here

iris %>%
    skim() %>%
    select(-numeric.hist)

问题是，列的名称不是hist，而是numeric.hist。

我之所以问这个问题，是因为我想做相反的事情:只保留直方图。