From prokaj at cs.elte.hu  Tue Nov 21 06:09:09 2006
From: prokaj at cs.elte.hu (prokaj at cs.elte.hu)
Date: Tue, 21 Nov 2006 06:09:09 +0100 (CET)
Subject: [Rd] packBits (PR#9374)
Message-ID: <20061121050909.8C2463D747@slim.kubism.ku.dk>

Full_Name: Prokaj Vilmos
Version: R 2-4-0
OS: Windows
Submission from: (NULL) (193.224.79.8)


PackBits(rbinom(32,1,0.5)==1,"integer")
does not work. 

z<-packBits(rbinom(32,1,.5)==1,"integer")
Error in packBits(x, type) : argument 'x' must be raw, integer or logical


Taking a closer look at the C code 
main/character.c  do_packBits rutin
one can find the following checking

 if (TYPEOF(x) != RAWSXP && TYPEOF(x) != RAWSXP && TYPEOF(x) != INTSXP)
     errorcall(call, _("argument 'x' must be raw, integer or logical"));

It's obvious that some of the RAWSXP should be LGLSXP



[Rd] packBits (PR#9374)
prokaj at cs.elte.hu