melt函数可以将宽数据转化为长数据

dcast函数可以将长数据转化为宽数据

> DT = fread("melt_default.csv")

> DT

   family_id age_mother dob_child1 dob_child2 dob_child3

1:         1         30 1998-11-26 2000-01-29         NA

2:         2         27 1996-06-22         NA         NA

3:         3         26 2002-07-11 2004-04-05 2007-09-02

4:         4         32 2004-10-10 2009-08-27 2012-07-21

5:         5         29 2000-12-05 2005-02-28         NA

> DT.m1 <- melt(DT, measure.vars = c("dob_child1", "dob_child2", "dob_child3"),

+               variable.name = "child", value.name = "dob")

> DT.m1

    family_id age_mother      child        dob

 1:         1         30 dob_child1 1998-11-26

 2:         2         27 dob_child1 1996-06-22

 3:         3         26 dob_child1 2002-07-11

 4:         4         32 dob_child1 2004-10-10

 5:         5         29 dob_child1 2000-12-05

 6:         1         30 dob_child2 2000-01-29

 7:         2         27 dob_child2         NA

 8:         3         26 dob_child2 2004-04-05

 9:         4         32 dob_child2 2009-08-27

10:         5         29 dob_child2 2005-02-28

11:         1         30 dob_child3         NA

12:         2         27 dob_child3         NA

13:         3         26 dob_child3 2007-09-02

14:         4         32 dob_child3 2012-07-21

15:         5         29 dob_child3         NA

> dcast(DT.m1, family_id + age_mother ~ child, value.var = "dob")

   family_id age_mother dob_child1 dob_child2 dob_child3

1:         1         30 1998-11-26 2000-01-29         NA

2:         2         27 1996-06-22         NA         NA

3:         3         26 2002-07-11 2004-04-05 2007-09-02

4:         4         32 2004-10-10 2009-08-27 2012-07-21

5:         5         29 2000-12-05 2005-02-28         NA

对于较为复杂的数据可以这样做

> DT <- fread("melt_enhanced.csv")

> DT

   family_id age_mother dob_child1 dob_child2 dob_child3 gender_child1 gender_child2 gender_child3

1:         1         30 1998-11-26 2000-01-29         NA             1             2            NA

2:         2         27 1996-06-22         NA         NA             2            NA            NA

3:         3         26 2002-07-11 2004-04-05 2007-09-02             2             2             1

4:         4         32 2004-10-10 2009-08-27 2012-07-21             1             1             1

5:         5         29 2000-12-05 2005-02-28         NA             2             1            NA

> DT.m2 <- melt(DT, measure = patterns("^dob","^gender"), value.name = c("dob", "gender"))

> DT.m2

    family_id age_mother variable        dob gender

 1:         1         30        1 1998-11-26      1

 2:         2         27        1 1996-06-22      2

 3:         3         26        1 2002-07-11      2

 4:         4         32        1 2004-10-10      1

 5:         5         29        1 2000-12-05      2

 6:         1         30        2 2000-01-29      2

 7:         2         27        2         NA     NA

 8:         3         26        2 2004-04-05      2

 9:         4         32        2 2009-08-27      1

10:         5         29        2 2005-02-28      1

11:         1         30        3         NA     NA

12:         2         27        3         NA     NA

13:         3         26        3 2007-09-02      1

14:         4         32        3 2012-07-21      1

15:         5         29        3         NA     NA

> DT.c2 <- dcast(DT.m2, family_id + age_mother ~ variable, value.var = c("dob","gender"))

> DT.c2

   family_id age_mother      dob_1      dob_2      dob_3 gender_1 gender_2 gender_3

1:         1         30 1998-11-26 2000-01-29         NA        1        2       NA

2:         2         27 1996-06-22         NA         NA        2       NA       NA

3:         3         26 2002-07-11 2004-04-05 2007-09-02        2        2        1

4:         4         32 2004-10-10 2009-08-27 2012-07-21        1        1        1

5:         5         29 2000-12-05 2005-02-28         NA        2        1       NA

