Tag: xlconnect

有没有办法在Excel中运行R？

我在Excel中有数据框架，我想运行模型并返回预测和汇总统计。 目前，我将数据导出到R，运行线性模型并使用XLConnect返回系数。 虽然这适用于线性模型，但对于更复杂的模型（如广义相加模型，因为系数不完全可用）而言并不适用。 我想知道是否有更好的方法来做上面的操作。 我现在做的例子是非最优的： library(XLConnect) dat <- data.frame(rsp = rnorm(100, 0, 1), pred1 = rnorm(100, 0, 1), pred2 = rnorm(100, 0, 1)) model <- lm(rsp ~ pred1 + pred2, data = dat) writeWorksheetToFile("model1.xlsx", data = summary(dat), sheet = "summary", header = TRUE, clearSheets = TRUE)

将多个xl文件读入数据框

我一直在使用XLConnect函数loadworkbook将每个xlsx文件加载到R然后rbind将它们合并在一起。 这样做的最好方法是什么，而不是写多个DF来稍后合并它们。 我正在尝试使用下面的代码将我的Excel文件合并到2个数据框（大多数文件的2个工作表名称）。 列总是相同的，但文件名将会改变。 当前/缓慢的方式 require(XLConnect) df <- loadWorkbook(paste(location,'UK.xlsx',sep="")) dfb <- loadWorkbook(paste(location,'US.xlsx',sep="")) UK <-readWorksheet(df,sheet="School",startRow=0,startCol=0,autofitRow=TRUE,endCol=21,header=TRUE) US <-readWorksheet(dfb,sheet="School",startRow=0,startCol=0,autofitRow=TRUE,endCol=21,header=TRUE) School <- rbind(UK,US) UK <-readWorksheet(df,sheet="College",startRow=0,startCol=0,autofitRow=TRUE,endCol=21,header=TRUE) US <-readWorksheet(dfb,sheet="College",startRow=0,startCol=0,autofitRow=TRUE,endCol=21,header=TRUE) College <- rbind(UK,US) 新的代码 require(readxl) filelist<- list.files(location,pattern='xlsx',full.names = T)如果不是每个文件都具有sheetname，我怎样才能将每个sheetname读入数据框。 我需要2个数据框1为学校和1为学院。 我想我需要尝试像Schools <-lapply(filelist, read_excel, sheet="School")但我得到错误：表'学校'找不到。 我认为这个错误是因为表单学校不在每个文件上。 我正在使用list.files因为文件名不总是相同的。

将数据从Excel加载到R – 第一列中出现的额外date？

在我尝试从Excel加载数据到R： > book <- loadWorkbook(file.choose()) > signals = readWorksheet(book, sheet = "signals", header = TRUE) > signals 它返回： time signal1 signal2 1 1899-12-31 08:30:00 0.43 -0.20 2 1899-12-31 08:31:00 0.54 0.33 3 1899-12-31 08:32:00 0.32 -0.21 为什么我要1899-12-31这个专栏？ 这些绝对不在Excel表格中。 其余的是正确的。

R下载并自动读取许多Excel文件

我需要下载几百个excel文件并每天将它们导入到R中。 每一个应该是他们自己的数据框架。 我有一个csv。 文件与所有的地址（地址保持静态）。 csv。 文件看起来像这样： http://www.www.somehomepage.com/chartserver/hometolotsoffiles%a http://www.www.somehomepage.com/chartserver/hometolotsoffiles%b http://www.www.somehomepage.com/chartserver/hometolotsoffiles%a0 http://www.www.somehomepage.com/chartserver/hometolotsoffiles%aa11 etc….. 我可以用一个文件来做到这一点： library(XLConnect) my.url <- "http://www.somehomepage.com/chartserver/hometolotsoffiles%a" loc.download <- "C:/R/lotsofdata/" # each files probably needs to have their own name here? download.file(my.url, loc.download, mode="wb") df.import.x1 = readWorksheetFromFile("loc.download", sheet=2)) # This kind of import works on all the files, if you ran them individually 但我不知道如何下载每个文件，并将其分别放在一个文件夹中，然后将它们全部导入到R中作为单独的dataframe。

XLConnect setcellformula的用法

