使用 R ｜> 管道的链式算术运算符

R.version$version.string
# [1] "R version 4.2.2 (2022-10-31 ucrt)"

x <- 2
# With dplyr/magrittr, you can use backticks for arithmetic operators
x %>% `+`(2)
# [1] 4

# But that doesn't work with the inbuilt R pipe operator
x |> `+`(2)
#  Error: function '+' not supported in RHS call of a pipe

2 |> (`+`)(3)
#> [1] 5

2 |> `+`(lhs = _, 3)
#> [1] 5

2 |> `+`(foo = _, 3)
#> [1] 5
2 |> `+`(bar = _, 3)
#> [1] 5
2 |> `+`(lhs = _, 3)
#> [1] 5
2 |> `+`(rhs = _, 3)
#> [1] 5

c(1, 3) %*% t(c(1, 4))
c(1, 3) |> `%*%`(foo = _, t(c(1, 4)))
c(1, 3) |> `%*%`(bar = _, t(c(1, 4)))
c(1, 3) |> (`%*%`)(t(c(1, 4)))
# they all return
#>      [,1] [,2]
#> [1,]    1    4
#> [2,]    3   12

c(1, 3) |> `%*%`(foo = _, t(c(1, 4)))
#>      [,1] [,2]
#> [1,]    1    4
#> [2,]    3   12

c(1, 3) |> `%*%`(t(c(1, 4)), foo = _)
#>      [,1]
#> [1,]   13

R相关问答推荐

在ggplot的注释表格中突出显示最大值

使用R中的gt对R中的html rmarkdown文件进行条件格式设置表的单元格

具有多个依赖变量/LHS的逻辑模型

更新合适的R mgcv：：bam模型报告无效类型(关闭).'';错误

使用tidyverse方法绑定行并从一组管道列表执行左连接

如何计算R数据集中每个女性的子元素数量？

如何在区分不同条件的同时可视化跨时间的连续变量？

如何直接从R中的风险分数计算c指数？

使用R闪光显示所有数据点作为默认设置

在不丢失空值的情况下取消列出嵌套列表

ComplexHEAT：使用COLUMN_SPLIT时忽略COLUMN_ORDER

如何指定我的函数应该查找哪个引用表？

条形图顶部与其错误条形图不对齐

具有重复元素的维恩图

从非重叠(非滚动)周期中的最新数据向后开窗并在周期内计数

悬崖三角洲超大型群数计算导致整数溢出

将标识符赋给事件序列，避免错误观察

使用gt_summary是否有一种方法来限制每个变量集进行配对比较？

对R中的列表列执行ROW Mean操作

生存时间序列的逻辑检验