R中有xlsx包
使用方式：library(xlsx)
               workbook <- "xxx"(文件路径)
               data <- read.xlsx(workbook)
               

可参考以下链接：
https://bbs.pinggu.org/thread-3600983-1-1.html

这个方法也不行，错误如下。

> file <- system.file("tests", "test_import.xlsx", package = "xlsx")
> res <- read.xlsx(file, 1)  # read first sheet
Error: could not find function "read.xlsx"
> head(res)
Error in head(res) : object 'res' not found
> library(xlsx)
载入需要的程辑包：rJava
Error : loadNamespace()里算'rJava'时.onLoad失败了，详细内容：
  调用: fun(libname, pkgname)
  错误: JAVA_HOME cannot be determined from the Registry
Error: 无法载入程辑包‘rJava’
> file <- system.file("tests", "test_import.xlsx", package = "xlsx")
> res <- read.xlsx(file, 1)  # read first sheet
Error: could not find function "read.xlsx"
> head(res)
Error in head(res) : object 'res' not found
> library("xlsx", lib.loc="D:/Program Files/R/R-3.2.2/library")
载入需要的程辑包：rJava
Error : loadNamespace()里算'rJava'时.onLoad失败了，详细内容：
  调用: fun(libname, pkgname)
  错误: JAVA_HOME cannot be determined from the Registry
Error: 无法载入程辑包‘rJava’
> library("rJava", lib.loc="D:/Program Files/R/R-3.2.2/library")
Error : loadNamespace()里算'rJava'时.onLoad失败了，详细内容：
  调用: fun(libname, pkgname)
  错误: JAVA_HOME cannot be determined from the Registry
Error: ‘rJava’程辑包或名字空间载入失败，
> library(xlsx)
载入需要的程辑包：rJava
Error : loadNamespace()里算'rJava'时.onLoad失败了，详细内容：
  调用: fun(libname, pkgname)
  错误: JAVA_HOME cannot be determined from the Registry
Error: 无法载入程辑包‘rJava’
> file <- system.file("tests", "test_import.xlsx", package = "xlsx")
> ??read.csv
> getwd()

Perfect，非常感谢这位专家！ 必须把Java和R安装到同一个目录才能行！

感觉导入txt直接读取更简洁