R语言除去为NA的数据

你可以使用R语言中的函数来筛选不包含缺失值的数据列。可以使用函数`complete.cases()`来判断每一行是否包含缺失值，然后再使用函数`subset()`来筛选不包含缺失值的数据列。下面是一个示例代码：

data <- data.frame(x = c(1, 2, NA, 4), y = c(NA, 2, 3, 4), z = c(1, 2, 3, 4))
cols_without_na <- subset(data, select = !apply(data, 2, function(x) any(is.na(x))))

以上代码中，我们创建了一个名为`data`的数据框，其中包含了缺失值NA。然后我们使用`apply()`函数和`is.na()`函数来判断每一列是否包含缺失值，然后使用`any()`函数来判断是否有任何一个元素为TRUE。最后使用`subset()`函数来筛选不包含缺失值的数据列，并将结果保存在`cols_without_na`中。