similar to: RE: stange behavior of subset [] (was: lowess + turnpoints = doubling integers?)

Happy New Year, r-helpers! I am using lowess to smooth a scatter plot, xx<-lowess(xinput,f=.04) #defaults for other args followed by turnpoints(xx$y) #defaults for other args I plot the smoothed result as well as turnpoints (using yy$tppos) on top of raw data plot. Result is exactly as expected, graphically. For another purpose, I calcuate the difference between turnpoints (representing

Sorry for this off-topic subject. I am fighting for running SJava under Windows. SJava_0.64 (compiled by Simon Urbanek, thanks), R 1.6.2, Java JDK 1.4.0_02, Windows XP pro: > library(SJava) > .JavaInit() Error in .JavaInit() : Couldn't start Java Virtual Machine: Cannot find the Omegahat interface manager class. Check you classpath! > # And the second time... > .JavaInit() It

Sorry for this out-of-topic message. A while ago, somebody mentioned a software (an R interface xas in development at that time) to graphically look inside classification/regression trees and calculate various statistics on their nodes. Unfortunatelly, I lost the link and do not remember at all the name of the software. Could someone refresh my poor memory,... or perhaps point me on other

Hello, I do not understand the following behaviour. Could someone explain me what happens? > a <- NULL > a$item <- 1:3 > a$item [1] 1 2 3 > rm(a) > a <- NULL > a[["item"]] <- 1:3 Error: more elements supplied than there are to replace Why do I get an error message using list[["item"]], and not using list$item? Best, Philippe Grosjean

OK, I have made a little search about this "problem" that apparently occurs only on Windows platform... (but I am sure most of you are already aware of it): the slow down is due to the adoption of a different algorithm for pow in mingw 3.x. This is motivated by some other changes in mingw. Here is a quote of Danny Smith that did this change: >When mingw changed default FPU settings

Hi all, After being a long time off the R and R-SIG-GUI lists, because I was working hard on SciViews, I am happy to deliver the first public version of this program. It is still v. 0.1, that is, an incomplete alpha version. It currently installs only on Windows 2000 or XP (NOT on Windows 9X/ME/Millenium, nor any other platform!). You can download it at http://www.sciviews.org. Please, note that

Hello, This message is little off-topic in R-help. Sorry for that, but not all interested people are wired yet to r-sig-gui (http://www.stat.math.ethz.ch/mailman/listinfo/r-sig-gui). Thanks for your comprehension. A preview version of SciViews (a Graphical User Interface for R under Windows, http://www.sciviews.org) was released a few weeks ago. Since then, the Web site recorded several

Hi, I was able to connect to a MySQL database (called "zooscan" and with a table "serie" under Win XP with R 1.6.2 using: > library(DBI) > library(RMySQL) Warning message: DLL attempted to change FPU control word from 8001f to 9001f > drv <- dbDriver("MySQL") > con <- dbConnect(drv, dbname="zooscan") > dbExistsTable(con,

as.integer() truncates doubles toward zero, as Splus does (at least v. 6.1 under Windows does). Thus: > look <- (10 * seq(14)) - 76 > 10 * (73.1 + look) [1] 71 171 271 371 491 586 681 791 886 981 1101 1201 1301 1401 > as.integer(10 * (73.1 + look)) [1] 70 170 270 370 490 586 681 791 886 981 1101 1201 1301 1401 ... It is not documented in R! I propose appending

Hello, I suppose this is a general behavior with external function calls, so I do not post (yet) a specific bug report. Could someone explain this? a <- rep(1, 20) + rnorm(20, mean=0.00001, sd=0.0001) b <- embed(a, 3) # I want to know where the item in column 2 is greated than both col 1 and 3 (peak) test1 <- max.col(b) == 2 # ... or I could use a less optimal code test2 <- apply(b,

I do not understand what happens here (under Win XP): a <- abs(matrix(rnorm(800*800)/2, ncol=800, nrow=800)) system.time(b <- a^1000)[3] took about 1 sec on my computer with R 1.7.0 and it takes now 4.59 sec with R 1.7.1 Similarly, phi <- 1.6180339887498949 a <- floor(runif(750000)*1000) system.time(b <- (phi^a - (-phi)^(-a))/sqrt(5))[3] took about 0.9 sec with R 1.7.0, and it

I do not understand what happens here (under Win XP): a <- abs(matrix(rnorm(800*800)/2, ncol=800, nrow=800)) system.time(b <- a^1000)[3] took about 1 sec on my computer with R 1.7.0 and it takes now 4.59 sec with R 1.7.1 Similarly, phi <- 1.6180339887498949 a <- floor(runif(750000)*1000) system.time(b <- (phi^a - (-phi)^(-a))/sqrt(5))[3] took about 0.9 sec with R 1.7.0, and it

Hi, This is (presumably?) a bug in R 1.7.0 under Windows. I have not tested it on other systems. Attachment of packages is case sensitive but not library(), resulting in multiple loadings of the same package if the library name is spelled differently. The following example loads the `tools' package, once as `tools' and once as `Tools'. This behavior is the same with all packages and

Hi, I am out of town and will get back to you on the 13th of July. Leo >>> "r-help at stat.math.ethz.ch" 06/27/03 00:32 >>> Send R-help mailing list submissions to r-help at stat.math.ethz.ch To subscribe or unsubscribe via the World Wide Web, visit https://www.stat.math.ethz.ch/mailman/listinfo/r-help or, via email, send a message with subject or body

Hello all, I've put together a quick and dirty menubar + dialogs + spreadsheet GUI for R using the RGtk package. Performance is not great (OOP is a real memory hog?), the design may be worse, but the hope is that it will be useful in an introductory stats course while we await the arrival of a real gui with ObveRsive and SciViews. The package can be found at

Hello all, I've put together a quick and dirty menubar + dialogs + spreadsheet GUI for R using the RGtk package. Performance is not great (OOP is a real memory hog?), the design may be worse, but the hope is that it will be useful in an introductory stats course while we await the arrival of a real gui with ObveRsive and SciViews. The package can be found at

Hello, I'm trying to get a few turnpoints for a financial time series. There is a function in pastecs that does that. However, I get a large number of turnpoints: library(pastecs) data(EuStockMarkets) dax <-EuStockMarkets[,1] plot(dax) turnp <-turnpoints(dax) summary(turnp) #gives 925 peaks/pits!!! How can specify to get only 30 turnpoints? Second question: the extract function

Good evening to everybody. I have a data of four columns - three of the columns represent date while the fourth is counts. Setting 4000 as my minimum point/value, I wish to find out the number of counts that are less or equal to 4000 and the dates they occur. I have installed pastecs and have been trying to use turnpoints function to do this. I have not been much lucky. I am a still learning. I

Bonjour, J'ai t?l?charg? SciViews Insider que je trouve tr?s convivial. Par contre, je n'arrive pas ? comprendre comment enregistrer un script R en type de fichier R justement. Mes programmes fonctionnent tr?s bien, mais SciViews me propose uniquement de les enregistrer au format txt sous un type de fichier "bloc notes". Comment les enregistrer avec l'extension .R comme le

Im just attempt writing a function which import manipulate and export spss data, my basic problem when i use the cat command that their is a space to much ? Perhaps here exist a better solution ? cat(paste(path),paste(file)) c:/Project/Allbus/ aprioriTotal.sav test <- function(dir) { for (i in 1:length(list.files)) path <- "c:/Project/Allbus/" file <- list.files()[4] tmpdata