结合虚拟变量行的因子

时间:2017-07-02 14:41:50

标签: r

我正在尝试为分类变量'person'创建虚拟变量,以便我可以在一行中看到可能在同一天出现在同一个地方。

原始数据'd':

    Date, City, Person,
    2014-11-02, Manchester, Jane
    2014-11-02, Manchester, Tom
    2014-11-15, London, Susan
    2014-11-16, London, Harry
    2014-11-16, Birmingham, Tom
    2014-12-01, Birmingham, Susan
    2014-12-01, Birmingham, Jane

我想要完成的事情:

    Date, City, Tom, Harry, Susan, Jane
     2014-11-02, Manchester, 1, 0, 0, 1
     2014-11-15, London, 0, 0, 1, 0
     2014-11-16, London, 0, 1, 0, 1
     2014-11-16, Birmingham, 1, 0, 0, 0
     2014-12-01, Birmingham, 0, 0, 1, 1

我试过了:

    for(level in unique(d$person)){
    d[paste("Person", level, sep = "_")]
    <-      ifelse(d$Person == level, 1, 0)
    }

但是我每次观察都得到单独的行,而不是当同一个人在同一天在同一个城市时合并为一行。

0 个答案:

没有答案