R：查找由不同列选择的列的平均值

Question

作业。

我有一个人的数据框，其中包括他们的年龄，性别以及他们是否在事故中死亡。例如：

Age    Sex    Survival
45     male   1
23     female 1
34     male   0
65     female 1

如果该人幸存下来，“生存”中的值会引爆。 1是幸存者，0死了。

我想实现一个以年龄为参数的函数，并返回生存概率。

我已经尝试过这段代码，但它对我不起作用：

fun <- function(x) mean(subset(data_with_only_males, Age = x))

Answer 1

我认为你需要在参数==中使用Age == x运算符（它测试相等性）。同时subset()在传递data.frame时返回data.frame，因此您需要使用$运算符从data.frame中选择生存变量，然后再取平均值。

fun <- function(x) 
    mean(subset(data_with_only_males, Age == x)$Survival)