Re: [R] Attributing values to matrix according to names

From: Peter Dalgaard <p.dalgaard_at_biostat.ku.dk>
Date: Fri 21 Oct 2005 - 01:25:12 EST

"Schneider, Manuel" <Manuel.Schneider@eawag.ch> writes:

> Dear Peter and Uwe
>
> Thanks for your suggestions.
> However,
> > data[names(count),1,1] <- count[names(count)]
> Still gives the indexing problem, guess because not all element of count can be found in data.

Perhaps something like

nm <- names(count)
nm <- intersect(nm,dimnames(data)[[1]]) # or rownames(data) data[nm,1,1] <- count[nm]  

> Found a way round this by
> > temp<-rep(NA, times=as.numeric(names(count[length(count)])))
> > temp[as.numeric(names(count))]<-count
> > rwname<-rownames(data)
> > for (i in 1:dim(data)[1]) data[i,1,1]<-temp[as.numeric(rwname[i])]
> What works for me but I am convinced there is a far more elegant way.
>
> Kind regards
>
> Manuel
>
> -----Original Message-----
> From: pd@pubhealth.ku.dk [mailto:pd@pubhealth.ku.dk] On Behalf Of Peter Dalgaard
> Sent: Thursday, October 20, 2005 4:29 PM
> To: Schneider, Manuel
> Cc: r-help@stat.math.ethz.ch
> Subject: Re: [R] Attributing values to matrix according to names
>
> "Schneider, Manuel" <Manuel.Schneider@eawag.ch> writes:
>
> > > data["10014",1,1]<-count["10014"]
> > works but
> >
> > > data["names(count)",1,1]<-count["names(count)"]
> > Fails with Error: indexing outside limits.
>
> Well, you don't have a row named "names(count)" now do you? Try
> dropping the quotes.
>
> --
> O__ ---- Peter Dalgaard ุster Farimagsgade 5, Entr.B
> c/ /'_ --- Dept. of Biostatistics PO Box 2099, 1014 Cph. K
> (*) \(*) -- University of Copenhagen Denmark Ph: (+45) 35327918
> ~~~~~~~~~~ - (p.dalgaard@biostat.ku.dk) FAX: (+45) 35327907
>

-- 
   O__  ---- Peter Dalgaard             ุster Farimagsgade 5, Entr.B
  c/ /'_ --- Dept. of Biostatistics     PO Box 2099, 1014 Cph. K
 (*) \(*) -- University of Copenhagen   Denmark          Ph:  (+45) 35327918
~~~~~~~~~~ - (p.dalgaard@biostat.ku.dk)                  FAX: (+45) 35327907

______________________________________________
R-help@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
Received on Fri Oct 21 02:36:12 2005

This archive was generated by hypermail 2.1.8 : Sun 23 Oct 2005 - 19:13:17 EST