我如何在公式中插入速度数据

how do i plug velocity data in a formula

(Rstudio) 假设我有一个数据集:

Circle  X    Y
 A      21   8
 A      32   17
 A      23   32
 B      22   4
 B      43   12
 C      12   4

如何插入此数据并将新数据框创建到此等式中: Vxn = ((X(最大值))-(X(最小值)))/(每个唯一圆的频率)

我们可以按 'Circle' 分组,循环 across 'X','Y',列得到 maxmin 的差异该列的值除以元素数,通过指定 .names

创建后缀为“_scale”的新列
library(dplyr)
df2 <- df1 %>%
    group_by(Circle) %>%
    mutate(across(c(X, Y), ~  (max(.) - min(.))/n(), .names = '{.col}_scale')) %>%
      ungroup

-输出

df2
# A tibble: 6 x 5
#  Circle     X     Y X_scale Y_scale
#  <chr>  <int> <int>   <dbl>   <dbl>
#1 A         21     8    3.67       8
#2 A         32    17    3.67       8
#3 A         23    32    3.67       8
#4 B         22     4   10.5        4
#5 B         43    12   10.5        4
#6 C         12     4    0          0

数据

df1 <- structure(list(Circle = c("A", "A", "A", "B", "B", "C"), X = c(21L, 
32L, 23L, 22L, 43L, 12L), Y = c(8L, 17L, 32L, 4L, 12L, 4L)), 
class = "data.frame", row.names = c(NA, 
-6L))