首页 文章
  • 1 votes
     answers
     views

    使用lapply()来模拟研究中的列表列表中的数据

    关于在模拟研究中应用lapply(),我遇到了困难 . 这些数据旨在帮助我们了解标准化公式如何影响提案评级工作的结果 . 评估者有三个条件:没有偏见,统一偏见(评估者的偏见增加)和双向偏见(偏见在评分者中均衡为正和负) . 假定提案的真实 Value . 我们希望在每个偏差条件下生成一组复制数据集,以便数据集可以模拟单个提案评估期(面板) . 然后,我们希望复制面板以模拟具有许多建议评估期 . ...
  • 5 votes
     answers
     views

    在读取和绑定多个文件时,将“filename”列添加到表中

    我在多个目录中有许多csv文件,我想读入R tribble或data.table . 我使用“list.files()”并将recursive参数设置为TRUE来创建文件名和路径列表,然后使用“lapply()”读取多个csv文件,然后“bind_rows()”将它们全部粘在一起一起: filenames <- list.files(path, full.names = TRUE, patt...
  • 0 votes
     answers
     views

    如何使用列表将函数应用于数据帧

    我有一个df id a1 a2 1 x1 y1 2 x2 y2 和另一个数据帧df2 id name1 name2 1 a1 b1 1 a2 b2 2 a3 b3 3 a4 b4 3 a5 b5 df2可以包含来自df1的唯一id的多个记录 . 我需要以这样的方式加入数据帧:对于df1的每一行,我应该有来自df2的第一个记录的一列,如果它存在,则来自...
  • 1 votes
     answers
     views

    dplyr left_join与类似的字符串列相似但不完全相同(pmatch或str_detect)

    我最近发布了:dplyr, lapply, or Map to identify information from one data.frame and place it into another 我的主要问题涉及使用dplyr / lapply将两个data.frames组合成一列字符串 . 字符串是名字,但在两个data.frames中并不总是完全相同 . 恩 . 我希望df1中的'Jon'与...
  • 1 votes
     answers
     views

    R:按行内容划分的数据帧子集? lapply / sapply

    我有一个数据框列表: d1<-data.frame(a=rnorm(5), b=rep(2006, times=5), cc=c(1:5)) d2<-data.frame(a=rnorm(5), b=rep(2007, times=5), cc=c(1:5)) d3<-data.frame(a=rnorm(5), b=c(2005:2009), cc=c(1:5)) #dat...
  • 0 votes
     answers
     views

    使用Apply功能控制

    我被要求执行以下操作:打印 AtmWtAg.wide 的 summary . 使用apply系列中的函数( apply , tapply , lapply , sapply )和相应的R函数来计算一组类似的值(逐列平均值,中值,最小值,最大值和分位数) . 请注意,此格式的每列都是来自单台机器的观察 . AtmWtAf.wide的数据如下所示: 1 2 1 107.86...
  • 1 votes
     answers
     views

    使用循环函数将字符转换为带时区的日期

    Given: 具有三个字符列的数据框 . Date Time Zone 1950-04-18 01:30 CST 1950-04-18 01:45 CST 1951-02-20 16:00 CST 1951-06-08 09:00 CST 1951-11-15 15:00 CST 1951-11-15 20:00 CST Required:...
  • 2 votes
     answers
     views

    如何调用函数使用* 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 votes
     answers
     views

    从嵌套列表中提取数据并返回data.frame

    dput(head(z2,10)) structure(list(name = list("Mary"), department = structure(list( name = list("English")), .Names = "name", id = "300"), department = stru...
  • 0 votes
     answers
     views

    交错嵌套在r中的向量,其中字符串填充基于最内层嵌套中的最大nchar

    我在r中有一个嵌套的向量列表,其中每个向量具有不同的元素数,每个元素包含一个不同长度的字符串,如下所示: x <- list( A=list( c("11","11","11111","111","1111111111","11","11&quo...
  • 0 votes
     answers
     views

    多个数据帧中的lapply聚合列R.

    我在R的列表中有几个数据帧 . 我想总结的每个DF中都有条目 . 我试图进入lapply,这将是我的首选方式(虽然如果有一个更好的解决方案,我会很高兴知道它和为什么) . 我的样本数据: df1 <- data.frame(Count = c(1,2,3), ID = c("A","A","C")) df2 <- data.f...
  • 1 votes
     answers
     views

    为什么在corrplot中使用Spearman相关的白bg?

    Spearman cor r 时,第一个对角背景总是白色的 . 它从未发生过其他的措施 . library("psych") library("corrplot") M <- mtcars M.cor <- cor(M) p.mat.all <- psych::corr.test(M.cor, adjust = "n...
  • 2 votes
     answers
     views

    R lapply在向量列表上;提取要在函数中使用的向量元素

    我有一个向量列表,对于列表中的每个向量,我想提取元素并将它们的值用作函数中的参数 . 这是我到目前为止所提出的一般概念 . #Function to convert parametric values (stored in vector) to multivariate normal random data ParamsToDat = function(X){ vec = X MultN...
  • 2 votes
     answers
     views

    使用lapply来对数据帧中的行进行子集化 - 错误的维度数量错误

    我有一个名为“scebase”的列表,其中包含40个数据帧,每个数据帧为326行乘68列 . 我想使用lapply()对数据帧进行子集化,因此它们只保留行33-152 . 我写了一个名为trim()的简单函数(下面),并尝试将其应用于数据框列表但收到错误消息 . 该函数和我尝试使用lapply如下: trim < - function(i){(i < - i [33:152,])...
  • -1 votes
     answers
     views

    简化数据框列表的提取

    我的问题是以下问题的延续 . (由于声誉限制,无法对该主题发表评论) Print the Nth Row in a List of Data Frames 我希望结果打印为数据框而不是列表(假设我有多列而不是示例中的单列) . 有人可以告诉我我需要做些什么来获得这个输出? 输入样本列表 $AK HospitalName State HeartAttack ...
  • 2 votes
     answers
     views

    使用存储在列表中的数据框

    有了这个问题,我想扩展并概括讨论开始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 votes
     answers
     views

    如何在一个包含不同行数的大型数据框列表中使用lapply和我自己的函数?

    我已经阅读了25个.xlsx文件 mydata = lapply(filenames, read.xlsx, 1, sheetName = "Sheet1", startRow = 47, header = FALSE, row.names = NULL) 该长数据帧列表中的每个元素具有不同的行数 .然后我定义了自己的函数,它应该根据每个数据框中的值为每个数据框添加三个新列 ...
  • 0 votes
     answers
     views

    计算数据框列表中一列的运行次数

    非常基本的问题我敢肯定,我不是最有经验的编码器,所以它可能很容易解决 . 我在列表中有几个不同的数据框,我希望找到每个数据框中某个列中包含的运行数,以便聚合在一起 . 例如,它看起来像 list1<-(df1,df2) df1<-(x="id", y="Runs") 其中y列是一堆1和-1值 . 因此,对于每个数据帧,在每个y列中存在一定数量的...
  • 0 votes
     answers
     views

    使用name()重命名数据帧组的列

    我想重命名一堆具有名称功能的数据帧,但不能使用lapply或loop . 我有一组数据帧名称qcew.2007,qcew.2014等...我有名称的矢量我希望所有数据帧都有 . 他们都是一样的 . 矢量是名称colnm: colnm = c("area_fips" , "own_code", "industry_code", "...
  • 0 votes
     answers
     views

    在不均匀元素长度列表中应用for循环(或应用替换)

    我希望根据另一个列表中的索引位置从xts对象列表中提取一系列值 . 既然你有一般的想法,请允许我更具体 . 我有两个清单: 第一个包含几个带数据的xts对象 第二个包含数字索引值的向量,我想从第一个列表中提取数据 . 如果有帮助,这些索引值表示时间序列的最大值/最小值 . 因此,每个矢量的长度不均匀,因为每个时间序列具有变化的最大值/最小值 . 现在,鉴于我知道索引值的数字向量的长度,...
  • 0 votes
     answers
     views

    在多个向量/列表上子集数据帧并为R中的每个子集组合应用函数[重复]

    这个问题在这里已有答案: Group by multiple columns and sum other multiple columns 7个答案 我有一个数据框(df),包含多个列,如项目,公司,地区,日期,价格 . 我想应用一些函数或转换,例如使用下面3个向量的组合/分组将价格的平均值添加到每个子集的价格列,以在应用函数之前对我的数据框进行子集化 . 这三个向量包含来自数据框的不同项目,...
  • 2 votes
     answers
     views

    使用for循环或lapply迭代R中列表中的不同数据帧

    如果这个问题看起来很简陋,我道歉 . 我有点不清楚它是否可能/如何使用带有R中数据帧列表的循环 . 我的数据帧是更大数据帧的子集: billysuzy <- subset(userlist,user1 %in% c("billy","suzy")) joefrank<- subset(userlist,user1 %in% c("joe...
  • 6 votes
     answers
     views

    将数据帧加载到列表中

    我试图将一堆* .Rdata加载到列表中 . files <- paste0("name", 1:10, ".Rdata") data <- lapply(files, load) 这会创建一个列表,其中每个元素都有数据框的名称,但没有其他内容 . 如果我重新定义文件,使其只包含第一个文件,并调用: load(files) 然后是“工作”,但...
  • 2 votes
     answers
     views

    R lapply():将列表中所有数据框中的所有列更改为数字,然后将所有值转换为百分比

    题: 对于如何为数据框列表中的列批处理as.numeric()(或任何其他函数),我感到有点困惑 . 我了解我可以使用以下方法查看此列表中的特定数据框或列: > my.list[[1]] # or columns within this data frame using: > my.list[[1]][1] 但是当我尝试将其应用到lapply()函数中以将所有数据从整数更改为数字时...
  • 3 votes
     answers
     views

    汇总数据帧以沿子集返回非NA值

    希望有人能帮助我一招 . 我在网上找到了类似的问题,但我见过的所有例子都没有完全符合我的要求,也没有在我的数据结构上工作 . 我需要沿数据子集从数据帧中删除NA,并将剩余的NA值压缩为每个数据子集的行 . 例: #create example data a <- c(1, 1, 1, 2, 2, 2) #this is the subsetting variable in the examp...
  • 0 votes
     answers
     views

    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 ...
  • 0 votes
     answers
     views

    使用R中的lapply在网格上生成多个点阵图

    如何将多个晶格图绘制到单个晶格图上,其中使用lapply函数生成图? 以下是我使用内置的 mtcars 数据集到目前为止所尝试的内容的演示 . require(lattice) response <- c("cyl","disp","hp","drat") par(mfrow=c(2,2)) lapply(...
  • 1 votes
     answers
     views

    在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 votes
     answers
     views

    如何转置数据框列表? [关闭]

    我有一个51个数据帧的列表,我需要转置它们然后删除新数据帧的前两行 . 我试图使用lapply,但不熟悉语法 . 我的操作很容易在一个数据框上完成,但使用lapply作为数据框列表,是我遇到麻烦的地方 . 这就是我为列表中的一个元素到达我的最终数据框所做的 - john<-t(dflist[["df7"]]) john <- john[-c(1,2), ] 对于每...
  • 2 votes
     answers
     views

    从多个数据集R中提取坐标

    我发现使用从shapefile获得的特定地理区域从具有经度和纬度坐标的多个数据帧中提取栅格值的问题 . 所有地理区域都有不同的程度,并且具有相应的坐标数据出现数据框 . 我尝试使用raster包中的mask功能: 首先 - 将shapefile,栅格图层和数据框作为列表加载 shp<-list.files(pattern = "shp") shape<-lapply...

热门问题