Skip to content
Back to formatted view

Raw Message

Message-ID: <f8e6ff050803121126h28d4475an7a25c6153aa0b7ba@mail.gmail.com>
Date: 2008-03-12T18:26:48Z
From: Hadley Wickham
Subject: Converting a data frame with values into a matrix/
In-Reply-To: <365152.31546.qm@web32801.mail.mud.yahoo.com>

>  mm1  <- cast(mm, Class~Name)
>  aba <- mm1[,2:6]
>  aba[is.na(aba)] <- 1
>  final <- data.frame(mm1$Class, aba)
>  names(final) <- names(mm1)
>  final

You can abbreviate all this to:

final <- cast(mm, Class ~ Name, fill = 1)

Hadley

-- 
http://had.co.nz/