search for: duursma

...r, tester$groups) # And want to keep only the first item in each: lapply(tester.L, function(x) x <- x[1,] ) How do i make a dataframe out of the last result, which looks like "tester", without looping? (i can use rbind in a for loop, but is rather slow) thanks for your help, Remko Duursma ____________________________________________________________ Get advanced SPAM filtering on Webmail or POP Mail ... Get Lycos Mail!

...r rows and rbind everything back together #This is where I get stuck #The end dataframe will look something like: ? x y ?fac NA NA ? B NA NA ? A 1 2 ? C 1 3 ? C 1 2 ? C 1 3 ? A #Is there a better way to do this where I do not need to subset perhaps using lapply? Thanks, Daisy -- Daisy Englert Duursma Department of Biological Sciences Room E8C156 Macquarie University, North Ryde, NSW 2109 Australia Tel +61 2 9850 9256

Hi all, the option type="h" in plot() makes nice vertical (histogram-like) lines. Is there a way to make similar, horizontal lines? I can of course resort to using lines() multiple times, but i was hoping that there is a more elegant solution. thanks, Remko Duursma Ph.D. student Dept. Forest Resources Forest Biometrics Lab University of Idaho, Moscow, ID.

...two=c(2,3,1)) #> tester # one two #1 3 2 #2 2 3 #3 1 1 # I want to sort "tester" by column "one", so that i get a dataframe # that looks like: #one two #1 1 #2 3 #3 2 I know of 'sort' but it can only sort vectors. Thanks for your help, Remko Duursma

..., expression(~degree~C),cex=1) This worked great and resulted in the symbol for degree. In the function, I have changed it so: text(1,1,paste(b_unit),cex=1) and b_unit<-expression(~degree~C) This now inserts ~degree~C instead of the symbol. Any advice? Thanks, Daisy -- Daisy Englert Duursma Room E8C156 Dept. Biological Sciences Macquarie University? NSW? 2109 Australia

...008-08-01"),as.POSIXct("2008-09-01"), length=10)) testdfr$yvar <- rnorm(10) sp <- interpSpline(yvar ~ Date, testdfr) preddfr <- data.frame(Date=as.POSIXct("2008-08-02")) predict(sp, preddfr) thanks, Remko ------------------------------------------------- Remko Duursma Post-Doctoral Fellow Centre for Plant and Food Science University of Western Sydney Hawkesbury Campus Richmond NSW 2753 Dept of Biological Science Macquarie University North Ryde NSW 2109 Australia Mobile: +61 (0)422 096908

...x from different studies, and want to estimate a "general" y=f(x). I only have the b0,b1's and R-squareds. Should i weigh the separate equations by their R-squared? thanks Remko ^'~,_,~'^'~,_,~'^'~,_,~'^'~,_,~'^'~,_,~'^'~,_,~' Remko Duursma, Ph.D. student Forest Biometrics Lab / Idaho Stable Isotope Lab University of Idaho, Moscow, ID, U.S.A.

...oes not! print(x) #mean mean(x) @ The first comment does not appear in the sweaved document, the second one does. How can this be? I have tried print=TRUE and keep.source=TRUE, but neither seem to affect this behavior. thanks, Remko ------------------------------------------------- Remko Duursma Research Lecturer Hawkesbury Institute for the Environment University of Western Sydney Hawkesbury Campus, Richmond Mobile: +61 (0)422 096908 www.remkoduursma.com

...;,"NA","GLM","CTA","NA","NA") The end result should look like df2<-(cbind(df1,one_presence,one_absence)) I am sure I can do this with a loop or maybe grep but I am out of ideas. Any help would be appreciated. Cheers, Daisy -- Daisy Englert Duursma Room E8C156 Dept. Biological Sciences Macquarie University? NSW? 2109 Australia

...-2,-2) y <- c(2,1) for(i in 1:length(texts))text(x[i],y[i],texts[i],pos=4, col="blue") # As you can see the label "R2 = 48.7" remains at "paste(R^2, " = ", 48.7)" # What to do? Thanks for your help, Remko ..-~-.-~-.-~-.-~-.-~-.-~-.-~-.-~-.-~- Remko Duursma Post-doctoral researcher Dept. Forest Ecology University of Helsinki, Finland _________________________________________________________________ With tax season right around the corner, make sure to follow these few simple tips.

