search for: interpolat

Dear R-Users, I am looking for a help to deal with the following computational problem: I have a mapping f(x, y) -> (u, v) of [0,1]*[0,1] -> R^2. The mapping is given by tabulating f(x,y) on a uniform 2D grid and is assumed to be "interpolatable" in between the grid points (the number of points on each dimension is rather small, say 5). My ultimate goal is to numerically maximize v for any given u0, that is find x0(u0), y0(u0) such that v(x0, y0) = max { v(x,y) : u(x,y)=u0}. So my broad question is what tools does R have to help...

Hi all, I want to do this kind of function In R enviroment : For example : R <- 4 testString <- "I love $R" then search this testString, when find "$R",replace "$R" to R ,and because the value of R is 4 So the final string I want to get is "I love 4" How can I implement? Thanks advance Michael

Dear r-devel, I have implemented a function to create color palettes with improved contrast and logical order, compared with the built-in ones: source("arni.colors.R") # code is given below barplot(rep(1,100), col=arni.colors(100), space=0, border=0, axes=F) par(mfrow=c(2,1)) # rainbow() has too much green... barplot(rep(1,50), col=rev(rainbow(50,end=0.7)), space=0, border=0,

...r, title="Choose a color")) ##cat(e.color) if (nchar(e.color)>0){ tkconfigure(canvas.e,bg=e.color) Rmp.Draw() } } Rmp.Draw <-function(){ cr<<-colorRampPalette(c(b.color,e.color),space="Lab",interpolate="spline") rmpcol <- cr(n.col) #rmpcol<-rgb( rmpcol[,1],rmpcol[,2],rmpcol[,3]) inc <- 300/n.col xl <- 0 for(i in 1:n.col){ ##item <- tkitemconfigure(canvas.r,barlst[[i]],fill=rmpcol[i],outline=rmpcol[i]) #xl <- xl+inc } } s...