search for: resultlist

Displaying 13 results from an estimated 13 matches for "resultlist".

2008 Nov 21
1
list creation interpolation
...re, but I'm not sure what to search for although I have tried and didn't come up with anything so.. Here's my question. How can I interpolate list names or do I have to do it post list creation. Since that's not very clear here is some sample code of what I wanted to do: > resultlist<-list() > a<-c("Book", "video", "radio", "mp3") > foo<-rnorm(10) > resultlist$a[1]<-foo Warning message: In resultlist$a[1] <- foo : number of items to replace is not a multiple of replacement length > What I wanted he...
2009 Feb 10
3
summary of a list
...f function I use in the loop is the following: FormList <- list(PTG.P ~ fz1(Portata, a, b), PTG.P ~ fz2(Portata, a, b), PTG.P ~ fz3(Portata,a, b, d, e), PTG.P ~ fz4(Portata, a, b), PTG.P ~ fz5(Portata, a, b, d), PO4.P ~ fz1(Portata, a, b), PO4.P ~ fz2(Portata, a, b), ... And the loop I use is: resultList <- list() for (i in 1:length(formList)) { resultList[[i]] <- nls(formList[[i]], data=subset(dati, Fiume=="Laveggio"), start=startList[[i]], nls.control(maxiter=1000, warnOnly=TRUE), algorithm='port', na.action=na.omit,lower=lowerList[[i]], upper=upperList[[i]])...
2009 Feb 10
2
plotting the result of a nonlinear regression
..., b=10), nls.control(maxiter=200), algorithm='port', trace=TRUE, na.action=na.omit, lower=list(a=0, b=10), upper=list(a=100, b=100)) plotfit(r.PTG.V) I tried to use the function plotfit on the result of the following for loop but I got an error message: for (i in 1:length(formList)) { resultList[[i]] <- nls(formList[[i]], data=subset(dati, Fiume=="Laveggio"), start=startList7[[i]], nls.control(maxiter=1000, warnOnly=TRUE), algorithm='port', na.action=na.omit,lower=lowerList7[[i]], upper=upperList7[[i]]) } plotfit(resultList[[1]] "Error in diff(as.numeri...
2009 Feb 03
3
non linear regression with nls
Hello, I'm a beginner with R and it's the first time I'm using the R-help list... I hope I'm in the right place, if not: Sorry!! I need to do non linear regressions on a data set which columns are: "river.name" "Portata" "PTG.P" "PO4.P" "NT.N" "NH4.N" "NO3.N" "BOD5" "SiO2"
2009 Sep 18
1
lapply - value changes as parameters to function?
Hi, I'm trying to get better at things like lapply but it still stumps me. I have a function I've written, tested and debugged using individual calls to the function, ala: ResultList5 = DoAvgCalcs(IndexData, Lookback=5, SampleSize=TestSamples , Iterations=TestIterations ) ResultList8 = DoAvgCalcs(IndexData, Lookback=8, SampleSize=TestSamples , Iterations=TestIterations ) ResultList13 = DoAvgCalcs(IndexData, Lookback=13, SampleSize=TestSamples , Iterations=TestIterations ) Res...
2008 Mar 13
2
Using loop numbers in write.csv
This is a question I have wanted to ask for a while but hesitated because I was sut sure I would find the answer on my own, but as of yet...no dice. 1) Is there a way to use the loop number in naming things in R. Specifically I have a simulation that has two loops. I would like to be able to write out the results to a csv file after each iteration. something like: for (i in 1:10){
2006 Mar 02
3
Custom SQL Question
Hello, can search with following SQL Statement: def execute_search @result = Search.find_by_sql ["SELECT * FROM customers WHERE firstname LIKE ? LIMIT 10",params[:firstname]] render :template => "search/resultlist", :layout => false end My question is, how do I use 2 or more Parameters - and with the "%"? (I Like to use SQL-Statements because later i will have Queries over a lot of tables) Thank you Thorsten -- Posted via http://www.ruby-forum.com/.
2007 Oct 11
3
radio_button_tag
Hello I have a view which have 2 radio buttons : ... <td style="width:5%">Actuel</td> <td style="width:10%"><%= radio_button_tag(:actuel, value = "1", checked = false, options = {}) %> <td style="width:5%">Last</td> <td style="width:10%"><%= radio_button_tag(:last, value = "1", checked =
2008 Jun 24
3
loop with files
I'm trying to make a loop with many files... > library(dplR) > > files <- system("ls *.rwl", intern=TRUE) > > files [1] "cimfasy.rwl" "rocquce.rwl" > for (i in files) {a <- read.rwl(i,header=0)} There are 70 series There are 21 series > class(a) [1] "data.frame" This loop import all the files rwl in a single data.frame ( a
2009 Feb 13
2
odfWeave & prettyR
...t;file")", it works for the first part and then it makes a mess, i guess something might be wrong in my formatting or the function R2html doesnt recognize the function if() because i get errors like this one "Error in parse(cmdcon) : unexpected 'if' at 1: for (i in 1:length(resultList)){ tempSummary <- try(summary(resultList[[i]]), silent = TRUE) if" everytime there is a if. I tried with the function htmlize and it works for the text (like summaries) but I didn't manage to get the plots on the html file I tried to use the funcion HTMLgraph but I couldn't...
2010 Jun 03
1
cumsum function with data frame
Dear list, I have a problem with the cumsum function. I have a data frame like the following one variable Year value EC01 2005 5 EC01 2006 10 AAO1 2005 2 AAO1 2006 4 what I would like to obtain is variable Year value cumsum EC01 2005 5 5 EC01
2008 Oct 05
3
efficient use of lm over a matrix vs. using apply over rows
I have a large matrix, each row of which needs lm applied. I am certain than I read an article in R-news about this within the last year or two that discussed the application of lm to matrices but I'll be darned if I can find it with Google. Probably using the wrong search terms. Can someone steer me to this article of just tell me if this is possible and, if so, how to do it? My simplistic
2013 Nov 06
1
Multiple String word replacements: Performance Issue
...or Negative Emotion arguments<-list(x=y) y<-do.call(appendEmotion, arguments) # Output result<-list( textclean=y, first_ticker=first, all_ticker=signal_words, ticker_count=count) return(result) } resultList<-mclapply(dataframe$text_column,preprocessText) ** end main code ** (The return would be a list, which I plan to convert to a data.frame. Don?t get that far though). Before, I also tried to call each `gsub` seperately, thus performing the first `gsub` on every text string, then the second `g...