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. day007-线程池、Lambda

    1. 线程池 就好生活中的游泳池,可以容纳多人在池子里游泳.戏水.线程池里可以有多个正在运行的线程,同时执行已经提交了的多个任务. 什么是线程池?一个用来创建和管理线程的容器. 线程池的原理 线程复用 ...

  2. JavaScript获取当前网页的源码

    通过 outerHTML document.documentElement.outerHTML 通过异步请求 $.get(window.location.href,function(res){ con ...

  3. AWS的登录认证。。。

    Hello, I’m sorry for any concern regarding the $1.00 Authorization that you see associated with your ...

  4. SAP订单编排和流程增强概述

    SAP产品里的订单处理,无论是On-Premises解决方案还是云产品,我认为归根到底可以概括成四个字:订单编排,包含两个层次的内容: 1. 单个订单通过业务流程或者工作流驱动的状态迁移: 2. 多种 ...

  5. Android（java）学习笔记49：通过反射获取私有构造方法并且使用

    1. 反射获取私有构造方法并且使用: (1)获取字节码文件.class对象:          Class c = Class.forName("cn.itcast_01.Person&qu ...

  6. Codeforces Round #460 (Div. 2)

    A. Supermarket We often go to supermarkets to buy some fruits or vegetables, and on the tag there pr ...

  7. 【转】Android Activity原理以及其子类描述，androidactivity

        Android Activity原理以及其子类描述,androidactivity 简介 Activity是Android应用程序组件,实现一个用户交互窗口,我们可以实现布局填充屏幕,也可以实 ...

  8. Caffe计算net、layer向前向后传播时间

    在caffe中计算某个model的整个net以及各个layer的向前向后传播时间,可以使用下面的命令格式: ./build/tools/caffe time --model=examples/mnis ...

  9. sudo: Sorry, you must have a tty to run

    The requiretty option in sudoers file The requiretty if set in sudo config file sudoers, sudo will o ...

  10. CSU 1023 修路(二分+模拟）

    前段时间,某省发生干旱,B山区的居民缺乏生活用水,现在需要从A城市修一条通往B山区的路.假设有A城市通往B山区的路由m条连续的路段组成,现在将这m条路段承包给n个工程队(n ≤ m ≤ 300).为了 ...