similar to: formatC (bug and fix) (PR#394)

Dear R-Developers, Just a note: there are some inconsistencies between formatC(), format() and format.char() and cross calling between these functions. On the one hand > cat(format('{"}'), "\n") {\"} > cat(format.char('{"}'), "\n") {\"} is by default format.char(, flag="-") and thus by default calling format() >

In RW0.651 and RW0.901, I discovered some unexpected behaviour when I used as.matrix.data.frame() > matrix('"', 2, 2) [,1] [,2] [1,] "\"" "\"" [2,] "\"" "\"" > unclass(as.data.frame(matrix('"', 2, 2))) $V1 [1] "\"" "\"" $V2 [1] "\"" "\""

Happy new Year! Here is a slightly changed version of format.char(), which really speeds up for big data. Regards Jens Oehlschlägel-Akiyoshi format.char.old <- format.char format.char <- function (x, width = NULL, flag = "-") { if (is.null(x)) return("") if (!is.character(x)) { warning("format.char: coercing 'x' to

I observed the following difference: > ddd <- data.frame(a=1:3, b=1:3) # assignment of 'X' silently ignored > ddd[1,1] <- 'X' > is.factor(ddd[[1]]) [1] FALSE > ddd a b 1 1 1 2 2 2 3 3 3 # assignment of 'X' not ignored > ddd[[1]][1] <- 'X' > is.factor(ddd[[1]]) [1] TRUE > ddd a b 1 X 1 2 2 2 3 3 3 Regards > version

-- Happy holidays! -- Dear R Development Core Team, I want to thank you *very much* for the new "Writing R Extensions" manual published with RW0.901 and hope this is the right place to report some possible typos. page 17, example given in the middle of the page, I think it should read REAL(version) = 3.0; ^^^^^^^ page 23, second example, I think the parameter definition

Dear all, In RW0901 I could > dates("01/01/2000") [1] 01/01/100 where only the printing was wrong, but the double numeric representation of the chron object was calculated correctly but now in RW0990 > dates("01/01/2000") Error in fun(yy, ...) : must be 2-digit (numeric) year specification and also the followig doesn't help > dates("01/01/2000",

I observe dificulties with using data.frame(I(matrix)) > mat <- matrix(letters, 2, 2) > dimnames(mat) <- list(c(1:2), c("x","y")) > mat x y 1 "a" "c" 2 "b" "d" > dd <- data.frame(I(mat)) > ddd I.mat..x I.mat..y 1 a a 2 b b 3 c c doesn't look too bad, but, has

If you have the following dataframe: > x <- data.frame(x=I(rep('"', 3))) then > as.matrix(x)[1,1] == x[1,1] [1] FALSE which seems to be WRONG to me. Also I don't understand > x x 1 \\\" 2 \\\" 3 \\\" Details ======= As expected > unclass(x) $x [1] "\"" "\"" "\"" attr(,"class") [1]

I have a question concerning memory. I understood that R takes a fixed amount of memory at startup (which I can influence with --vsize --nsize) and that gc() shows the memory still free of the total memory reserved for R. However, if I create a long vector of character data, gc() only seem to reflect the space needed for a vector of pointers to char, the space used for the character data itself

Here is a possible BUG with as.data.frame() and/or [.data.frame which broke Michael Lapsleys RODBC-Code. Can anyone confirm it is a bug or a 'feature' of the prototype? tablename <- "abc" a <- as.data.frame(cbind("abc", 1:3)) b <- as.data.frame(cbind(tablename, 1:3)) # ok > a V1 V2 1 abc 1 2 abc 2 3 abc 3 # missing column name > b tablename 1

Can anyone give advice how to interactively exchange data between R and SQL-Databases like DB2, ORACLE, MS-SQL-Server ? If the answer is: 'currently not', this would be information for me as well. I will summarize to the list. Best regards -- Dr. Jens Oehlschl?gel-Akiyoshi MD FACTORY GmbH Bayerstrasse 21 80335 M?nchen Tel.: 089 545 28-27 Fax.: 089 545 28-10 http://www.mdfactory.de

Dear R-Developers, please find attached a set of drafted functions for flat file import and export, partially extending existing functions, partially completely written as new code. I thought you might be interested in those functions and the accompanying utilities for padding and trimming. Main features are - supports several formats, i.e. fixed width and CSV (with one exception) - supports

================================================= This is an automated summary of the status of the R-bugs repository. Note that this may be neither complete nor perfectly correct at any given instance: Not all bugs are reported, and some reported bugs may have been fixed, but the repository not yet updated. Some bug fixes are difficult to verify because they pertain to specific hardware or

I couldn't find this in online help or the archives: Is there any R function or object giving the mapping of the colornames as given by colors() into the hsv() model? Regards -- Dr. Jens Oehlschl?gel-Akiyoshi MD FACTORY GmbH Bayerstrasse 21 80335 M?nchen Tel.: 089 545 28-27 Fax.: 089 545 28-10 http://www.mdfactory.de

I couldn't find this in online help or the archives: Is there any R function or object giving the mapping of the colornames as given by colors() into the hsv() model? Regards -- Dr. Jens Oehlschl?gel-Akiyoshi MD FACTORY GmbH Bayerstrasse 21 80335 M?nchen Tel.: 089 545 28-27 Fax.: 089 545 28-10 http://www.mdfactory.de

Some days ago a problem with perl under WinNT was reported, which lead to > > t1 <- read.fwf("d:/maj/consulting/MarkStevens/matrix.txt", width=c(4, 22, > rep(7, 8))) > Error: "scan" can't open file I installed perl from the WindowsNt Recource Kit CD (Sept. 98) and encountered the same problem: Scan couldn't open the file - because perl did not produce

Hi, can anyone help with two questions concerning persp? (1) Is there a function in R to project points onto a persp() plot, as is in S+ (perspp() I think) ? (2) How can I label and tickmark axes x,y and z in a persp plot? (I am still using RW065) Thanks for any help -- Dr. Jens Oehlschl?gel-Akiyoshi MD FACTORY GmbH Bayerstrasse 21 80335 M?nchen Tel.: 089 545 28-27 Fax.: 089 545 28-10

Hi, when writing a wrapper function, I would like to be able to pass additional arguments to more than one function inside, e.g. density.panel <- function(x, na.rm=TRUE, ...){ usr <- par("usr") on.exit(par(usr)) par(usr = c(usr[1:2], 0, 1) ) lines( density(x, na.rm=na.rm, ...), ... ) } and then call it like density.panel(x, col="red",

Hi, under RW0.651 and RW0.091 I found > x <- data.frame(char=I(letters[1:3]), num=1:3, log=c(TRUE, FALSE, NA), fak=factor(letters[24:26])) > x char num log fak 1 a 1 TRUE x 2 b 2 FALSE y 3 c 3 NA z > > x[1,1] <- 'a' > x[1,1] [1] "1" > > x$char[1] <- 'a' > x$char[1] [1] "a" > >

Before sending to r-bugs I ask here: > mat <- matrix(letters, 2, 2) > dimnames(mat) <- list(c(1:2), c("x","y")) > mat x y 1 "a" "c" 2 "b" "d" > dd <- data.frame(I(mat)) > ddd I.mat..x I.mat..y 1 a a 2 b b 3 c c doesn't look too bad, but only one column name: