search for: para2

http://r.789695.n4.nabble.com/file/n3612530/PSC.r PSC.r Hi all, I just wrote a program in R by editing it in Microsoft Word and then pasting into the text editor of R. The above is the file. And below is what the console complains.... Why doesn't it recognise 'r'?? I have to mention that at least when I typed this first several lines into the console, the first error didn't

...extension # reading the parameter files input<-read.table("input.txt", header=TRUE) output<-read.table("output.txt", header=TRUE) # no_elements for 1 and 2 should be the same no_elements1<-as.integer(toString(input$para1[1])) no_elements2<-as.integer(toString(input$para2[1])) # increasing the memory limit to 4 MB memory.limit(size=4000) for (i in 1:no_elements1) { input_name<-toString(input$para1[i+1]) predict<-read.table(input_name, header=TRUE) predValues<-predict(calibrate.rf, predict) predValues<-as.numeric(predValues) output_name<-to...

...1.5,1.5,1.5,1.5,1.5,1.6,1.6,1.6,1.6,1.7,1.7,1. 7,1.7,1.7,1.7,1.8,1.8,1.9,1.9,1.9,1.9,1.9,2.0,2.1,2.1,2.3,2.4,2.4,2.7,2. 8,3.3,3.4,3.6,5.0) # set the data frame data1<- data.frame(cbind(N,CSR,ev)) # the initial values of parameters para1.st <- c(a=75.4,b=165.9,c=-22.4,d=0,e=0.8,f=-0.28,g=0) para2.st <- c(a=31.3,b=-176.9,c=53.41,d=0,e=75.2,f=-0.18,g=0) # call nls funciton try.control <- c(maxiter=100, minFactor=1/4096) out <- nls(N~CSR/(1/(a+b*ev+c*(ev^2))+CSR/(d+e*exp(f*ev)))-g, data1, start=para1.st, control=try.control, trace=T) The data is from experiments and the pattern of...

Hi all, I wonder if it is somehow possible to execture or redirect to a controller function from RJS? Right now I do: def foo() render :partial => ''executeagain'' end _executeagain.rhtml <script> new Ajax.Updater(''elmntID'', ''/test/foo/'', {evalScripts:true}); </script> This will loop I know :) How can I achieve the same