R语言学习笔记（十七）：data.table包中melt与dcast函数的使用的更多相关文章

  1. R语言学习笔记：使用reshape2包实现整合与重构

    R语言中提供了许多用来整合和重塑数据的强大方法. 整合 aggregate 重塑 reshape 在整合数据时,往往将多组观测值替换为根据这些观测计算的描述统计量. 在重塑数据时,则会通过修改数据的结 ...

  2. R语言学习笔记：使用tcltk包显示进度条

    一般在跑耗时较长的程序时,我们不知道程序到底有没有正常跑着,或者在爬虫的时候不知道爬到什么时候断了.因此可以添加进度条来显示当前进度,观察进度是否有进展.当进度条卡住的时候,可以判断程序断线,从而可以 ...

  3. R语言学习笔记：怎么从txt中读入数据

    1   从该链接中下载测试数据,http://pan.baidu.com/share/link?shareid=3322971616&uk=3862050759   2   把测试文件Anal ...

  4. R语言学习笔记：choose、factorial、combn排列组合函数

    一.总结 组合数:choose(n,k) —— 从n个中选出k个 阶乘:factorial(k) —— k! 排列数:choose(n,k) * factorial(k) 幂:^ 余数:%% 整数商: ...

  5. R语言学习笔记（十六）：构建分割点函数

    选取预测概率的分割点 cutoff<- function(n,p){ pp<-1 i<-0 while (pp>=0.02) { model.predfu<-rep(&q ...

  6. R语言学习笔记之: 论如何正确把EXCEL文件喂给R处理

    博客总目录:http://www.cnblogs.com/weibaar/p/4507801.html ---- 前言: 应用背景兼吐槽 继续延续之前每个月至少一次更新博客,归纳总结学习心得好习惯. ...

  7. R语言学习 第九篇：plyr包

    在数据分析中,整理数据的本质可以归纳为:对数据进行分割(Split),然后应用(Apply)某些处理函数,最后将结果重新组合(Combine)成所需的格式返回,简单描述为:Split - Apply ...

  8. R语言学习笔记1——R语言中的基本对象

    R语言,一种自由软件编程语言与操作环境,主要用于统计分析.绘图.数据挖掘.R本来是由来自新西兰奥克兰大学的Ross Ihaka和Robert Gentleman开发(也因此称为R),现在由“R开发核心 ...

  9. R语言学习 第十篇：包

    包(Package)是实现特定功能的.预先写好的代码库(library),通俗地说,包是含有函数.数据等的功能模块.R拥有大量的软件包,许多包都是由某一领域的专家编写的,但并不是所有的包都有很高的质量 ...

随机推荐

  1. Python 列表排序方法reverse、sort、sorted操作方法

    python语言中的列表排序方法有三个:reverse反转/倒序排序.sort正序排序.sorted可以获取排序后的列表.在更高级列表排序中,后两中方法还可以加入条件参数进行排序. reverse() ...

  2. 团队合作学习scrum

    查找资料学习scrum心得: 什么是scrum : scrum是一种轻量级软件开发方法,即一种做事的方法.scrum原本是指橄榄球运动的一个专业术语,原意为团队通力合作,在场地内传球.这个过程需要认真 ...

  3. STL容器及算法题：删除奇数的QQ号

    最近思考到这样一个题目:在STL的set和vector容器里存储了1亿个QQ号,编写函数删除奇数QQ号. 1. STL容器简介 首先了解一下 set 和 vector 以及其他类似的 STL 容器: ...

  4. userdel

    功能说明:用于删除指定的用户及该用户相关的文件. 参数选项:-f 强制删除用户,即使用户当前已登录.-r 删除用户的同时,删除与用户相关的所有文件. 说明:尽量不要用userdel删除用户,而是采用在 ...

  5. 异常：Caused by: java.lang.NoSuchMethodError: javax.persistence.OneToMany.orphanRemoval()Z

    Spring3.0 + Hibernate3.5:启动服务器报:Caused by: java.lang.NoSuchMethodError: javax.persistence.OneToMany. ...

  6. 【[SCOI2009]粉刷匠】

    这好像是个暴力? 但是跑的挺快的 我们设\(dp[i][j][k]\)表示在第\(i\)行我们最远染到的位置是\(j\),这一行上一共染了\(k\)次最多能染对多少个格子 理性分析一下啊,每一行最多也 ...

  7. openfiles_(命令)查看已打开的文件列表

    效果: 功能: 查看Windows系统的进程信息,包括进程打开了哪些文件 描述: 允许管理员列出系统上已打开的文件和文件夹或与其断开连接. 参数列表: /Disconnect 中断至少一个打开的文件的 ...

  8. 对枚举数据类型使用switch

  9. HDU1285_确定比赛名次

    HDU1285_确定比赛名次 题目大意 有 n 个队伍, 只知道 m 条关于两支队伍之间胜负的关系. 求 排名. 排名不唯一, 此时输出编号较小的队伍的排名. 输入数据保证有一个符合要求的排名. 思路 ...

  10. js箭头函数

    ES6标准新增了一种新的函数:Arrow Function(箭头函数). 为什么叫Arrow Function?因为它的定义用的就是一个箭头 x =>x*x 相当于: function(x) { ...