r - R中多个数字列的子集

Question

我有 3 列数据，每列都有一个数字距离值。

我成功地为每个单独的列创建了一个子集，以使用以下函数消除异常值：

newData <- subset(x, x < mean(x)+3*sd(x) & x > mean(x)-3*sd(x))

问题是，这会创建三个不同长度的新向量，我想对操作数据进行 t 检验。

如何最好地创建所有三列的子集，其中条件之外的数据被丢弃？