嘿，这个需求超容易实现，我来给你一步步拆解：

首先得把你的Excel文件读进R里，最常用的工具是readxl包——如果还没装这个包，先执行下面的代码安装并加载：

install.packages("readxl")
library(readxl)

然后读取你的Excel文件，假设你的文件名叫my_excel_file.xlsx，目标列的列名是my_target_column：

# 读取整个工作表（如果只需要目标列，也可以指定cols_only来提速）
my_data <- read_excel("my_excel_file.xlsx")

# 只读取目标列的写法（更高效）
my_data <- read_excel("my_excel_file.xlsx", cols_only = "my_target_column")

数据导入后，提取指定行数的内容就很简单了，有两种常用写法：

方法1：直接用索引取值 #

• 提取前4个值到变量first_four：

first_four <- my_data$my_target_column[1:4]

• 提取前6个值到变量first_six：

first_six <- my_data$my_target_column[1:6]

方法2：用head()函数简化写法 #

R里的head()函数专门用来取数据集的前n行，写法更简洁：

• 前4个值：

first_four <- head(my_data$my_target_column, n = 4)

• 前6个值：

first_six <- head(my_data$my_target_column, n = 6)

如果你的目标列没有列名，或者你习惯用列的位置来访问，也可以这么写（比如目标列是第3列）：

first_four <- my_data[[3]][1:4]
# 或者用head()
first_four <- head(my_data[[3]], 4)

内容的提问来源于stack exchange，提问作者Jack swift