...current code sdat <- read.csv (paste(data.dir,"/summary.data.csv", sep="")) year <-c("1", "2", "3") for (y in year) { sdat2 <- sdat[sapply(strsplit(as.character(sdat$GCM), ""), function(zzz)zzz[5] == y),] Thanks Daisy Englert Duursma Bioclimatic Modeller Macquarie University Sydney, NSW, Australia

...fac char group_a group_b 1 1 C a aa bb I know for a vector I can: x1 <- c("a_b","b_c","c_d") do.call("rbind",strsplit(x1, "_")) but I am not sure how this relates to my data.frame Thanks, Daisy -- Daisy Englert Duursma Room E8C156 Dept. Biological Sciences Macquarie University? NSW? 2109 Australia

...e connection, which should be able to deal with proxies and such. How do I set this up for RCurl? And can I use those settings with RGoogleDocs as well? I have the name of the proxy server and the port number. (Windows XP). thanks, Remko ------------------------------------------------- Remko Duursma Post-Doctoral Fellow Centre for Plants and the Environment University of Western Sydney Hawkesbury Campus Richmond NSW 2753 Dept of Biological Science Macquarie University North Ryde NSW 2109 Australia Mobile: +61 (0)422 096908 www.remkoduursma.com

...tallation failed. But i set the path to MikTex, and "latex" as well as "pdftex" both run in the (Win) command window. I use R1.81 but also tried in R1.71. Any ideas? Remko ^'~,_,~'^'~,_,~'^'~,_,~'^'~,_,~'^'~,_,~'^'~,_,~' Remko Duursma, Ph.D. student Forest Biometrics Lab / Idaho Stable Isotope Lab University of Idaho, Moscow, ID, U.S.A.

...run{} blocks). I do R CMD check Maeswrap, all bits get OK-ed, except: "Running examples in 'Maeswrap-Ex.R' failed." When I run the 'Maeswrap-Ex.R' file myself, there are no problems. Any pointers? thanks Remko ------------------------------------------------- Remko Duursma Post-Doctoral Fellow Centre for Plant and Food Science University of Western Sydney Hawkesbury Campus Richmond NSW 2753 Dept of Biological Science Macquarie University North Ryde NSW 2109 Australia Mobile: +61 (0)422 096908

Dear R-helpers, i want to draw a small plot (histogram) within a larger plot (simple scatterplot), so that the axes of the bigger plot remain intact. I know how to use layout() and par(mfrow...) and such, but I want the smaller graph to be *inside* the bigger plot. Is this possible? thanks, Remko

...;) # Make union ..... system.time({ leavesoutline <- union(leaves[[1]], leaves[[2]]) for(i in 3:length(leaves))leavesoutline <- union(leavesoutline, leaves[[i]]) }) # about 1sec here. # Check it: plot(leavesoutline) thanks! Remko ------------------------------------------------- Remko Duursma Research Lecturer Centre for Plants and the Environment University of Western Sydney Hawkesbury Campus Richmond NSW 2753 Dept of Biological Science Macquarie University North Ryde NSW 2109 Australia Mobile: +61 (0)422 096908 www.remkoduursma.com

...uot;) Error in curlPerform(curl = curl, .opts = opts, .encoding = .encoding) : embedded nul in string: and a<-httpPOST(" http://biocache.ala.org.au/ws/occurrences/download?q=Banksia+ericifolia") Error: Internal Server Error Any help would be appreciated. Daisy -- Daisy Englert Duursma Department of Biological Sciences Room E8C156 Macquarie University, North Ryde, NSW 2109 Australia [[alternative HTML version deleted]]

...envir = env) : internal error -3 in R_decompress1 Error: package/namespace load failed for 'nnet' My questions are: Why are the packages downloading to the above location? What is the next step(s) I should take to setting up the server correctly. Thanks, Daisy -- Daisy Englert Duursma Room E8C156 Dept. Biological Sciences Macquarie University NSW 2109 Australia Tel +61 2 9850 9256 10A Carrington Rd Hornsby, NSW 2077 Mobile: 0421858456

...times and each run takes 18 hours At this point I am confused what should be written in Unix and then at what point should I call R. I have read an abundance of things but I feel like I am missing something essential. Or perhaps I have read all the wrong things. Thanks, Daisy -- Daisy Englert Duursma Room E8C156 Dept. Biological Sciences Macquarie University? NSW? 2109 Australia