如何删除列中多个数据帧的一列中的异常值

Question

age <- runif(100, min=0, max=100)
freq <- runif(100)
age1 <- runif(100, min=0, max=100)
freq1 <- runif(100)
df1 <- data.frame(age, freq)
df2 <- data.frame(age1, freq1)
list <- list(df1, df2)

如何删除年龄为异常值的行，并对列表中的所有数据帧重复此操作？另外，如何删除频率为异常值的行？如果任何一个是异常值（相对于相同类型的其他值），我想删除该行。

谢谢！