similar to: Manual: writing R Extensions (PR#380)

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] "\"" "\""

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",

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

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

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

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

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

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

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

I just tried to batch-start rgui.exe (not rterm.exe) in a way, that it read.table()s data from a file with changing filename. As I understand no command line parameters are available for that, so instead I tried to pass the filename to an approbriate .RProfile, which works roughly, BUT ## this is my %R_USER%\.RProfile im <- read.table("d:/temp/im/temp.csv", header=TRUE,

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

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() >

Hi, When trying to generate very long strings, my R hangs without any error message, even if given much memory. # e.g. x <- character(10) for (i in 1:10) x[i] <- paste(1:1000, collapse="abc") paste(x, collapse="") # or directly paste(1:10000, collapse="abc") Am I violating any max(nchar(character())) or is this a bug? Regards Jens Oehlschl?gel-Akiyoshi

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" > >

Hi, below is a function which pastes a matrix, but uses parsing (deparse(substitute()) and eval()). Does anyone know a more standard solution to pasting a matrix? Best Jens > paste.matrix(dd, sep=" ", collapse=NULL) [1] "1 a" "2 b" "3 c" > paste.matrix <- function(mtext, sep=" ", collapse=NULL){ + rcode <- paste( +

Some days ago I asked for general methods to access SQL-Databases. Thanks to: Terry Westley [twestley at buffalo.veridian.com], partha_bagchi at hgsi.com, F.Tusell [etptupaf at bs.ehu.es], Michael Lapsley [mlapsley at ndirect.co.uk], Robert Gentleman [rgentlem at jimmy.harvard.edu], Torsten Hothorn [hothorn at statistik.uni-dortmund.de] Several solutions were suggested: (1) using Michael

OK: > formatC(as.double(c(1,0,NA))) [1] "1" "0" "NA" NOT OK: > formatC(as.integer(c(1,0,NA))) [1] "0" "1072693248" "NA" > formatC(as.integer(c(0,1,NA))) [1] "0" "0" "NA" BUG TRACED TO R-code of formatC() where x[!Ok] <- 0 unintendedly changes the storage.mode of x to

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 like to have a continuously running R process, which can receive a dataframe from a client (over TCP/IP), does some processing, and sends some data back. What is the prefered way to do this? Using the socket interface? Using omega's CORBA stuff? Does anyone has example code for doing so? Thanks for any help Regards -- Dr. Jens Oehlschl?gel-Akiyoshi Analyse MD FACTORY GmbH Gr?nstr. 15