想象一下以下数据:
data <- tribble(
~a1, ~a2, ~b1, ~b2, ~c1, ~c2,
32, 32, 50, 12, 12, 50,
48, 20, 55, 43, 10, 42
)
Run Code Online (Sandbox Code Playgroud)
对于 i = {1, 2} 我想计算deltai = (ai - ci) / ((ai + bi) * ci + ai)。
(我明确使用随机数和随机函数;通过识别和利用某些模式无法找到解决方案。)
最简单的方法是
data <- data %>%
mutate(
delta1 = (a1 - c1) / ((a1 + b1) * c1 + a1),
delta2 = (a2 - c2) / ((a2 + b2) * c2 + a2)
)
Run Code Online (Sandbox Code Playgroud)
但它引入了很多重复。
我可以
delta …Run Code Online (Sandbox Code Playgroud)