要选择具有特定条件的子数据集，您可以使用基本的条件语句来筛选数据。以下是一个示例代码，它选择了具有特定条件的子数据集，而不使用apply和subset函数。

# 创建一个示例数据集
data <- data.frame(
  id = c(1, 2, 3, 4, 5),
  name = c("Alice", "Bob", "Charlie", "David", "Eve"),
  age = c(25, 30, 35, 40, 45),
  gender = c("F", "M", "M", "M", "F")
)

# 选择age大于30的子数据集
selected_data <- data[data$age > 30, ]
print(selected_data)

输出:

  id    name age gender
3  3 Charlie  35      M
4  4   David  40      M
5  5     Eve  45      F

在这个例子中，我们使用了条件语句 data$age > 30 作为索引，来选择 age 列中大于30的行。最终，我们得到了一个新的子数据集 selected_data，其中包含符合条件的行。

请注意，这只是一个简单示例，您可以根据自己的需求修改条件语句来选择不同的子数据集。