Tag: r
如何将多个xlsx文件读入R，然后将它们存储为以xlsx文件名称标记的单独列表？
我有一个文件夹与众多的xlsx文件，都需要以完全相同的方式格式化。 我想将它们读入R中，并将它们存储为可以使用xlsx文件名引用的列表，以便通过格式化代码提供。 这是我发现的基于for循环中迭代值的代码。 library("xlsx") library("gdata") library("rJava") setwd("C:/Users/Owner/Desktop/FolderDatabase") getwd() files = list.files(pattern = "\\.xlsx") #View(files) dfList <- list() for (i in seq_along(files)){ dfList[[paste0("excel",i)]] <- read.xlsx(files[i], sheetIndex = 1) } # Calling the xlsx lists that were created from the directory dfList$excel1 dfList$excel2 dfList$excel3 dfList$excel4 如果xlsx文件被命名为myname1.xlsx，我希望列表被命名为myname1。
从R导出结果到Excel电子表格？
我试图下载xlsx包，但似乎不存在了。 有什么build议么？ 谢谢！
有没有办法将多个数据框条目连接成单个条目？
我正在使用Excel电子表格中的一些活动前和活动后的数据，其中一个问题可能有几个答案（学生必须select所有正确的答案才能得到这个问题的全部功劳），但数据最初的格式，每个单独的回答都列在自己的行中，其他元数据（数据库信息，学生用户名，性别等）只是复制到每一行 – 我将在下面的例子中详细说明。 >data Database Username Gender InterviewType Question Answer 1 steve Male Pre Which of the following… "Response 1" 1 steve Male Pre Which of the following… "Response 2" 1 steve Male Pre Which of the following… "Response 3" 1 steve Male Pre Please indicate your race. "White" 1 steve Male Pre Explain how […]
将数据导入到R时警告消息
我是R的新手，需要一些关于R的基本的帮助和build议，可以帮我解决我的错误。 我试图从Excel导入数据到R中。 我的数据来自excel如下： psl.Pascal tos.K ua va 1 100828.2 300.6350 -2.90855289 -5.04159784 2 100865.4 300.6375 -1.97473240 -3.88418388 3 100781.0 301.3094 -1.22099233 -2.78284335 4 100842.8 302.0707 -0.33391580 -2.04903889 而我的编码： setwd("D:/Saved documents/research/data/msia_RCP_4.5") getwd() malaysia<-read.table("msia_RCP_4.5_CSIR045.csv",header=T, sep=",") malaysia 当我运行我的编码，我得到如下所示的结果： > setwd("D:/Saved documents/research/data/msia_RCP_4.5") > getwd() [1] "D:/Saved documents/research/data/msia_RCP_4.5" > malaysia<-read.table("msia_RCP_4.5_CSIR045.csv",header=T, sep=",") Error in file(file, "rt") : cannot open the connection […]
neural networkR包中的计算函数在复制时不工作
我在neuralnet训练了一个模型，我想弄清楚如何在Excel中计算结果。 使用你从包中调用的computefunction一切正常。 但是我在Rstudio和github页面中使用F2进入源代码，并且函数不工作，并停止在relist()函数上，并给出了错误： Error in relist(weights, nrow.weights, ncol.weights) : unused argument (ncol.weights) 我认为问题是relist( ）函数，但是我不知道如何在没有它的情况下转换权重。 neuralnet包不带有它自己的版本的relist() 。 如果忽略relist行，则会出现以下错误： Error in neurons[[i]] %*% weights[[i]] : non-conformable arguments因为weights未正确转换，所以出现Error in neurons[[i]] %*% weights[[i]] : non-conformable arguments 。 我在自己的数据上尝试了同样的事情，得到了同样的错误。 library(neuralnet) normalize <-function(x) { return((x – min(x))/(max(x) – min(x))) } newdf <- Cars93 newdf = na.omit(newdf) newdf <- newdf[complete.cases(newdf),] newdf$Cylinders <- […]
R在excel文件中读取合并单元格作为列标题
在生物测定中，我们经常从同一个分子重复测量，然后用2或3次重复的平均值绘制剂量反应曲线。 我想读入一个excel文件，其中的复制列标题已被合并 – 文本示例如下，并链接到示例文件 。 readxl包的read_excel函数可以读取文件，但取消标题单元并用NAsreplace空单元。 conc | Sample1 | 样品2 ——————————————- 10 | 1.5 | 2.5 | 3 | 4 ——————————————- 100 | 15 | 25 | 30 | 40 ——————————————- 1000 | 150 | 250 | 300 | 400 有没有办法保留R中的合并单元格布局，或者在列中读取并自动复制/重新编号像下面的标题？ conc | Sample1.1 | Sample1.2 | Sample2.1 | Sample2.2 ————————————————– ———— 10 | […]
R Shiny导出logging到由用户命名的Excel工作簿
我试图编写一个Shiny应用程序只是为了练习应用程序需要一张Excel表格，从Excel工作表抓取一个ID号码，并对数据库运行这些ID从数据库返回一些额外的细节 就这个例子而言，我已经导入了数据并计算了数据集中的行数。 然后，我将这个数据集传递给函数get_DW ，它将返回一个dataframe，我想要计算返回的dataframe中的logging数。 当用户按下Gobutton时，会发生此步骤 当我运行我的shiny的应用程序，数据导入和logging的数量进行计数。 我也设法让它从数据库返回logging并计算这些logging。 我无法导出使用output$downloadData ，没有任何反应。 我按下button获取对话框保存，但是当我input文件名，然后按保存没有得到保存到文件夹 任何人都可以看到在代码中我可能会出错的地方。 我已经看到了这个问题从XLConnect R下载Excel文件Shiny，但它不使用我想要的库和我不是很清楚的解释给出 我更新了下面的代码来使用虹膜数据集。 它有点乱，但它复制了节省的缺乏 服务器代码 # Server Code server <- shinyServer(function(input, output) { # Create a reactive expression which will grab the data # We pass that to the outputs reactive element to the outputs data <- reactive({ iris }) # Return the number […]
有没有办法在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)
用R查询Aspen IP21标记值
我希望使用我的R脚本查询（读取）IP21标记值。 有没有办法做到这一点？ 最接近的是我用ASPEN插件function填充Excel工作表，然后读取R中的值。有直接的方法来读取IP21的值吗？ IP21 ODBC有帮助吗？
将数据框列表写入多张表格中的Excel
我有一个数据框，我运行一些分析，我想将结果导出到Excel文件。 一个工作簿每个组和每个分析结果在一个单独的选项卡上。 我宁愿使用openxlsx进行导出，将java排除在外。 library(plyr) library(dplyr) library(openxlsx) df <- iris # Analysis 1 results1 <- df %>% group_by(Species) %>% summarise(count = n()) # Analysis 2 results2 <- df %>% group_by(Species) %>% summarise(mean.sl = mean(Sepal.Length), mean.sw = mean(Sepal.Width)) 我希望的导出输出将是三个Excel工作簿， setosa.xlsx ， versicolor.xlsx和virginica.xlsx ; 每个都包含两个工作表“results1”和“results2”，只包含他们的组内结果。 意味着杂色的Excel文件中没有setosa行。 我试图将results1和results2分成数据框的列表，以便与write.xlsx使用lappy ，但我无法使其工作。 r1_list <- dlply(results1, .(Species)) r2_list <- dlply(results2, .(Species)) 其他build议？
