我有3列数据，每列都有一个数字距离值 .
我成功地为每个列创建了一个子集，以消除具有以下功能的异常值：
newData <- subset(x, x < mean(x)+3*sd(x) & x > mean(x)-3*sd(x))
问题是，这会产生三个不同长度的新向量，我想对被操纵的数据进行t检验 .
如何最好地创建所有三列的子集，其中条件之外的数据将被丢弃？