在Perl中还需要循环按行读入文件，而在R中，一行代码解决问题：
df <- df[apply(df, 1, function(x) any(x > 200)), ]
这是一个使用apply函数对数据框df进行操作的表达式。apply函数用于对数据框、矩阵或数组进行元素级别的操作。
df：这是你要操作的数据框。
1：这是MARGIN参数，表示apply函数将沿着行（1）或列（2）对数据框进行操作。在这个例子中，我们沿着行进行操作。
function(x) any(x > 200)：这是apply函数的函数参数，表示对每一行（x）进行操作的函数。这个函数检查每一行是否有大于200的数值，并返回一个逻辑值。any(x > 200)返回TRUE如果至少有一个元素大于200，否则返回FALSE。
df..., ：这是一个逻辑索引操作，用于从数据框df中选择某些行或列。
..., ：这个表达式中的...表示一个逻辑向量，它决定了哪些行将被保留。在这个例子中，...是apply函数的结果，即一个逻辑向量，其中每个元素对应df中的一行。
, ]：这个部分表示选择所有列，因为, ]没有指定列索引，所以默认选择所有列。