在R中使用summarise（）的输出

Question

如何在R中使用summarise（）的输出。我知道它会创建一个表，但似乎无法将其用于进一步的计算。 我正在尝试计算样本比例的误差幅度。

us_pro <- us12 %>%
   summarise(us_prop=sum(response == "atheist")/sum(response == "atheist" | response == "non-atheist"), n=n()) %>%
    as.data.frame()


us_pro %>%
  me_perc=qnorm(0.975)*sqrt(us_prop*(1-us_prop)/n)

ME计算错误出因

  

eval（expr，envir，enclos）中的错误：找不到对象'us​​_prop'调用：    ...处理-> withCallingHandlers-> withVisible-> eval   ->评估执行停止

我猜这是一个非常基本的错误，但是我不明白是什么