All, Consider:
BagA <- c(-1000,10,10,10,10,10,10,
10,20,20,20,20,20,20,30,
30,40,40,50,60)
BagB <- c(10,20,30,30,40,40,50,50,
50,50,50,50,60,60,60,60,
60,60,60,1000)
layout(c(2,1))
barplot(table(BagB))
barplot(table(BagA))
At this point, I'd like to arr
r of Anthropology
Texas A&M University
College Station, TX 77843-4352
> -Original Message-
> From: r-help-boun...@r-project.org [mailto:r-help-bounces@r-
> project.org] On Behalf Of darnold
> Sent: Sunday, August 26, 2012 2:26 PM
> To: r-help@r-project.org
> Subject: R
I was able to do this, but kinda painful:
BagA <- c(-1000,10,10,10,10,10,10,
10,20,20,20,20,20,20,30,
30,40,40,50,60)
BagB <- c(10,20,30,30,40,40,50,50,
50,50,50,50,60,60,60,60,
60,60,60,1000)
tblA <- table(BagA)
tblAnames <- names(tblA)
tblA <- as.vecto
On Aug 26, 2012, at 1:52 PM, darnold wrote:
Hmmm
This worked this time. And I didn't use the transform t.
Yeah. There is something pathological that happens when you do this:
tblA <- table(BagA)
tblA[8] <- 0
> tmp <-c(tmp,0)
> is.vector(tmp)
[1] TRUE
But if you instead use tmp[8] <-
Hmmm
This worked this time. And I didn't use the transform t.
BagA <- c(-1000,10,10,10,10,10,10,
10,20,20,20,20,20,20,30,
30,40,40,50,60)
BagB <- c(10,20,30,30,40,40,50,50,
50,50,50,50,60,60,60,60,
60,60,60,1000)
tblA <- table(BagA)
tblA <- c(tblA,0)
darnold wrote
>
> All, Consider:
>
> BagA <- c(-1000,10,10,10,10,10,10,
> 10,20,20,20,20,20,20,30,
> 30,40,40,50,60)
>
> BagB <- c(10,20,30,30,40,40,50,50,
> 50,50,50,50,60,60,60,60,
> 60,60,60,1000)
>
> layout(c(2,1))
>
> barplot(table(BagB))
> barplot
6 matches
Mail list logo