embarrassing wrong logic


git-svn-id: svn://svn.r-forge.r-project.org/svnroot/robustbase@634 694ef91d-65df-0310-b7bb-92e67a308ead
update for r633

git-svn-id: svn://svn.r-forge.r-project.org/svnroot/robustbase@635 694ef91d-65df-0310-b7bb-92e67a308ead