similar to: is.constant

Hi all, I just cannot think of how to do it: I want to take the first variable (column) of a data frame and regress it against all other variables. bla <- function (dat) { reg <- lm(whateverthefirstofthevariablenamesis ~., data=dat) return(reg) } What kind of function do I have to take instead of the whateverthefirstofthevariablenamesis, eval(), substitute(), get(), ... to

>>x <- c(1, 2, NA) >>>>is.constant(x) > >> >> [1] TRUE >> >> For data such as c(1, 1, 1, NA), I should think the safest answer should be >> NA, because one really doesn't know whether that last number is 1 or not. >> >> Andy >> >My version is >is.constant <- function(x) { > if (is.numeric(x)

Hi there, (sorry Martin, ich habe den falschen Empfaenger erwischt :-( ) Is there a function in the base package or elsewhere which returns TRUE and not NA, even if NA is involved: (I did not find in the help system :-( ) if ( x==something & !is.na(something)) or if ( x==something & !is.na(x==something)) If "something" is complicated, a function would be handy. Thanks

Hi there, I am interested in the inner workings of wilcox.test: > wilcox.test function (x, ...) UseMethod("wilcox.test") <environment: namespace:stats> how can I get at the code, if it is R-code? For Methods one should be able to learn what extension to use, but here default or such do not help. Is there a wayplot.default to learn which different versions of

Hi, Sorry to bother, but I checked around and did not succed creating a bundle from six existing packages (which are checkable, installable, etc. individually). I carefully followed the procedure given in ch. 1.1.5 Package bundles. However, I am getting hoffmann at fluke:~/R/Sources >R CMD check cwhmisc * checking for working latex ... OK * using log directory

Hi all, May be there is a plot which shows 3 variables in a triangle, their sum being constant. I have forgotten its name, and a search in the engine using "plot" did not help. Does anyone know of such a procedure in R or S? Thank you --christian Dr.sc.math.Christian W. Hoffmann Mathematics and Statistical Computing Landscape Dynamics and Spatial Development Swiss Federal Research

Hi, Using help under help.start() is working fine (html) Q1: using > ?solve results in the message "sh: ~/R/tmp/R4f32S1cfb: cannot open" displayed in the XEmacs buffer "help[R](solve)". BUT there exists a file R.R4f32S167e in that directory. (not quite the same name). Does the "sh: " prefix suggest that the shell "sh" is run, although my

Hi there I hope that I am in the right forum. I am working on Win2000 PC connected via Exceed 6.0.1.0 to a SunOS fluke 5.9 Generic_118558-11 sun4u sparc SUNW,Sun-Fire-480R There I am using Mozilla Firefox 1.0.7 as a browser. I am having difficulties viewing .html files. Their first pages are displayed normally, black on white, links in blue. When I scoll down, the pages appear black

Hi, I am trying to create the assignment function: "substring<-" <- function(text, first, last=100000, sub) { if(is.character(first)) { if(!missing(last)) stop('wrong # arguments') return(sedit(text, first, sub)) } lf <- length(first) if(length(text)==1 && lf > 1) { if(missing(last)) last <- nchar(text) last <- rep(last,

Hi, This may belong more to r-develop, but general discussion may be useful (for the how many-th time ?) seq(2,5,-2) seq(5,2,2) both result in Error in seq.default(2, 5, -2) : wrong sign in 'by' argument But often, if not always, mathematicians and programmers want a behaviour e.g. in for loops, where this statement results in an empty statement, that is for (ii in seq(2,5,-2))

Dear r-users! I would like to cross two data frame which have the same row number but different in the number of column. Can anybody help me for this case ? Thanks a lot in advance -------------------------------------------------------------------------------- Majid Iravani PhD Student Swiss Federal Research Institute WSL Research Group of Vegetation Ecology Z?rcherstrasse 111

I am trying, without success, to find out how to formulate correctly the parameters of "eval". My code snippet looks like: proutside <- function(txt) { cat("\n",txt,"\n"); print(eval(parse(text = txt))) } vari <- function(Ob) { prininside <- function(txt) { cat("\n",txt,"\n"); print(eval(parse(text = txt))) }

Hi, I am trying to use sub, regexpr on expressions like log(D) ~ log(N)+I(log(N)^2)+log(t) being a model specification. The aim is to produce: "ln D ~ ln N + ln^2 N + ln t" The variable names N, t may change, the number of terms too. I succeded only partially, help on regular expressions is hard to understand for me, examples on my case are rare. The help page on R-help

Hi, I would like to get a hint on how to debug in the case of #> R CMD check pllib signalling * checking for code/documentation mismatches ... WARNING Error in parse(file, n, text, prompt) : syntax error on line 22 I am able to sort out which of the files is the culprit is by swapping files in and out of the /R and /man directories. But I cannot find the syntax error, the .Rd file seems

Hi, I want to create several packages, with package Aa depending on functions in package A. My directories with .r and .Rd are organized as follows ./A/man/*.Rd ./A/R/*.r ./Aa/man/*.Rd ./Aa/R/*.r Afre creatin package A with R CMD check A R CMD INSTALL --library=lib A I then have ./lib/A/help etc If I try to do R CMD check Aa R CMD INSTALL --library=lib Aa I am getting * checking

Hi everyone, Being new to the crowd of R users I am wondering what the equivalent of attach("/home/bla/hoffmann/R/.RData",2) (S style) is in R. What I want is a split of .RData repositories. One in a central place where I keep functions and interesting stuff important for all work I am doing, an several others which contain stuff of an dividual project only. When I start in a

Dear all, I would like to multiply two matrixes with the different dimension column by column. Let make an example: If I have two matrixes "X" and "Y"as follow: X<- matrix(1:12, nrow=4, ncol=3, dimnames=list(c("A","B","C","D"), c("stage1","stage2","stage3"))) Y<- matrix(1:28, nrow=4, ncol=7,

Dear, Some analysis (linear regression) can only be done from a vectorized dataset whereas others require a matrix (Mantel tests). I use the two analyses and thus need to format my data in matrix and vector. I spent some time trying to solve the problem and I just gave up. Did anyone knows how to transform a matrix into a vector and back-transform a vector into a matrix? Thanks by

Hi to all This is the first time I am quoting a question and I hope, my question is not too basic... For the following data, I wish to draw a fitted curve. x <- c(123,129,141,144,144,145,149,150,158,159,163,174,183,187,242,248) y <- c(14.42,26.96,31.3,19.95,36.36,15.4,24.76,35.39,28.07,40.97,26.23,42.83,46.53,14.79,49.18,48.08) If I plot the data, it looks somehow that a logistic

Hi all, I am fancying the idea of using my preferred shell (t)csh when invoking system(). How can I do that? (I didn't find anything about that in the FAQ). Thanks for help, -christian Dr.sc.math.Christian W. Hoffmann Mathematics and Statistical Computing Landscape Modeling and Web Applications Swiss Federal Research Institute WSL Zuercherstrasse 111 CH-8903 Birmensdorf, Switzerland phone: