在 R 中 split() 之后保持数据的原始顺序[重复]

2024-04-12

在下面的 R 代码中,我split a data.frame通过一列,一个名为的字符串变量study.name.

But split 按字母顺序重新订购原来的data.frame. In BASE R,分割后数据可以保持原来的顺序吗?

D <- read.csv("https://raw.githubusercontent.com/izeh/i/master/k.csv", h = T) # data.frame 
m <- split(D, D$study.name)

We can split by factor转换后的“study.name”,其中levels被指定为unique列的元素和unique按照唯一元素出现的相同顺序返回值

split(D, factor(D$study.name, levels = unique(D$study.name)))

如果我们需要删除NA元素,在之前的数据子集split

D1 <- subset(D, !(is.na(study.name)| study.name == ""))
split(D1, factor(D1$study.name, levels = unique(D1$study.name)))
#$Shin.Ellis
#  study.name group.name  n mpre mpos sdpre sdpos   r autoreg  t sdif F1 sdp df2 post control outcome ESL prof scope type
#1 Shin.Ellis   ME.short 13 0.34 0.72  0.37  0.34 0.5   FALSE NA   NA NA  NA  NA    1   FALSE       1   1    2     1    2
#2 Shin.Ellis    ME.long 13 0.34 0.39  0.37  0.36 0.5    TRUE NA   NA NA  NA  NA    2   FALSE       1   1    2     1    2
#3 Shin.Ellis  DCF.Short 15 0.37 0.54  0.38  0.36 0.5   FALSE NA   NA NA  NA  NA    1   FALSE       1   1    2     1    2
#4 Shin.Ellis   DCF.Long 15 0.37 0.49  0.38  0.36 0.5    TRUE NA   NA NA  NA  NA    2   FALSE       1   1    2     1    2
#5 Shin.Ellis Cont.Short 16 0.32 0.28  0.37  0.36 0.5   FALSE NA   NA NA  NA  NA    1    TRUE       1   1    2     1    2
#6 Shin.Ellis  Cont.Long 16 0.32 0.35  0.37  0.32 0.5    TRUE NA   NA NA  NA  NA    2    TRUE       1   1    2     1    2

#$Trus.Hsu
#  study.name group.name  n   mpre   mpos  sdpre  sdpos   r autoreg  t sdif F1 sdp df2 post control outcome ESL prof scope type
#8   Trus.Hsu      Exper 21 0.0799 0.1130 0.0367 0.0472 0.5   FALSE NA   NA NA  NA  NA    1   FALSE       1   2    2     2    1
#9   Trus.Hsu       Cont 26 0.0763 0.1095 0.0389 0.0537 0.5   FALSE NA   NA NA  NA  NA    1    TRUE       1   2    2     2    1

#$kabla
#   study.name group.name  n mpre mpos sdpre sdpos   r autoreg  t sdif F1 sdp df2 post control outcome ESL prof scope type
#11      kabla   ME.short 13 0.34 0.72  0.37  0.34 0.5   FALSE NA   NA NA  NA  NA    1   FALSE       1   1    3     0    1
#12      kabla    ME.long 13 0.34 0.39  0.37  0.36 0.5   FALSE NA   NA NA  NA  NA    2   FALSE       1   1    3     0    1
#13      kabla  DCF.Short 15 0.37 0.54  0.38  0.36 0.5   FALSE NA   NA NA  NA  NA    1   FALSE       1   1    3     0    1
#14      kabla   DCF.Long 15 0.37 0.49  0.38  0.36 0.5   FALSE NA   NA NA  NA  NA    2   FALSE       1   1    3     0    1
#15      kabla Cont.Short 16 0.32 0.28  0.37  0.36 0.5   FALSE NA   NA NA  NA  NA    1    TRUE       1   1    3     0    1
#16      kabla  Cont.Long 16 0.32 0.35  0.37  0.32 0.5   FALSE NA   NA NA  NA  NA    2    TRUE       1   1    3     0    1
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

