RError.com

RError.com Logo RError.com Logo

RError.com Navigation

  • 主页

Mobile menu

Close
  • 主页
  • 系统&网络
    • 热门问题
    • 最新问题
    • 标签
  • Ubuntu
    • 热门问题
    • 最新问题
    • 标签
  • 帮助
主页 / 问题 / 1119082
Accepted
Михаил Табаков
Михаил Табаков
Asked:2020-05-02 15:27:46 +0000 UTC2020-05-02 15:27:46 +0000 UTC 2020-05-02 15:27:46 +0000 UTC

将一个函数应用于所有可能的数据帧组合

  • 772

我有一系列数据框,其中包含多个变量。我需要找到可用于对这些数据帧进行分组并将相同函数应用于其中一个变量的所有可能组合。在示例中,我使用了一个计算相关性的函数。接下来,我将每一对组合的结果组合成一个公共帧,其中记录了函数执行的结果以及它属于哪个对。现在我正在以一种相当笨拙的方式(如我的示例中)并寻找一种方法来以更快的速度执行这些操作,而无需如此多的代码。

a <- data.table(c(1,2,3,4), c(5,6,7,8))
b <- data.table(c(2,3,4,5), c(6,7,8,9))
c <- data.table(c(3,4,5,6), c(7,8,9,10))


a_a <- cor(a$V1, a$V1)
a_b <- cor(a$V1, b$V1)
a_c <- cor(a$V1, c$V1)

b_a <- cor(b$V1, a$V1)
b_b <- cor(b$V1, b$V1)
b_c <- cor(b$V1, c$V1)

c_a <- cor(c$V1, a$V1)
c_b <- cor(c$V1, b$V1)
c_c <- cor(c$V1, c$V1)

total <- rbind(a_a, a_b, a_c, b_a, b_b, b_c, c_a, c_b, c_c)
r
  • 1 1 个回答
  • 10 Views

1 个回答

  • Voted
  1. Best Answer
    Artem Klevtsov
    2020-05-05T19:13:53Z2020-05-05T19:13:53Z

    如果您将几个传递data.table给函数data.table,那么这些表将与帮助组合在一起cbind。在下面的代码中,我们使用了类似的原理,但使用了一个小技巧来获取可用的列名。

    > l <- list(a, b, c)
    > setattr(l, "names", c("a", "b", "c"))
    > x <- as.data.table(l)
    > x
       a.V1 a.V2 b.V1 b.V2 c.V1 c.V2
    1:    1    5    2    6    3    7
    2:    2    6    3    7    4    8
    3:    3    7    4    8    5    9
    4:    4    8    5    9    6   10
    > cor(x)
         a.V1 a.V2 b.V1 b.V2 c.V1 c.V2
    a.V1    1    1    1    1    1    1
    a.V2    1    1    1    1    1    1
    b.V1    1    1    1    1    1    1
    b.V2    1    1    1    1    1    1
    c.V1    1    1    1    1    1    1
    c.V2    1    1    1    1    1    1
    
    • 0

相关问题

  • 在 R 中调用函数

  • 搜索和消除数据帧中的不一致

  • 如何在R中从字符类型转到原始类型?

Sidebar

Stats

  • 问题 10021
  • Answers 30001
  • 最佳答案 8000
  • 用户 6900
  • 常问
  • 回答
  • Marko Smith

    如何从列表中打印最大元素(str 类型)的长度?

    • 2 个回答
  • Marko Smith

    如何在 PyQT5 中清除 QFrame 的内容

    • 1 个回答
  • Marko Smith

    如何将具有特定字符的字符串拆分为两个不同的列表?

    • 2 个回答
  • Marko Smith

    导航栏活动元素

    • 1 个回答
  • Marko Smith

    是否可以将文本放入数组中?[关闭]

    • 1 个回答
  • Marko Smith

    如何一次用多个分隔符拆分字符串?

    • 1 个回答
  • Marko Smith

    如何通过 ClassPath 创建 InputStream?

    • 2 个回答
  • Marko Smith

    在一个查询中连接多个表

    • 1 个回答
  • Marko Smith

    对列表列表中的所有值求和

    • 3 个回答
  • Marko Smith

    如何对齐 string.Format 中的列?

    • 1 个回答
  • Martin Hope
    Alexandr_TT 2020年新年大赛! 2020-12-20 18:20:21 +0000 UTC
  • Martin Hope
    Alexandr_TT 圣诞树动画 2020-12-23 00:38:08 +0000 UTC
  • Martin Hope
    Air 究竟是什么标识了网站访问者? 2020-11-03 15:49:20 +0000 UTC
  • Martin Hope
    Qwertiy 号码显示 9223372036854775807 2020-07-11 18:16:49 +0000 UTC
  • Martin Hope
    user216109 如何为黑客设下陷阱,或充分击退攻击? 2020-05-10 02:22:52 +0000 UTC
  • Martin Hope
    Qwertiy 并变成3个无穷大 2020-11-06 07:15:57 +0000 UTC
  • Martin Hope
    koks_rs 什么是样板代码? 2020-10-27 15:43:19 +0000 UTC
  • Martin Hope
    Sirop4ik 向 git 提交发布的正确方法是什么? 2020-10-05 00:02:00 +0000 UTC
  • Martin Hope
    faoxis 为什么在这么多示例中函数都称为 foo? 2020-08-15 04:42:49 +0000 UTC
  • Martin Hope
    Pavel Mayorov 如何从事件或回调函数中返回值?或者至少等他们完成。 2020-08-11 16:49:28 +0000 UTC

热门标签

javascript python java php c# c++ html android jquery mysql

Explore

  • 主页
  • 问题
    • 热门问题
    • 最新问题
  • 标签
  • 帮助

Footer

RError.com

关于我们

  • 关于我们
  • 联系我们

Legal Stuff

  • Privacy Policy

帮助

© 2023 RError.com All Rights Reserve   沪ICP备12040472号-5