[R-gregmisc-users] SF.net SVN: r-gregmisc:[1976] trunk/gtools
Brought to you by:
warnes
From: <wa...@us...> - 2015-04-28 04:27:06
|
Revision: 1976 http://sourceforge.net/p/r-gregmisc/code/1976 Author: warnes Date: 2015-04-28 04:27:04 +0000 (Tue, 28 Apr 2015) Log Message: ----------- Changes to mixedsort(): - Hands off objects that are not character vectors to the default sort. - Add 'decreasing', 'na.last', and 'blank.last' arguments. Modified Paths: -------------- trunk/gtools/R/mixedsort.R trunk/gtools/man/mixedsort.Rd Modified: trunk/gtools/R/mixedsort.R =================================================================== --- trunk/gtools/R/mixedsort.R 2015-04-28 04:16:56 UTC (rev 1975) +++ trunk/gtools/R/mixedsort.R 2015-04-28 04:27:04 UTC (rev 1976) @@ -1,8 +1,6 @@ -# $Id$ - mixedsort <- function(x, decreasing=FALSE, na.last=TRUE, blank.last=FALSE) { - ord <- mixedorder(x, decreasing=decreasing, na.last=na.last, + svn ord <- mixedorder(x, decreasing=decreasing, na.last=na.last, blank.last=blank.last) x[ord] } @@ -116,5 +114,3 @@ return(retval) } - - Modified: trunk/gtools/man/mixedsort.Rd =================================================================== --- trunk/gtools/man/mixedsort.Rd 2015-04-28 04:16:56 UTC (rev 1975) +++ trunk/gtools/man/mixedsort.Rd 2015-04-28 04:27:04 UTC (rev 1976) @@ -1,5 +1,3 @@ -% $Id$ -% \name{mixedsort} \alias{mixedsort} \alias{mixedorder} This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |