[R-gregmisc-users] SF.net SVN: r-gregmisc: [1035] trunk/gdata/R/unknown.R

[<gg...@us...>]

Revision: 1035
          http://svn.sourceforge.net/r-gregmisc/?rev=1035&view=rev
Author:   ggorjan
Date:     2006-11-30 13:38:01 -0800 (Thu, 30 Nov 2006)

Log Message:
-----------
minor commet to the code

Modified Paths:
--------------
    trunk/gdata/R/unknown.R

Modified: trunk/gdata/R/unknown.R
===================================================================
--- trunk/gdata/R/unknown.R	2006-11-30 21:36:40 UTC (rev 1034)
+++ trunk/gdata/R/unknown.R	2006-11-30 21:38:01 UTC (rev 1035)
@@ -1,8 +1,8 @@
 ### unknown.R
 ###------------------------------------------------------------------------
 ### What: Change given unknown value to NA and vice versa
-### $Id:$
-### Time-stamp: <2006-10-30 18:06:17 ggorjan>
+### $Id$
+### Time-stamp: <2006-11-28 15:02:19 ggorjan>
 ###------------------------------------------------------------------------
 
 ### {{{ isUnknown
@@ -184,7 +184,7 @@
 
   if(unkN < n) {
     if(unkNamesNullTest | defInNames) {
-      if(defInNames) {
+      if(defInNames) { # handling .default
         names(def) <- NULL
         unknownDef <- rep(def, length=(n - unkN))
         names(unknownDef) <- namesX[!(namesX %in% unkNames)]


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.