r - 如何从内置函数 R 中关闭报告

Question

我刚刚完成了自己的功能。问题是我在我的函数中使用top_n包dplyr中的函数。然后当我运行我的函数时，它会返回top_n（图）的报告。我想知道我是否可以隐藏它们？我尝试使用喜欢

invisible(capture.output(topgenename[[m]]<-rownames(dplyr::top_n(data.frame(kurt1[,m]),3))))

但它只是调整报告的颜色（黑色到红色，图）。

任何帮助表示赞赏！非常感谢！

标签： rfunction

Answer 1

您可以通过在 中明确指定变量名称来隐藏消息top_n。

library(dplyr)
mtcars %>% top_n(3)

#Selecting by carb #<- See the message
#                     mpg cyl disp  hp drat   wt qsec vs am gear carb
#Mazda RX4           21.0   6  160 110 3.90 2.62 16.5  0  1    4    4
#Mazda RX4 Wag       21.0   6  160 110 3.90 2.88 17.0  0  1    4    4
#Duster 360          14.3   8  360 245 3.21 3.57 15.8  0  0    3    4
#...
#...


mtcars %>% top_n(3, carb)
#Message gone
#                    mpg cyl disp  hp drat   wt qsec vs am gear carb
#Mazda RX4           21.0   6  160 110 3.90 2.62 16.5  0  1    4    4
#Mazda RX4 Wag       21.0   6  160 110 3.90 2.88 17.0  0  1    4    4
#Duster 360          14.3   8  360 245 3.21 3.57 15.8  0  0    3    4
#...
#...

旁注，top_n已使用 slice_max/作为超级种子，slice_min如果您不指定变量名，将返回错误。

mtcars %>% slice_max(n = 3)

错误：order_by缺少参数，没有默认值。

mtcars %>% slice_max(n = 3, carb)