Почему базовая функция R `print ()` требует тиббла? - PullRequest
Новая
       92

Почему базовая функция R `print ()` требует тиббла?

0 голосов
/ 30 апреля 2020

Почему для базовой функции R print() требуется тиббл при использовании аргумента n = X? Это видно из приведенных ниже примеров.

Это НЕ работает 

library(tidyverse)
mtcars %>% print(n = 20)
#> Error in print.default(m, ..., quote = quote, right = right, max = max) : 
#>   invalid 'na.print' specification

Это работает 

mtcars %>% as_tibble() %>% print(n = 20)
#> # A tibble: 32 x 11
#>      mpg   cyl  disp    hp  drat    wt  qsec    vs    am  gear  carb
#>    <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
#>  1  21       6 160     110  3.9   2.62  16.5     0     1     4     4
#>  2  21       6 160     110  3.9   2.88  17.0     0     1     4     4
#>  3  22.8     4 108      93  3.85  2.32  18.6     1     1     4     1
#>  4  21.4     6 258     110  3.08  3.22  19.4     1     0     3     1
#>  5  18.7     8 360     175  3.15  3.44  17.0     0     0     3     2
#>  6  18.1     6 225     105  2.76  3.46  20.2     1     0     3     1
#>  7  14.3     8 360     245  3.21  3.57  15.8     0     0     3     4
#>  8  24.4     4 147.     62  3.69  3.19  20       1     0     4     2
#>  9  22.8     4 141.     95  3.92  3.15  22.9     1     0     4     2
#> 10  19.2     6 168.    123  3.92  3.44  18.3     1     0     4     4
#> 11  17.8     6 168.    123  3.92  3.44  18.9     1     0     4     4
#> 12  16.4     8 276.    180  3.07  4.07  17.4     0     0     3     3
#> 13  17.3     8 276.    180  3.07  3.73  17.6     0     0     3     3
#> 14  15.2     8 276.    180  3.07  3.78  18       0     0     3     3
#> 15  10.4     8 472     205  2.93  5.25  18.0     0     0     3     4
#> 16  10.4     8 460     215  3     5.42  17.8     0     0     3     4
#> 17  14.7     8 440     230  3.23  5.34  17.4     0     0     3     4
#> 18  32.4     4  78.7    66  4.08  2.2   19.5     1     1     4     1
#> 19  30.4     4  75.7    52  4.93  1.62  18.5     1     1     4     2
#> 20  33.9     4  71.1    65  4.22  1.84  19.9     1     1     4     1
#> # ... with 12 more rows

1 Ответ

3 голосов
/ 30 апреля 2020

Ваш первый пример эквивалентен print(mtcars, n=20) - что тоже не получается.

Поскольку mtcars является data.frame, ваш вызов отправляется на print.data.frame. И, как вам скажет args(print.data.frame), в нем нет аргумента n=.

Короче говоря, вы запутались между отправкой Speci c (я предполагаю print.tbl ) с более общим подходом c.

Так что лучшим заголовком для вопроса может быть «Почему аргумент есть только у метода печати для столбцов» - для общего использования мы обычно просто вызываем head, как в 

R> head(mtcars)
                   mpg cyl disp  hp drat    wt  qsec vs am gear carb
Mazda RX4         21.0   6  160 110 3.90 2.620 16.46  0  1    4    4
Mazda RX4 Wag     21.0   6  160 110 3.90 2.875 17.02  0  1    4    4
Datsun 710        22.8   4  108  93 3.85 2.320 18.61  1  1    4    1
Hornet 4 Drive    21.4   6  258 110 3.08 3.215 19.44  1  0    3    1
Hornet Sportabout 18.7   8  360 175 3.15 3.440 17.02  0  0    3    2
Valiant           18.1   6  225 105 2.76 3.460 20.22  1  0    3    1
R>

который, конечно, также работает в конвейерном выражении.

...