From dmurdoch at pair.com  Wed Nov 12 13:49:43 2003
From: dmurdoch at pair.com (Duncan Murdoch)
Date: Wed Nov 12 13:50:19 2003
Subject: [Rd] write.table quotes too much (PR#5042)
In-Reply-To: <16305.61823.637826.913353@mithrandir.hornik.net>
References: <20031112025820.75050F4DF@slim.kubism.ku.dk>
	<16305.61823.637826.913353@mithrandir.hornik.net>
Message-ID: <l1b4rvchsjop8i9rjme6qcjtnh8mr3ola2@4ax.com>

On Wed, 12 Nov 2003 09:38:23 +0100, you wrote:

>> The bug is due to the "else" near the beginning of write.table:
>
>>     if(!is.data.frame(x))
>>         x <- data.frame(x)
>>     else if(is.logical(quote) && quote)
>>         quote <- which(unlist(lapply(x, function(x)
>>                                     is.character(x) || is.factor(x))))
>
>> However, that looks intentional to me.  Is it really?
>
>Yes, but maybe not quite right :-)
>
>I think we could change this to remove the 'else', but pls check the
>consequences.

I've committed the change.  As far as I can tell, it doesn't have any
bad side effects.

Duncan Murdoch


[Rd] write.table quotes too much (PR#5042)
Duncan Murdoch