Error: index out of bounds with dplyr groupped data

[artemklevtsov]

Hi.

I have some problems with kable function with dplyr output. Example code.

library(dplyr)
library(psych)
library(knitr)

res <- mtcars %>%
    group_by(cyl) %>%
    do(describe(.$disp)) %>%
    select(-vars)
res
#> Source: local data frame [3 x 13]
#> Groups: cyl
#> 
#>   cyl  n  mean    sd median trimmed   mad   min   max range   skew kurtosis     se
#> 1   4 11 105.1 26.87  108.0   104.3 43.00  71.1 146.7  75.6 0.1206   -1.635  8.102
#> 2   6  7 183.3 41.56  167.6   183.3 11.27 145.0 258.0 113.0 0.7953   -1.229 15.709
#? 3   8 14 353.1 67.77  350.5   349.6 73.39 275.8 472.0 196.2 0.4529   -1.259 18.113
kable(res)
#> Error: index out of bounds
kable(as.data.frame(res))
#> | cyl|  n|  mean|    sd| median| trimmed|   mad|   min|   max| range|   skew| kurtosis|     se|
#> |---:|--:|-----:|-----:|------:|-------:|-----:|-----:|-----:|-----:|------:|--------:|------:|
#> |   4| 11| 105.1| 26.87|  108.0|   104.3| 43.00|  71.1| 146.7|  75.6| 0.1206|   -1.635|  8.102|
#> |   6|  7| 183.3| 41.56|  167.6|   183.3| 11.27| 145.0| 258.0| 113.0| 0.7953|   -1.229| 15.709|
#> |   8| 14| 353.1| 67.77|  350.5|   349.6| 73.39| 275.8| 472.0| 196.2| 0.4529|   -1.259| 18.113|
packageVersion('dplyr')
#> [1] ‘0.3.0.1’
packageVersion('knitr')
#> [1] ‘1.6.18’

Thanks.

[yihui]

Should be fixed now. Thanks!

[github-actions]

This old thread has been automatically locked. If you think you have found something related to this, please open a new issue by following the issue guide (https://yihui.org/issue/), and link to this old issue if necessary.