如何以管道运算符格式编写此R表达式？

我试图将此表达式重写为magrittr的管道操作符：

打印（平均值（拉力（df，高度），na.rm=真实值））

对于我的数据集，返回175.4

我知道我必须从数据帧开始，并以>df%>%的形式编写它，但我不知道如何将它写出来。例如，na.rm=TRUE是否应该放入mean（）、pull（）或print（）中

更新：我实际上是通过反复试验才弄明白的

>df%>%
+pull(height)%>%
+mean(na.rm=TRUE)
+print()

returns 175.4 

---

使用如下虚拟数据制作一个可复制的示例是一个很好的实践：

height <- seq(1:30)
weight <- seq(1:30)
df <- data.frame(height, weight)

除非您的数据是嵌套的，否则您甚至可能不需要使用pull

df %>% summarise(mean = mean(height,na.rm=T))

此外，使用Summary，您可以将这些内容导入另一个数据框，而不仅仅是打印，并随时从数据框中调用它们

df %>% summarise(meanHt = mean(height,na.rm=T), sdHt = sd(height,na.rm=T)) -> summary
summary[1]
summary[2]

---

请参见

？平均值
na.rm
是
mean
的一个参数，你做过一点实验吗？另外，切题地说：我总是有点困惑，为什么人们总是试图获得如此“干净整洁”的表达，除了出于教学目的：
print（mean（df$height），na.rm=TRUE）
（或者
（mean（na.omit（df$height）））
）似乎非常容易理解……到目前为止，你尝试了什么？请提供一份
df %>% summarise(meanHt = mean(height,na.rm=T), sdHt = sd(height,na.rm=T)) -> summary
summary[1]
summary[2]