search for: doba

...AM, PIKAL Petr <petr.pikal at precheza.cz> wrote: >>> Dear all >>> >>> I encountered strange behaviour of augPred with virtually the same >>> data >>> >>> First I made groupedData object. >>>> mar.g<-groupedData(rutilizace~doba|int, data=mar) >>> >>> When I perform nlme on complete dataset I get an error with augPred >>>> fit<-nlsList(rutilizace~SSasymp(doba, Asym, R0, lrc), data=mar.g) >>> Warning message: >>> c("1 error caught in nls(y ~ cbind(1 - exp(-exp(lrc) *...

..., Aug 23, 2017 at 5:17 AM, PIKAL Petr <petr.pikal at precheza.cz> wrote: > > Dear all > > > > I encountered strange behaviour of augPred with virtually the same > > data > > > > First I made groupedData object. > >> mar.g<-groupedData(rutilizace~doba|int, data=mar) > > > > When I perform nlme on complete dataset I get an error with augPred > >> fit<-nlsList(rutilizace~SSasymp(doba, Asym, R0, lrc), data=mar.g) > > Warning message: > > c("1 error caught in nls(y ~ cbind(1 - exp(-exp(lrc) * x), exp(-exp(lr...

Dear all I encountered strange behaviour of augPred with virtually the same data First I made groupedData object. > mar.g<-groupedData(rutilizace~doba|int, data=mar) When I perform nlme on complete dataset I get an error with augPred > fit<-nlsList(rutilizace~SSasymp(doba, Asym, R0, lrc), data=mar.g) Warning message: c("1 error caught in nls(y ~ cbind(1 - exp(-exp(lrc) * x), exp(-exp(lrc) * x)), data = xy, : singular gradient",...

...loom County" comic strip ) On Wed, Aug 23, 2017 at 5:17 AM, PIKAL Petr <petr.pikal at precheza.cz> wrote: > Dear all > > I encountered strange behaviour of augPred with virtually the same data > > First I made groupedData object. >> mar.g<-groupedData(rutilizace~doba|int, data=mar) > > When I perform nlme on complete dataset I get an error with augPred >> fit<-nlsList(rutilizace~SSasymp(doba, Asym, R0, lrc), data=mar.g) > Warning message: > c("1 error caught in nls(y ~ cbind(1 - exp(-exp(lrc) * x), exp(-exp(lrc) * x)), data = xy, : si...

I'm trying to make a loopo with some file.... > > library(dplR) > files.rwl <- system("ls *.rwl", intern=TRUE) > files.rwl [1] "cimfasy.rwl" "rocquce.rwl" > for (i in files.rwl) assign(gsub("\\.rwl$", "_rwl", i), read.rwl(i, header=0)) There are 70 series There are 21 series > > cimfasy_rwl 1990 1.55 0.00

Hello all, I apologize for a terribly simple question. I'm used to using Stata and am trying to `switch' over to R. I would like to recode a vector in a data frame when the value of it meets the following condition: if (dataframe$factor=='3'){dataframe$thevector<-(an arithmetic mean). What I would like to result is the creation of a new variable within the data frame for

Hello I have a data set that looks like this; > b2 dato chr status PRRSvac PRRSsanVac PRRSsanDk PRRSdk 33 2007-12-03 090432 R?d SPF 34 2007-02-09 090432 R?d SPF+sanDK 35 2002-12-17 090432 R?d SPF+DK 36 2002-11-27 090432 R?d SPF+sanDK 37 2002-07-23

...es ,data=iris)) # This work whit xyplot but don't work whit bwplot, the boxplot's # lines aren't black. How Set I my boxplot's lines to black ???? Thanks a lot. -- Mario Alfonso Morales Rivera Profesor Auxiliar. Departamento de Matem??ticas y Estadistica. Universidad de C??doba. Colombia

Hi All, I've been having a little trouble with creating a loop that will run a a series of t.tests for inspection, Below is the code i've tried, and some checks i've looked at. I've used the get(paste()) idea as i was told previously that the use of the eval should try and be avoided. I've run a single syntax to check that my systax is correct and works without any problems