> > ... > > The related functions, duplicated() and unique(), do have > > row-wise data.frame methods. E.g., > > > duplicated(data.frame(x=c(1,2,2,3,3),y=letters[c(1,1,2,2,2)])) > > [1] FALSE FALSE FALSE FALSE TRUE > > Perhaps match() ought to have one also. S+'s match is generic > > and has a data.frame method (which is row-oriented) so there we get: > > > match(data.frame(x=c(1,3,5), y=letters[c(1,3,5)]), > > data.frame(x=1:10,y=letters[1:10])) > > [1] 1 3 5 > > > is.element(data.frame(x=1:10,y=letters[1:10]), > > data.frame(x=c(1,3,5), y=letters[c(1,3,5)])) > > [1] TRUE FALSE TRUE FALSE TRUE FALSE FALSE FALSE FALSE FALSE > > > > I think that %in% and is.element() ought to remain calls to match() > > and that if you want them to work row-wise on data.frames then > > match should get a data.frame method. > > > > sounds good to me. how is > > 'a' %in% data.frame('a') > > in S+? > > thanks for the response.
S+ gives: > 'a' %in% data.frame(letters) [1] TRUE > 'a' %in% data.frame(letters[2:26]) [1] FALSE but that special case, x a scalar and table a data.frame with one column, gets by more or less by accident. > 'a' %in% data.frame(letters, num=1:26) Problem in match.data.frame(x, table, nomatch, incom..: table must be a list the same length as x > c('a', 'b') %in% data.frame(letters) Problem in match.data.frame(x, table, nomatch, incom..: table must be a list the same length as x The intent is that the x and table arguments to match be compatible data.frames. S+'s match works differently on lists than R's does. It is set up to work on data.frame-like things: x and table must be lists of the the same length and within each list, each element must have the same length. It acts like match(do.call("paste",x), do.call("paste",table)) but doesn't actually do the conversion to character implied in that (it hashes all the entries in each 'row' into one hash table entry, using the usual type-specific hash number computation on each entry and combining them to make the row hash number). E.g., > match(list(c(3,2), c(1,7), c(4,1)), list(c(1,4,2,3),c(0,6,7,1),c(0,5,1,4))) [1] 4 3 (Its match.data.frame() doesn't actually call this, for historical/inertial reasons. It goes the paste() route.) Bill Dunlap TIBCO Software Inc - Spotfire Division wdunlap tibco.com ______________________________________________ R-devel@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-devel