Thank you Jorge, what I want to have is
> z <- A1+A2
>z
4
The problem is that A1, A2,... still unknown, so that I have the following error
> A1
object "A1" not found
Thank you in advance!
----- Original Message ----
From: Jorge Ivan Velez
To: Diego Culattoni
Cc: R mailing list
Sent: Tuesday, April 29, 2008 7:38:41 PM
Subject: Re: [R] Combine Values into a Vector or List
Hi Diego,
Is this what you want?
# Data set
set.seed(123)
x1<-paste("A", 1:6, sep = "")
x2<- round(rgamma(6,2,1))
x3<-paste("B", 1:6, sep = "")
x4<- round(rgamma(6,2,1))
data1 <- data.frame(x1,x2,x3,x4)
data1
x1 x2 x3 x4
1 A1 1 B1 0
2 A2 3 B2 0
3 A3 0 B3 3
4 A4 2 B4 2
5 A5 4 B5 2
6 A6 2 B6 2
# A's
As=as.numeric(t(data1[,1:2])[-1,])
names(As)=paste('A',1:length(As),sep="")
As
A1 A2 A3 A4 A5 A6
1 3 0 2 4 2
# B's
Bs=as.numeric(t(data1[,3:4])[-1,])
names(Bs)=paste('B',1:length(Bs),sep="")
Bs
B1 B2 B3 B4 B5 B6
0 0 3 2 2 2
HTH,
Jorge
On Tue, Apr 29, 2008 at 1:20 PM, Diego Culattoni wrote:
Hi Richard,
Thanks a lot! What I actually want to have
>A1
4
>A2
2
...... and so on! Is this possible?
Thank you again :)!
----- Original Message ----
From: "Richard.Cotton@hsl.gov.uk"
To: Diego Culattoni
Cc: r-help@stat.math.ethz.ch; r-help-bounces@r-project.org
Sent: Monday, April 28, 2008 11:24:12 AM
Subject: Re: [R] Combine Values into a Vector or List
> x1<-paste("A", 1:6, sep = "")
> x2<- round(rgamma(6,2,1))
> x3<-paste("B", 1:6, sep = "")
> x4<- round(rgamma(6,2,1))
> data1 <- data.frame(x1,x2,x3,x4)
> I would like to get
> data2 <- c(A1=4, A2=1, A3=0,...)
> Is there any standard for such a case?
I presume that 4, 2, 0 are the first few values of x2. In which case, I
think that what you want is simply this:
names(x2) <- x1
Regards,
Richie.
Mathematical Sciences Unit
HSL
------------------------------------------------------------------------
ATTENTION:
This message contains privileged and confidential inform...{{dropped:16}}