r语言对GDP.xls数据进行子集的提取： （1）利用下标运算提取第一个子表中1978年之后的数据 （2）提取第四个子表中满足条件“1978年之后且湖北在100-120区间”的所有数据 （3）写出导入GDP.xls的第二个子表并删除掉所有缺失值年份后的数据集

在R语言中，处理Excel文件（如GDP.xls）通常需要用到`readxl`包来读取数据，然后通过向量化操作和索引来提取所需的子集。下面是针对你提到的三个任务的步骤：

1. **提取第一个子表中1978年之后的数据**：

library(readxl)
# 读取数据
gdp_data <- read_excel("GDP.xls")
# 使用下标从第一行开始，跳过前一年的数据，直到找到1978年的数据
subset_1 <- gdp_data[which(gdp_data$Year >= 1978),]

2. **提取第四个子表中满足条件“1978年之后且湖北GDP在100-120区间”的所有数据**：
假设"GDP"列对应于湖北的GDP数值：

# 确保你知道每个子表的序号，这里假设第四张表格用gdp_table4表示
gdp_table4 <- gdp_table4[gdp_table4$Year >= 1978 & (gdp_table4$"湖北" >= 100) & (gdp_table4$"湖北" <= 120),]

注意：这里的`"湖北"`需要替换为实际的列名，如果湖北的数据不在列标题直接出现。

3. **导入GDP.xls的第二个子表并删除掉所有缺失值年份后的数据集**：

# 第二个子表
second_table <- gdp_data[gdp_data$Sheet == "第二张表格",]

# 删除缺失值
cleaned_second_table <- second_table complete.cases(select = -Year) # 假设Year列不会包含缺失值

请根据实际的文件内容、列标题和子表命名调整上述代码。