similar to: cbind.data.frame(.) S/R incompatibility

This is not only bug report, but also a RFC (request for comments): The basic problem is that there are (at least) two ways of easily getting non-factor character columns in data.frames. The first is read.table(*, as.is = TRUE) and the second is data.frame(.., I(...), ..) which differ in their result. Whereas the first produces `pure' character columns in the data.frame,

MM> I've sent two bug reports that both haven't been forwarded to R-devel MM> and haven't should up at the jitterbug repository. MM> ?? MM> Martin Well, actually only one [the other went to R-core alone] Here it is : From: Martin Maechler <maechler@sophie> To: R-bugs Subject: plot math - segfault and "frac", "^" bug(s).. Date: 8

{Connected to the bug report on expand.grid(.) and my fix to it..} [Following the spirt of arrays where parts of dim() can be 0] I would like for these two to give the "same" or at least, both to give a data.frame with 0 observations of 0 variables. Currently [R 0.65.1 and pre-0.90] > str(d0 <- as.data.frame(list())) `data.frame': 0 obs. of 0 variable: list()

(as the subject says) It makes sense to add (say k) boxplots to a given plot, using the given coordinate system. Currently, the calling sequence boxplot -> boxplot.default() -> bxp() [modeled after S] doesn't allow this, since bxp() explicitly sets up the coordinate system. One way would be to add an "add = TRUE" argument to boxplot(.) and bxp(.) and then additionally

Something worth discussing, I think these output names NEED a change : > boxplot(rt(250,df=3), plot=F) $"1" $"1"$stats [1] -2.7995357 -0.7170382 0.1109581 0.8426811 3.0483316 $"1"$n [1] 250 $"1"$conf [1] -0.04490152 0.26681765 $"1"$out [1] 5.784389 4.766206 -3.932449 -3.460407 -3.695599

[this didn't go out at noon time during our e-mail storm...] In R versions 0.65, 0.90.0, and the current "pre-release", both on Linux and Solaris (the segfault at least) [with x11() , but most probably not device dependent]. The following shows it all : plot(1,type='n') ## Frac doesn't shrink properly... text(.7,1.3, expression( frac(7,4) == 1 *

This is in R versions 0.65, 0.90.0, and the current "pre-release", both on Linux and Solaris [with x11() , but most probably not device dependent]. The following shows it all : plot(1,type='n') ## Frac doesn't shrink properly... text(.7,1.3, expression( frac(7,4) == 1 * frac(3,4)), cex=1) text(.7,1.2, expression( frac(7,4) == 1 * frac(3,4)), cex=3)

Short example: > str(d <- data.frame(a = I(letters[1:5]))) `data.frame': 5 obs. of 1 variable: $ a:Class 'AsIs' chr [1:5] "a" "b" "c" "d" ... > str(d[TRUE,,drop = FALSE]) `data.frame': 5 obs. of 1 variable: $ a: chr "a" "b" "c" "d" ... The real problem about this is, that as soon

somewhat `esoteric' problem/bug : ## Constructing an empty data.frame (e.g. for later rbind()ing), works with data.frame(a = 1[-1]) ## or data.frame(a = 1[-1], b = "c"[-1]) ## but {these give warnings, but *work* with S+ (5.1) ## giving the NULL data.frame, i.e. the same as data.frame() ## --- which I don't like either: NULL should behave as numeric(0) here!}:

I appreciate Brian and Martin's answers -- and I certainly don't spend as much time & energy maintaining and answering questions about R as they do -- *but* it does seem to me that it would make a number of new (switching) user's lives easier if there were a succinct list of these differences, with a disclaimer ... I would be willing to maintain such a list, but since I

Thank you Bendix, {I hope it's okay if I CC my answer to your private mail to R-devel ..} >>>>> On Wed, 27 Oct 1999 08:55:28 +0200, BXC@novo.dk (Bendix Carstensen) said: >> -----Original Message----- >> From: Martin Maechler [mailto:maechler@stat.math.ethz.ch] >> Sent: 25. oktober 1999 14:58 To:Gregory R. Warnes >> Cc:

>>>>> "MM" == Martin Maechler <maechler@stat.math.ethz.ch> writes: MM> This is not a bug in the very strict sense, MM> but for consistency, MM> I feel that MM> abline() MM> should obey par("xpd") setting, even by ...-argument. MM> The following code shows how lines() ``works'' and abline() does not :

Currently, as.data.frame() , i.e., at least its "matrix" method, still coerces logicals to factors. I think this is not desired and not according to the changes to read.table() for R 1.4.0 which allow logicals. Does anybody see a reason against a change which would allow logical matrices to become data.frames with logical variables ? Martin Maechler <maechler@stat.math.ethz.ch>

>>>>> "MM" == Martin Maechler <maechler@stat.math.ethz.ch> writes: >>>>> "TL" == Thomas Lumley <thomas@biostat.washington.edu> writes: TL> On Thu, 24 Aug 2000, Troels Ring wrote: >>> Dear friends. >>> >>> Is this as expected ? Is alpha and beta too large simply ? >>>

>>>>> "MM" == Martin Maechler <maechler@stat.math.ethz.ch> writes: >>>>> "TL" == Thomas Lumley <thomas@biostat.washington.edu> writes: TL> On Thu, 24 Aug 2000, Troels Ring wrote: >>> Dear friends. >>> >>> Is this as expected ? Is alpha and beta too large simply ? >>>

>>>>> "Jacob" == Jacob van Wyk <jlvw at rau.ac.za> writes: Jacob> Could anybody please help: I simply want to generate Jacob> random samples from a multinomial distribution with Jacob> fixed n and given probability vector p. Jacob> How can I do this? I've recently written the following {for the R package "normix"}. The

>>>>> "MikeM" == Michael M Meyer <mikem at salter-point.com> >>>>> on Sat, 07 Sep 2002 18:40:01 -0700 writes: MikeM> which(x==max(x)) will return the indices fo all MikeM> elements that are equal to the max. So the first max MikeM> would be which(x==max(x))[1] (At least this works in MikeM> R, I assume it does in

>>>>> "MM" == Martin Maechler <maechler@stat.math.ethz.ch> writes: >>>>> "david" == david <david@orion-10.cs.byu.edu> writes: david> When I issue the command: if ( c(2.8,3)[1] < pretty david> (c(2.8,3))[1]) print ("problem") david> the result is "problem" prints. I have traced it to bits

>>>>> "TL" == Thomas Lumley <thomas@biostat.washington.edu> writes: on Subject: Re: [Rd] Problem with NAs using chisq.test() (PR#748) which I've changed, since it is another bug we are talking about now TL> On Sun, 26 Nov 2000 kjetikj@astro.uio.no wrote: >> Full_Name: Kjetil Kjernsmo .............. .............. TL> However,

This is something between a question and a bug report. {sometimes one should first ask on R-help before sending to R-bugs....} I wanted to plot (.) a formula with "..." ## Works : e0 <- expression(T(x[1],...x[n])*", "*N[1] == 101) # works ok plot(1, main = e0) ## Now, need substitute, to replace with value of variableThis works nn <- 102 (e1 <-