在 R 中 split() 之后保持数据的原始顺序[重复] 的相关文章

  • Shiny + downloadHandler + Openxlsx 不生成xlsx文件

    我试图通过 Openxlsx 包生成一个 xlsx 文件 其中包含文件内的反应名称和标头 输入变量为 ASL 1 和 Year 1 要保存在文件中的对象是反应表 tab 1 它是由应用程序生成的 没有任何问题 但是当我尝试下载它时 浏览器
  • 使用 RSelenium 下载嵌入到框架中的文件

    我正在参与一个项目 其中有一个网页 我需要单击该网页才能获取 pdf 文件 该文件出现在同一页面内的新窗口中 我认为是 iframe 然后我需要单击一个按钮来下载文件 我正在使用的代码如下 library wdman library RSe
  • 移动列表中特定元素的简单函数

    我是 Haskell 的新手 我正在尝试弄清楚如何创建一个函数 shift Eq a gt a gt a gt Int gt a shift x h t z 输入 一个通用列表和一个相同类型的元素 x 前提条件 元素x存在于列表中 Outp
  • 如何使用 pandas groupby 函数根据 groupby 值应用公式

    我的问题可能有点令人困惑 所以让我解释一下 我有一个信息数据框 我想按唯一订单 ID 对其进行分组 该 ID 将生成以下列 sum qty 每个订单 ID 执行的总金额 csv 这是每个订单 ID 的 csv 列的总和除以订单 ID 的已执
  • 如何在闪亮的仪表板侧栏中手动展开子菜单

    我正在尝试手动展开闪亮仪表板侧边栏中的子菜单 这updateTabItems该功能仅适用于普通菜单 不适用于嵌套菜单 这是基本示例 修改自updateTabItems文档 来显示问题 如果我单击 切换选项卡 它会切换菜单 但不会展开具有子菜
  • 在 Netlogo 中将函数作为参数传递

    在许多其他编程语言中 您可以将一个函数作为参数传递给另一个函数并从该函数内调用它 无论如何 在 Netlogo 中可以做到这一点吗 比如下面这样 x y z are all ints to report f x y z report x y
  • 使用geom_sf时向ggplot2添加多个图例

    我的问题结合了之前在 Stackoverflow 上发布的两个单独的问题 向 ggplot 添加多个图例 https stackoverflow com questions 26443371 adding multiple legends
  • 无法使用 Shinyjs() 禁用闪亮的应用程序单选按钮

    我正在尝试禁用闪亮的应用程序单选按钮 趋势 input Product A input month All 使用Shinyjs包 但没有成功 我的 ui 页面定义为 ui lt fluidPage shinyjs useShinyjs pa
  • 根据多个分隔符拆分字符串

    我试图通过引用根据多个分隔符分割字符串jquery中如何用多个字符串作为分隔符分割一个字符串 https stackoverflow com questions 13867182 how split a string in jquery w
  • R中的神经网络包出现大错误

    我正在尝试弄清楚如何使神经网络包发挥作用 我用我创建的数据及其结果 大约 50 行数据和三列 第四列是我想要的结果 它是通过简单的数学执行 如对其他三列求和 得出的 进行了一些测试 到目前为止一切顺利 然后我决定将这个包应用到真实数据上 我
  • 在 unnest_wider 之后命名提升向量中的列

    在使用 tidyr 1 0 的一些新功能时 我遇到了一些令人头疼的问题 我用过boxplot stats获取我想用来绘制的箱线图值向量 我已经成功地完成了此操作 但我相信有更好的方法来命名新的未嵌套向量的列 这是当前设置 library t
  • 在 R 中使用 glmnet 和 dotCall64 的长向量

    我使用 glmnet 和 glmnetcr 来拟合序数回归模型 不幸的是 我的模型矩阵约为 640000 5000 这大于可以存储在 32 位整数中的大小 并且我遇到了其他人描述的相同问题 R 向量大小限制 C 中不支持长向量 参数 5 h
  • 将大块位图转换为 3 维位图

    Problem 我需要这个大量的数据作为输入 对于基于C的arduino 这是上面示例中所需格式的大量数据 const byte bitmap 8 8 0xFF 0x81 0x81 0x81 0x81 0x81 0x81 0xFF 0x81
  • 为什么 Pearson 相关输出为 NaN?

    我正在尝试获取 R 中变量之间的皮尔逊相关系数 这是变量的散点图 ggplot results summary aes x D in y D ex geom point col ifelse results summary FDR lt 0
  • 在 R 中每小时获取在线数据

    我想获取天文台每小时更新预报的数据 我的一次性数据提取代码如下 library RCurl web lt getURL http www hko gov hk contente htm web lt unlist strsplit web
  • 对 git Push 运行单元测试,对 Pull 请求运行集成测试

    在构建 R 包时 我们使用 testthat 来编写测试 我们有 2 个文件 特定包的测试文件 特异性R 我们用它来确保所有包继续一起工作并且总体结果良好 整体R 当前 当我们推送到 github 或通过 Travis 创建 PR 时 都会
  • 用任意数量的空格分割字符串

    我有以下字符串 1 10012 CAB UNCH CAB 我想按间隙分割该字符串 但间隙的空格数量是可变的 有没有办法使用strsplit 函数来分割这个字符串并返回一个包含 8 个元素的向量 该向量已删除所有间隙 一行代码是首选 只需使用
  • 如何编辑多个 Pandas DataFrame 浮点列的字符串格式?

    我有一个pd DataFrame浮点数 import numpy as np import pandas as pd pd DataFrame np random rand 5 5 0 1 2 3 4 0 0 795329 0 125540
  • 根据另一个输入限制闪亮的应用程序输入

    我有一个基本的闪亮应用程序可以评估A B library shiny ui lt fluidPage numericInput inputId A label A value 5 step 1 sliderInput inputId B l
  • 将箱线图与 Wilcoxon 检验进行比较

    我正在使用 R 中的 ggplot2 包比较两组长度 不同的个体 和箱线图 我想比较这两个分布 但到目前为止我发现使用 wilcoxon 测试的唯一方法是 ggpubr 包中的 stat compare means 这是比较分布的正确方法吗

随机推荐