Try this:

xtabs( ~ V1 + V2, transform(dog3.df, V1 = factor(V1, levels =
as.character(seq(min(dog3.df$V1), max(dog3.df$V1), by = "days")))))


On Tue, Jun 8, 2010 at 4:52 PM, Erin Hodgess <erinm.hodgess@gmail.com>wrote:

> Dear R People:
>
> So thanks to your help, I have the following:
>
>
> > dog3.df <-
> read.delim("c:/Users/erin/Documents/dog1.txt",header=FALSE,sep="\t")
> > dog3.df
>         V1   V2
> 1  1/1/2000  dog
> 2  1/1/2000  cat
> 3  1/1/2000 tree
> 4  1/1/2000  dog
> 5  1/2/2000  cat
> 6  1/2/2000  cat
> 7  1/2/2000  cat
> 8  1/2/2000 tree
> 9  1/3/2000  dog
> 10 1/3/2000 tree
> 11 1/6/2000  dog
> 12 1/6/2000  cat
> > dog3.df$V1 <- as.Date(dog3.df$V1,"%m/%d/%Y")
> > DF3 <- with(dog3.df,data.frame(Date=V1,V2,1))
> > library(reshape)
> > cast(formula=Date~V2,data=DF3,value="X1",fill=0)
> Aggregation requires fun.aggregate: length used as default
>        Date cat dog tree
> 1 2000-01-01   1   2    1
> 2 2000-01-02   3   0    1
> 3 2000-01-03   0   1    1
> 4 2000-01-06   1   1    0
> >
>
> So far, so good.  My new question:  Can I fill in the days which are
> "missing"; i.e., 2000-01-04 and 2000-01-05, with zeros for each set,
> please?
>
> thanks,
> Erin
>
> --
> Erin Hodgess
> Associate Professor
> Department of Computer and Mathematical Sciences
> University of Houston - Downtown
> mailto: erinm.hodgess@gmail.com
>
> ______________________________________________
> R-help@r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
> http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>



-- 
Henrique Dallazuanna
Curitiba-Paraná-Brasil
25° 25' 40" S 49° 16' 22" O

	[[alternative HTML version deleted]]

