[R] Entering Data Files

[David L Carlson]

You can do this using only xtabs. Using Rui's data.frame, d:

x <- xtabs(Count~Live+Age, d)

barplot(x, beside=T, legend.text=TRUE, args.legend=list(x="topleft"))

----------------------------------------------
David L Carlson
Associate Professor of Anthropology
Texas A&M University
College Station, TX 77843-4352


> -----Original Message-----
> From: r-help-bounces at r-project.org [mailto:r-help-bounces at r-
> project.org] On Behalf Of Rui Barradas
> Sent: Wednesday, July 18, 2012 4:24 PM
> To: darnold
> Cc: r-help at r-project.org
> Subject: Re: [R] Entering Data Files
> 
> Hello,
> 
> Sorry, I forgot the barplot.
> 
> 
> dmelt <- melt(d, id.vars=c("Live", "Age"), measure.vars="Count")
> wide <- dcast(Live ~ Age, data = dmelt)
> 
> col <- rainbow(4)
> barplot(as.matrix(wide[, 2:5]), beside=T, col=col)
> legend("topleft", wide[, 1], fill=col)
> 
> 
> Hope this helps,
> 
> Rui Barradas
> 
> Em 18-07-2012 22:19, Rui Barradas escreveu:
> > Hello,
> >
> > Install package 'reshape2' and try the following.
> >
> >
> > #install.packages('reshape2')
> > library(reshape2)
> >
> > d <- read.table(text="
> > Live    Age    Count
> > Parents    Age19    324
> > Another    Age19    37
> > OwnPlace    Age19    116
> > Group    Age19    58
> > Other    Age19    5
> > Parents    Age20    378
> > Another    Age20    47
> > OwnPlace    Age20    279
> > Group    Age20    60
> > Other    Age20    2
> > Parents    Age21    337
> > Another    Age21    40
> > OwnPlace    Age21    372
> > Group    Age21    49
> > Other    Age21    3
> > Parents    Age22    318
> > Another    Age22    38
> > OwnPlace    Age22    487
> > Group    Age22    25
> > Other    Age22    9
> > ", header=TRUE, stringsAsFactors=FALSE)
> > d
> >
> > dmelt <- melt(d, id.vars=c("Live", "Age"), measure.vars="Count")
> > dcast(Live ~ Age, data = dmelt)
> >
> >
> > Hope this helps,
> >
> > Rui Barradas
> >
> > Em 18-07-2012 21:35, darnold escreveu:
> >> Hi,
> >>
> >> Entering data from a given file is the hardest part of learning R
> for me.
> >> For example, I have this datafile from Moore's text:
> >>
> >> Live    Age    Count
> >> Parents    Age19    324
> >> Another    Age19    37
> >> OwnPlace    Age19    116
> >> Group    Age19    58
> >> Other    Age19    5
> >> Parents    Age20    378
> >> Another    Age20    47
> >> OwnPlace    Age20    279
> >> Group    Age20    60
> >> Other    Age20    2
> >> Parents    Age21    337
> >> Another    Age21    40
> >> OwnPlace    Age21    372
> >> Group    Age21    49
> >> Other    Age21    3
> >> Parents    Age22    318
> >> Another    Age22    38
> >> OwnPlace    Age22    487
> >> Group    Age22    25
> >> Other    Age22    9
> >>
> >> I can manually enter the numbers and create my table and barplot.
> >>
> >> x <- matrix(c(324, 378, 337, 318, 37, 47, 40, 38, 116, 279, 372,
> 487, 58,
> >> 60, 49, 25, 5, 2, 3, 9), c(5,4),byrow=T)
> >> rownames(x)=c("Parents","Another","OwnPlace","Group","Other")
> >> colnames(x)=c("Age19","Age20","Age21","Age22")
> >> x <- as.table(x)
> >>
> >> barplot(x,beside=T)
> >>
> >> But it would be nice to be able to read the data from the file,
> >> arrange it
> >> using R, then plot, if that is possible. Any suggestions?
> >>
> >> Thanks
> >>
> >> David
> >>
> >>
> >>
> >> --
> >> View this message in context:
> >> http://r.789695.n4.nabble.com/Entering-Data-Files-tp4636943.html
> >> Sent from the R help mailing list archive at Nabble.com.
> >>
> >> ______________________________________________
> >> R-help at 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.
> >>
> >
> > ______________________________________________
> > R-help at 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.
> 
> ______________________________________________
> R-help at 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.