similar to: long character data

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

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

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

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

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,

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

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:

Does anyone know about functions for calculating Somer's D in R? Perhaps even a version for censored values, like the two functions in hmisc? Thanks for any pointers -- 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-people, Did anyone succeeded in using R sockets under Windows NT? Yesterday I could establish client and sever sockets with R-0.65.0 under linux, but with R-0.64.2 under NT I can't. I use Windows NT 4.0, Service pack 5, with tcp/ip protocol installed. Any help appreciated (I will summarize to the list) Best regards -- Dr. Jens Oehlschl?gel-Akiyoshi MD FACTORY GmbH Bayerstrasse 21

Thank you Thomas, it really works and I was blind! >The offending line is > >if (length(port <- as.integer(socket$socket)) != 1) > stop("invalid `socket' argument") > >and socket$socket needs to be changed to x$socket -- Dr. Jens Oehlschl?gel-Akiyoshi MD FACTORY GmbH Bayerstrasse 21 80335 M?nchen Tel.: 089 545 28-27 Fax.: 089 545 28-10

I just discovered that it is not possible to read in data with scan() and to have no na.strings at all scan(na.strings=NULL) gives an error message "invalid na.strings value". Furthermore it is not possible to read in empty strings, without automatic conversion to 'NA', because of if (!missing(sep)) na.strings <- c(na.strings, "") within scan() As

Hi, is the following difference intended? > 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 -- Dr. Jens

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