楼主: ansonzhou2001
2185 2

[问答] 用R计算相关矩阵 [推广有奖]

  • 0关注
  • 0粉丝

高中生

60%

还不是VIP/贵宾

-

威望
0
论坛币
29459 个
通用积分
2.1304
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
265 点
帖子
27
精华
0
在线时间
36 小时
注册时间
2008-11-25
最后登录
2019-10-23

10论坛币
各位大神,帮忙指导一下如何计算相关矩阵,大概的数据格式如下
    代码,日期,回报,名称
    000300,20101001,0.23,A
    000300,20101002,0.15,A
    000300,20101003,0.03,A
    000300,20101004,0.40,A
    000301,20101001,0.05,B
    000301,20101002,0.19,B
    000301,20101003,0.11,B
    000301,20101004,0.26,B
    000302,20101001,0.31,C
    000302,20101002,0.03,C
    000302,20101003,0.01,C
    000302,20101004,0.27,C


希望的结果是
    A    B   C
A  1    ab   ac
B  ba   1    bc
C  ca   cb    1

因为要算的变量在一个column里面,不是多个,所以没啥头绪



最佳答案

hszest 查看完整内容

结果(Pearson):
关键词:RStudio R语言
沙发
hszest 学生认证  发表于 2018-11-16 11:18:45 |只看作者 |坛友微信交流群
  1. inlineText <- "代码,日期,回报,名称
  2. 000300,20101001,0.23,A
  3. 000300,20101002,0.15,A
  4. 000300,20101003,0.03,A
  5. 000300,20101004,0.40,A
  6. 000301,20101001,0.05,B
  7. 000301,20101002,0.19,B
  8. 000301,20101003,0.11,B
  9. 000301,20101004,0.26,B
  10. 000302,20101001,0.31,C
  11. 000302,20101002,0.03,C
  12. 000302,20101003,0.01,C
  13. 000302,20101004,0.27,C
  14. "

  15. library(dplyr)
  16. library(tidyr)
  17. df <- read.csv(text = inlineText) %>%
  18.     select(-代码)%>%
  19.     spread(名称,回报) %>%
  20.     select(-日期)

  21. cor(df)
复制代码
结果(Pearson):
  1.           A          B          C
  2. A 1.0000000  0.5562639  0.8011441
  3. B 0.5562639  1.0000000 -0.0474336
  4. C 0.8011441 -0.0474336  1.0000000
复制代码

使用道具

藤椅
ansonzhou2001 发表于 2018-11-19 11:24:38 |只看作者 |坛友微信交流群
hszest 发表于 2018-11-16 11:18
结果(Pearson):
感谢感谢

使用道具

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-4-26 12:04