[R] Entering Data Files
David L Carlson
dcarlson at tamu.edu
Thu Jul 19 00:24:26 CEST 2012
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.
More information about the R-help
mailing list