-
0 votesanswersviews
R：循环在存储在矩阵中的数据帧上执行ks测试
我为奇怪的语法道歉，我现在正在学习编程 . 我有一个100列和5304行的df . 我需要使用第5个数字列或参考列在94个最后的数字列（6：ncol（df））上执行单独的双面ks.tests： r<-df$rank. 我还想将pvalues存储在一个矩阵中 . 据我所知，我可以使用'for loop'或'apply'函数 . 我有一个简单的代码，只输出一个统计摘要（似乎它覆盖了结果）： f... -
1 votesanswersviews
在R中，使用二项式（）和lapply来约束0（1）之间的predict（）值
我有一个GLM，family = binomial（link = logit）模型，我在predict（）函数中应用，如下所示 . 预测值超过零和1，但我希望将它们保持为概率 . 所以我使用了binomial（）$ inverse命令，然后可以在apply函数中使用它 . 我第一次运行它时工作得很好，但是在关闭R并再次启动之后，我现在收到此错误： Error in get(as.character... -
3 votesanswersviews
在列表中重命名Data.frame的列
我试图使用lapply（并希望lapply的解决方案）重命名列表中的data.frame的列，但它返回名称，而不是重命名的data.frames： # define list li <- list(u_n = data.frame(x = 1:3), r_l = data.frame(y = 4:6)) # trying to rename columns after the elemen... -
28 votesanswersviews
将多个CSV文件读入单独的数据框
假设我们在目录C：\ R \ Data中有文件file1.csv，file2.csv，...和file100.csv，我们希望将它们全部读入单独的数据框（例如file1，file2，...和file100） . 这样做的原因是，尽管具有相似的名称，但它们具有不同的文件结构，因此将它们放在列表中并不是很有用 . 我可以使用 lapply 但返回包含100个数据帧的单个列表 . 相反，我想在全球环境中... -
3 votesanswersviews
使用R将多个数据帧写入.csv文件
我使用lapply将函数应用于许多数据框： data.cleaned <- lapply(data.list, shooter_cleaning) 然后根据其主题编号（例如，100）标记列表中的每个结果数据帧： names(data.cleaned) <- subject.names 我想要做的是根据主题编号将每个新数据框保存为单独的.csv文件 . 例如，对于主题100，我希望.... -
2 votesanswersviews
从多个数据集R中提取坐标
我发现使用从shapefile获得的特定地理区域从具有经度和纬度坐标的多个数据帧中提取栅格值的问题 . 所有地理区域都有不同的程度，并且具有相应的坐标数据出现数据框 . 我尝试使用raster包中的mask功能： 首先 - 将shapefile，栅格图层和数据框作为列表加载 shp<-list.files(pattern = "shp") shape<-lapply... -
2 votesanswersviews
如何调用函数使用* apply with different data，其中output是list，intput是2x2矩阵的列表？
我有10次运行模拟的数据，存储为列表 . 我想用这个数据调用函数 FUN1 ，而不重复代码10次 . FUN1 的输出是模型参数的值，这样： $theta=5 $Theta= 0.5 $pi_1 = 0.6 $pi_2 = 0.4 $loglik_1 = 123.6 ... -
0 votesanswersviews
从嵌套列表中提取数据并返回data.frame
dput(head(z2,10)) structure(list(name = list("Mary"), department = structure(list( name = list("English")), .Names = "name", id = "300"), department = stru... -
0 votesanswersviews
交错嵌套在r中的向量，其中字符串填充基于最内层嵌套中的最大nchar
我在r中有一个嵌套的向量列表，其中每个向量具有不同的元素数，每个元素包含一个不同长度的字符串，如下所示： x <- list( A=list( c("11","11","11111","111","1111111111","11","11&quo... -
0 votesanswersviews
多个数据帧中的lapply聚合列R.
我在R的列表中有几个数据帧 . 我想总结的每个DF中都有条目 . 我试图进入lapply，这将是我的首选方式（虽然如果有一个更好的解决方案，我会很高兴知道它和为什么） . 我的样本数据： df1 <- data.frame(Count = c(1,2,3), ID = c("A","A","C")) df2 <- data.f... -
2 votesanswersviews
使用lapply来对数据帧中的行进行子集化 - 错误的维度数量错误
我有一个名为“scebase”的列表，其中包含40个数据帧，每个数据帧为326行乘68列 . 我想使用lapply（）对数据帧进行子集化，因此它们只保留行33-152 . 我写了一个名为trim（）的简单函数（下面），并尝试将其应用于数据框列表但收到错误消息 . 该函数和我尝试使用lapply如下： trim < - function（i）{（i < - i [33：152，]）... -
-1 votesanswersviews
简化数据框列表的提取
我的问题是以下问题的延续 . （由于声誉限制，无法对该主题发表评论） Print the Nth Row in a List of Data Frames 我希望结果打印为数据框而不是列表（假设我有多列而不是示例中的单列） . 有人可以告诉我我需要做些什么来获得这个输出？ 输入样本列表 $AK HospitalName State HeartAttack ... -
2 votesanswersviews
使用存储在列表中的数据框
有了这个问题，我想扩展并概括讨论开始here . 这是为了那些像我一样，在必须使用lapply时仍然遇到麻烦的人的利益 . 假设我有数据框 d1 和 d2 ，我存储在列表 my.ls d1<-data.frame(a=rnorm(5), b=c(rep(2006, times=4),NA), c=letters[1:5]) d2<-data.frame(a=1:5, b=c(2007,... -
0 votesanswersviews
如何在一个包含不同行数的大型数据框列表中使用lapply和我自己的函数？
我已经阅读了25个.xlsx文件 mydata = lapply(filenames, read.xlsx, 1, sheetName = "Sheet1", startRow = 47, header = FALSE, row.names = NULL) 该长数据帧列表中的每个元素具有不同的行数 .然后我定义了自己的函数，它应该根据每个数据框中的值为每个数据框添加三个新列 ... -
0 votesanswersviews
计算数据框列表中一列的运行次数
非常基本的问题我敢肯定，我不是最有经验的编码器，所以它可能很容易解决 . 我在列表中有几个不同的数据框，我希望找到每个数据框中某个列中包含的运行数，以便聚合在一起 . 例如，它看起来像 list1<-(df1,df2) df1<-(x="id", y="Runs") 其中y列是一堆1和-1值 . 因此，对于每个数据帧，在每个y列中存在一定数量的... -
0 votesanswersviews
使用name（）重命名数据帧组的列
我想重命名一堆具有名称功能的数据帧，但不能使用lapply或loop . 我有一组数据帧名称qcew.2007，qcew.2014等...我有名称的矢量我希望所有数据帧都有 . 他们都是一样的 . 矢量是名称colnm： colnm = c("area_fips" , "own_code", "industry_code", "... -
0 votesanswersviews
在不均匀元素长度列表中应用for循环（或应用替换）
我希望根据另一个列表中的索引位置从xts对象列表中提取一系列值 . 既然你有一般的想法，请允许我更具体 . 我有两个清单： 第一个包含几个带数据的xts对象 第二个包含数字索引值的向量，我想从第一个列表中提取数据 . 如果有帮助，这些索引值表示时间序列的最大值/最小值 . 因此，每个矢量的长度不均匀，因为每个时间序列具有变化的最大值/最小值 . 现在，鉴于我知道索引值的数字向量的长度，... -
0 votesanswersviews
在多个向量/列表上子集数据帧并为R中的每个子集组合应用函数[重复]
这个问题在这里已有答案： Group by multiple columns and sum other multiple columns 7个答案 我有一个数据框（df），包含多个列，如项目，公司，地区，日期，价格 . 我想应用一些函数或转换，例如使用下面3个向量的组合/分组将价格的平均值添加到每个子集的价格列，以在应用函数之前对我的数据框进行子集化 . 这三个向量包含来自数据框的不同项目，... -
0 votesanswersviews
dplyr，lapply或Map来识别来自一个data.frame的信息并将其放入另一个[duplicate]
这个问题在这里已有答案： How to join (merge) data frames (inner, outer, left, right) 13个答案 edit: 对不起，我不是故意转发一个问题 . 我遇到的问题不仅仅是连接两个表，而是连接两个表，两个表中的列不完全相同（我更新了示例数据来说明这一点） . 也就是说，我想使用Every.Student.In.The.Country $ F... -
0 votesanswersviews
在R列表中为不等大小的对象重复元素
在R中，我有一个由具有不等元素数的对象组成的列表 . 例如， l <- list(a=c(1,2), b=3, c=4) 我已经想出如何找到任何对象的最大长度： lmax <- max(unlist(lapply(l,length))) 以及如何识别哪些对象不是最长的： notlongest <- unlist(lapply(l,length)) != max(unlist(... -
7 votesanswersviews
打印数据框列表中的最后一行
我有一个数据框列表，我需要从中获取第二列的最后一行 . 所有数据帧都有不同的行数 . 我已经使用lapply编写了代码，它可以通过变量“num”提取任何行（对于超过数据帧行长度的数字返回NA），但是我想要包含一个变量num =“worst”，它将返回最后一行，第二列可用数据 . 这是用于检索“第n”行的代码（xyz是数据帧列表）： if(num=="best"){num=as.... -
2 votesanswersviews
使用for循环或lapply迭代R中列表中的不同数据帧
如果这个问题看起来很简陋，我道歉 . 我有点不清楚它是否可能/如何使用带有R中数据帧列表的循环 . 我的数据帧是更大数据帧的子集： billysuzy <- subset(userlist,user1 %in% c("billy","suzy")) joefrank<- subset(userlist,user1 %in% c("joe... -
6 votesanswersviews
将数据帧加载到列表中
我试图将一堆* .Rdata加载到列表中 . files <- paste0("name", 1:10, ".Rdata") data <- lapply(files, load) 这会创建一个列表，其中每个元素都有数据框的名称，但没有其他内容 . 如果我重新定义文件，使其只包含第一个文件，并调用： load(files) 然后是“工作”，但... -
2 votesanswersviews
R lapply（）：将列表中所有数据框中的所有列更改为数字，然后将所有值转换为百分比
题： 对于如何为数据框列表中的列批处理as.numeric（）（或任何其他函数），我感到有点困惑 . 我了解我可以使用以下方法查看此列表中的特定数据框或列： > my.list[[1]] # or columns within this data frame using: > my.list[[1]][1] 但是当我尝试将其应用到lapply（）函数中以将所有数据从整数更改为数字时... -
3 votesanswersviews
汇总数据帧以沿子集返回非NA值
希望有人能帮助我一招 . 我在网上找到了类似的问题，但我见过的所有例子都没有完全符合我的要求，也没有在我的数据结构上工作 . 我需要沿数据子集从数据帧中删除NA，并将剩余的NA值压缩为每个数据子集的行 . 例： #create example data a <- c(1, 1, 1, 2, 2, 2) #this is the subsetting variable in the examp... -
0 votesanswersviews
r-如果在lapply里面
我有一张 table ： dir E_numdir last2 1 a 1 1 2 PJE INDEPENDENCIA 96 5 96, 5 96, 5 3 PJE INDEPENDENCIA 96 5 ... -
1 votesanswersviews
在R中使用lapply和ifelse函数
我在R中有一个问题，我可以在列表中的元素上运行ifelse语句，但是只要我将ifelse语句放在lapply函数中，它就不再有效 . 这是我的例子 . 我正在处理三个数据帧的列表： > dflist [[1]] ID1 tID1 1 m1 1 2 m2 2 3 m3 3 4 m4 4 5 m5 5 [[2]] ID2 tID2 1 m7 ... -
0 votesanswersviews
如何转置数据框列表？ [关闭]
我有一个51个数据帧的列表，我需要转置它们然后删除新数据帧的前两行 . 我试图使用lapply，但不熟悉语法 . 我的操作很容易在一个数据框上完成，但使用lapply作为数据框列表，是我遇到麻烦的地方 . 这就是我为列表中的一个元素到达我的最终数据框所做的 - john<-t(dflist[["df7"]]) john <- john[-c(1,2), ] 对于每... -
2 votesanswersviews
计算90百分位数并用R中的中位数替换它
这里是部分数据 . mydat=structure(list(code = c(123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 123L, 12... -
0 votesanswersviews
在df1的每一行上执行一个函数并更新df2中的一个定位行，最后想要df2作为输出
我想在df1（test_dates_df）的每一行上执行一个函数，并更新df2（occupied_dates_df）中的一个定位行，最后想要df2作为输出 . df2包含预分配的数据 . 检查df1中的日期是否存在于df2中的日期列中并执行进一步处理 . actual_correction <- function(test_date, ...