na.omit去除Na列？

`na.omit()` 函数可以用来移除数据框或矩阵中包含缺失值（NA）的行。如果你想要移除包含 NA 的列，可以先使用 `t()` 函数将数据框或矩阵进行转置，然后再使用 `na.omit()` 函数进行行删除操作，最后再将结果进行转置。例如：

# 创建一个包含 NA 的数据框
df <- data.frame(a = c(1, 2, NA, 4), b = c(NA, 6, 7, 8), c = c(9, 10, 11, 12))

# 移除包含 NA 的列
df <- t(na.omit(t(df)))

在上面的例子中，我们使用 `t()` 函数将数据框进行转置，然后使用 `na.omit()` 函数进行行删除操作，最后再将结果进行转置，即可得到移除包含 NA 的列后的数据框。