微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

是否可以通过管道直接进入观星者?

如何解决是否可以通过管道直接进入观星者?

是否可以直接通过管道输入stargazer,而不是使用更复杂的方式?

示例:

date %>%
  filter(x1== "yes",x2 == "no") %>% 
  select(x5,x6) -> df
  
cols <- c("x5","x6") 

stargazer(
    df[,cols],type = "text",summary.stat = c("min","p25","mean","p75","max","median","sd","n") 
)

解决方法

是的,您应该能够在 select 中直接通过管道传输 stargazer 的结果。

library(dplyr)
library(stargazer)

mtcars %>%
  filter(cyl == 6) %>%
  select(wt,disp,cyl) %>%
  stargazer(type = "text",summary.stat = c("min","p25","mean","p75","max","median","sd","n"))

=================================================================
Statistic  Min  Pctl(25)  Mean   Pctl(75)  Max  Median St. Dev. N
-----------------------------------------------------------------
wt        2.620  2.822    3.117   3.440   3.460 3.215   0.356   7
disp       145    160    183.314  196.3    258  167.6   41.562  7
cyl         6      6      6.000     6       6     6     0.000   7
-----------------------------------------------------------------
,

我们可以使用

library(dplyr)
library(stargazer)
df %>%
    select(all_of(cols)) %>%
    stargazer(type = "text","n"))

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。