R语言：如何限制DataFrame输出？及用dplyr筛选指定性别行的方法

问题1：如何在R语言中限制DataFrame的输出内容？ #

有几种实用的方法可以控制DataFrame的输出范围，根据你的需求选择即可：

• 调整全局输出设置：通过options()函数设置全局显示限制，比如想让所有DataFrame默认只显示前10行，可执行options(max.print = 10)；如果用的是dplyr的tibble格式，还能通过options(tibble.print_max = 5)限制tibble的默认显示行数。
• 快速查看首尾行：基础R的head(df, n=3)能直接显示前3行，tail(df, n=2)显示最后2行，dplyr里也支持链式调用df %>% head(3)，操作起来很便捷。
• 精准选取特定行：用dplyr的slice()函数可以指定具体行数，比如df %>% slice(2:4)只显示第2到4行；如果想随机选几行，用slice_sample(n=2)就可以实现。
• 打印时临时指定：直接调用print(df, n=4)可以强制只显示4行，要是你想看到所有列但限制行数，tibble还支持print(df, width=Inf)。

问题2：按性别分组各取一行数据的正确方法 #

你之前用arrange(Gender)再选中间行的方法不太可靠——这完全依赖数据的排序结果和每个性别的数据量，很容易选到错误的行。更稳妥的做法是用分组选取的方式，这里给你几种dplyr的实现方法：

方法1：每个性别取第一行（按数据原有顺序） #

library(dplyr)
df %>% 
  group_by(Gender) %>%  # 按Gender字段分组
  slice_head(n=1) %>%   # 每个组取第一行数据
  ungroup()             # 取消分组（可选，但推荐保持数据结构整洁）

如果想取每个性别的最后一行，把slice_head换成slice_tail就行。

方法2：每个性别随机抽取一行 #

如果不需要固定顺序，想随机选样本，用slice_sample：

df %>% 
  group_by(Gender) %>% 
  slice_sample(n=1) %>% 
  ungroup()

方法3：不用dplyr的基础R实现 #

要是你不想加载dplyr包，也可以用基础R的函数组合：

do.call(rbind, lapply(split(df, df$Gender), function(x) x[1, ]))

这个代码会先把数据按Gender拆分，然后每个子集取第一行，最后合并成新的DataFrame。

内容的提问来源于stack exchange，提问作者steves