21

首先 - 我是编程和 R 的初学者，如果这是一个愚蠢的问题，请原谅。我无法查看从以下代码生成的 tibble 中的十多行。

下面的代码旨在查找书中最常见的单词。我得到了我想要的结果，但是我如何查看超过 10 行的数据。据我所知，它没有被保存为我可以调用的数据框。

library(dplyr)
tidy_books %>%
    anti_join(stop_words) %>%
    count(word, sort=TRUE)
Joining, by = "word"
# A tibble: 3,397 x 2
   word       n
   <chr>  <int>
 1 alice    820
 2 queen    247
 3 time     141
 4 king     122
 5 head     112
 6 looked   100
 7 white     97
 8 round     96
 9 voice     86
10 tone      81
# ... with 3,387 more rows
4

3 回答 3

26

尽管这个问题的答案很好，但@Marius 的评论要短得多，所以：

tidy_books %>% print(n = 100)

正如你所说你是一个初学者，你可以用n = 100你想要的任何数字替换

同样作为初学者，要查看整个表格：

tidy_books %>% print(n = nrow(tidy_books))
于 2019-02-21T02:11:11.343 回答
12

当我想看到这样的管道的输出时，我经常做的是将它直接管道到View()

library(dplyr)
library(tidytext)

tidy_books %>%
    anti_join(stop_words) %>%
    count(word, sort=TRUE) %>%
    View()

如果要将其保存到以后可以使用的新对象中，可以将其分配给管道开头的新变量名。

word_counts <- tidy_books %>%
    anti_join(stop_words) %>%
    count(word, sort=TRUE)
于 2018-03-06T03:06:27.497 回答
1

如果您想留在控制台中，请注意 tibbles 定义了 print S3 方法，因此您可以使用诸如（参见 参考资料?print.tbl）之类的选项：

very_long <- as_tibble(seq(1:1000))
print(very_long, n = 3)
# A tibble: 1,000 x 1
  value
  <int>
1     1
2     2
3     3
# ... with 997 more rows

注意，tail不使用 tibbles，所以如果你想结合tailtibbles 来查看数据的结尾，那么你必须执行以下操作：

print(tail(very_long, n = 3), n = 3)
# A tibble: 3 x 1
  value
  <int>
1   998
2   999
3  1000
于 2018-12-14T15:57:26.803 回答