Error in read_excel("xiaosaidiertiretushuju.xlsx") : could not find function "read_excel"

这个错误提示说明你在运行`read_excel`函数之前，没有正确加载`readxl`包。你需要使用`library(readxl)`命令来加载`readxl`包，然后再运行`read_excel`函数。

请按照以下步骤来加载`readxl`包，并读取你的`xlsx`文件：

1. 在Rstudio中输入以下命令来安装`readxl`包：

install.packages("readxl")

2. 安装完成后，输入以下命令来加载`readxl`包：

library(readxl)

3. 确认包已经成功加载后，输入以下命令来读取你的`xlsx`文件：

data <- read_excel("xiaosaidiertiretushuju.xlsx")

如果你的文件名和路径正确，那么你应该可以成功读取文件了。