OK, I figured it out. For anyone interested, the solution is to change: $R->send(qq`x <- c(1,2,3) \n shapiro.test (x)`); to $R->send(qq`x <- c(1,2,3) \n out <- shapiro.test (x) \n print (out)`); Which then gives you the result as it should.
-- Robin <[EMAIL PROTECTED]> JabberID: <[EMAIL PROTECTED]> Hostes alienigeni me abduxerunt. Qui annus est? PGP Key 0xA99CEB6D = 5957 6D23 8B16 EFAB FEF8 7175 14D3 6485 A99C EB6D
pgpKKZOMyWQTU.pgp
Description: PGP signature