我正在浏览XLConnect软件包参考手册。 我遇到了一个名为“SetCellFormula”的函数及其示例。 我试图实现这个数据导入到Excel中的文本文件。 我想要做的是以下1.将200行和400列的数据导入到Excel文件中。 2.对于包含400列的每行数据，计算平均值，中位数，最小值和最大值，并将结果放在另一张表中。 我想使用SetCellFormula万一我想直接编辑到Excel中的单元格，因为有像idx2col，col2idx，ecdt相关的function。 我发现对于单行来说很容易。 有没有可能为单个语句中的所有行做这件事？ 3.请注意，根据可用数据的types，行和列的值可能会有所不同。 请让我知道如何继续这一点。

R，XLConnect：用RGB代码设置颜色

我遇到了以下问题。 大量的数据被写入Excel文件。 在书面的Excel表格中，我想将单元格颜色设置为非预定义的值（这是写入单元格的数字的函数）。 例如：给定单元格中的数字越高，单元格越绿。 我知道解决scheme存在的包xlsx （见这里和这里 ）。 但是我已经在整个项目中使用了XLConnect ，并且不想转换到目前为止所有的代码。 目前，我使用下面的代码来设置单元格颜色： # create the excel workbook wb <- loadWorkbook("FILENAME.xls", create=TRUE)` # Create a CellStyle with yellow solid foreground CellColor <- createCellStyle(wb) setFillPattern(CellColor, fill = XLC$"FILL.SOLID_FOREGROUND") setFillForegroundColor(CellColor, color = XLC$"COLOR.YELLOW") # apply the CellStyle to a given cell, here: (10,10) setCellStyle(wb, sheet=SHEETNAME, row=10, col=10, cellstyle=CellColor) # save […]

如何将Excel中的自定义时间格式值导入到R？

我有一个R脚本循环并使用XLConnect包将多个Excel电子表格读取到R中。 单独的电子表格被组合成一个大的数据框架，然后写出一个.csv文件，以便在Excel中进一步使用。 newDf <- readWorksheetFromFile(filename,sheet=newid,header=TRUE, startRow=1,endRow=17,startCol=1,endCol=6) Excel文件具有自定义格式的一列时间值：HH：MM：SS.000 即00：18：06.264 当我打开生成的csv文件时，此列的值显示为，例如， 1899-12-31 00:06:18 虽然我可以很容易地删除date（我不想要的），事实上，我的问题是秒的小数点丢失。 我需要保持他们。 什么是我保持自定义时间格式完整的正确方法？ 谢谢。

R（XLConnect）如果工作表的大小很大，则将所有工作表合并为一个

我想将所有未知数量的工作表合并到一个csv中。 这是我的尝试。 options(java.parameters = "-Xmx4g" ) library(XLConnect) xlcMemoryReport() xlcFreeMemory() xlcMemoryReport() wb=loadWorkbook(exelfiles[i]) df=do.call(rbind,lapply(getSheets(wb),function(sheet)readWorksheet(wb,sheet))) write.csv(df,"final.csv",row.names=F) 如果excel文件的大小很小，则正在工作。 但不适用于更大的Excel文件。 在它回来之后 Error: OutOfMemoryError (Java): GC overhead limit exceeded

XLConnect从多个excel文件中导入相同的选项卡，包括文件名

我有大约100个Excel标签文件。 我想要： 从不同的文件导入相同的标签（标签在所有excel文件中都有相同的名称） 添加一个文件名的列 将所有导入的选项卡保存到1个表格（每行的文件名作为源标识符） 我是一个非常新的R，还没有很远。 谢谢，Veerle

如何在xlsx中编写和修改单元格的格式

运行这个代码之后 library(XLConnect) template <- loadWorkbook ( filename = "template.xlsx" , create = T ) createSheet ( template , c("sheet1","sheet2") ) # setStyleAction(template,XLC$"STYLE_ACTION.NONE") Data <- data.frame( a = 1:10, b = 11:20 ) setDataFormatForType(template, type = XLC$DATA_TYPE.NUMERIC, format = "0.00" ) # list22$`Brand Equity` <- as.numeric(list22$`Brand Equity`) # list22$`Purchase Intent` <- as.numeric(list22$`Purchase Intent`) csHeader <- createCellStyle(template, […]