Question

我想计算一个变量＆＃34; value＆＃34;，这取决于＆＃34; a＆＃34;和＆＃34; b＆＃34;：

type＆＃34; A＆＃34; value =（sum（a_A1） - mean（a_A））/ sd（a_A）+（sum（b_A1） - mean（b_A））/ sd（b_A））/ 2

type＆＃34; B＆＃34; value =（sum（a_B1） - mean（a_B））/ sd（a_B）+（sum（b_B1） - mean（b_B））/ sd（b_B））/ 2

type＆＃34; C＆＃34;值=   ....

set.seed(101)

type <- c("A","B","A","A","C","B", "C", "World")
a <- abs(rnorm(8) * 5)
b <- abs(rnorm(8) * 5)
df <- data.frame(type,a,b)

我试过这样：

df <- transform(df, value = ave(df$a, df$b, df$type, 
                    FUN = function(a,b) ((sum(a)-mean(a))/sd(a) +(sum(b)-mean(b)/sd(b))/2))

但它没有用。

所以任何人都可以告诉我如何计算＆＃34;价值＆＃34;。

Answer 1

在评论Sotos和您的澄清之后，您可能需要：

library(dplyr)

df %>% 
 group_by(type) %>% 
 mutate(value = ((a-mean(a))/sd(a) +(b-mean(b)/sd(b))/2))

根据行的其他变量计算变量

1 个答案: