Hi, Here is another problem with data frame subsetting: > df <- data.frame(aa=1:3) > value <- data.frame(aa=11:12, row.names=c("A", "B")) > `[<-`(df, 4:5, , value=value) aa 1 1 2 2 3 3 A 11 B 12 > `[<-`(df, 5:4, , value=value) aa 1 1 2 2 3 3 B 12 A 11 For this last result, the rownames of the 2 last rows should be swapped. H. -- Herv? Pag?s Program in Computational Biology Division of Public Health Sciences Fred Hutchinson Cancer Research Center 1100 Fairview Ave. N, M1-B514 P.O. Box 19024 Seattle, WA 98109-1024 E-mail: hpages at fredhutch.org Phone: (206) 667-5791 Fax: (206) 667-1319
On 11/21/2017 06:19 PM, Herv? Pag?s wrote:> Hi, > > Here is another problem with data frame subsetting: > > > df <- data.frame(aa=1:3) > > value <- data.frame(aa=11:12, row.names=c("A", "B")) > > > `[<-`(df, 4:5, , value=value) > aa > 1 1 > 2 2 > 3 3 > A 11 > B 12 > > > `[<-`(df, 5:4, , value=value) > aa > 1 1 > 2 2 > 3 3 > B 12 > A 11This actually produces: > `[<-`(df, 5:4, , value=value) aa 1 1 2 2 3 3 A 12 B 11 but should instead produce: aa 1 1 2 2 3 3 B 12 A 11 sorry for the confusion. H.> > For this last result, the rownames of the 2 last rows should > be swapped. > > H. >-- Herv? Pag?s Program in Computational Biology Division of Public Health Sciences Fred Hutchinson Cancer Research Center 1100 Fairview Ave. N, M1-B514 P.O. Box 19024 Seattle, WA 98109-1024 E-mail: hpages at fredhutch.org Phone: (206) 667-5791 Fax: (206) 667-1319
Possibly Parallel Threads
- selectMethod() can fail to find methods in situations of multiple dispatch
- binary form of is() contradicts its unary form
- stopifnot() does not stop at first non-TRUE argument
- selectMethod() can fail to find methods in situations of multiple dispatch
- making object.size() more meaningful on environments?