组合具有相同值的行并应用函数以获得比率

Question

我的数据集看起来像这样

time   value
0.1    2
0.1    3
0.2    2
0.2    4
0.2    1

我也有一个阈值threshold = 2.5

我想将具有相同时间点的行组合起来并计算高于阈值的比率并返回如下表格：

time    value
0.1     0.50
0.2     0.33

我曾尝试使用data.table将所有行组合在一起，但我在编写每个时间点的比率时遇到了一些麻烦。我知道我可以写一些for loop，但我想知道是否有更多的R方法来解决这个问题。

我的想法是这样的：

results <- dt[,some_function(value, threshold),by=time]

提前谢谢。