熊荣川

六盘水师范学院生物信息学实验室

xiongrongchuan@126.com    

http://blog.sciencenet.cn/u/Bearjazz

使用R语言输入输出表格，通常我们需要将表格转化成csv格式再使用read.csv及write.csv方程（http://blog.sciencenet.cn/blog-508298-548922.html）然后转化是一个较为麻烦的事情，而且只能允许有一个工作表。很多的R语言包弥补了这一不足，如XLConnect，举例代码如下：

library(XLConnect)

path = "D:/ziliao/优先阅读/R语言 学习/R语言中excel表格的读取与存储"

setwd(path)

xiong <- loadWorkbook("Odor_gb.xls") #读入Excel文件，支持xlsx格式

dataB <- readWorksheet(xiong, sheet = "Odor_gb") #提取其中一个名字叫做"Odor_gb"的工作表

dataB <- readWorksheet(xiong, sheet = "排序")  #提取其中一个名字叫做"排序"的工作表

createSheet(xiong, name = "CO2")  #新建一个名字叫做"CO2"的工作表

writeWorksheet(xiong, info.mat, sheet = "CO2") #将矩阵数据写入工作表"CO2"

saveWorkbook(xiong)  #保存文件

writeWorksheetToFile("filename.xlsx", data=mat, sheet="合并")

#将数据框数据mat保存到工作目录下一个叫做filename.xlsx的excel表中，所在工作表命名为“合并”

#################

20140107更新---更好的解决方案

#读入、输入

source('G:/database/R语言构建系统发育树平台/R语言构建系统发育树平台.r')

mat.m = read.excel("娃娃鱼形态数据20140107-雄性name.xlsx" , "data")

#输出，存储

writeWorksheetToFile("娃娃鱼形态数据20140106-完整.xlsx", data=mat.f, sheet="雌性")

20150802更新——换了台电脑出现“‘rJava’程辑包或名字空间载入失败，”

解决方案：我重新安装了JDK，并且是安装在默认路径。