search for: keunhchoi

I saw a similar question but I still don't fully understand how to implement optim. Can someone help me out with this? Thanks. Keun-Hyung > vol<-rep(c(0.03, 0.5, 2, 4, 8, 16, 32), 3) > time<-rep(c(2,4,8),each=7) > p.mated<-c(0.47, 0.48, 0.43, 0.43, 0.26, 0.23, "null", 0.68, 0.62, 0.64, 0.58, 0.53, 0.47, + 0.24, 0.8, 0.79, 0.71, 0.56, 0.74, 0.8, 0.47) >

Here is a clean version. I did this with nls and it works (see below), but I need to do it with optim. Keun-Hyung # optim vol<-rep(c(0.03, 0.5, 2, 4, 8, 16, 32), 3) time<-rep(c(2,4,8),each=7) p.mated<-c(0.47, 0.48, 0.43, 0.43, 0.26, 0.23, NA, 0.68, 0.62, 0.64, 0.58, 0.53, 0.47, 0.24, 0.8, 0.79, 0.71, 0.56, 0.74, 0.8, 0.47) eury<-data.frame(vol=vol, time=time, p.mated=p.mated)

Dear all, I'm using R2.8 version, and am trying to do NMDS and calculate other diversity indices in vegan package. The problem is that it works with a small set of data (43 X 23; row by column), but the following error message comes up with a larger data set (43 X 104) (it seems not large to me at all). I made it sure that all data are of numeric type as required. >gh1.H=diversity(gh1)

Thanks Jim for pointing out how to properly ask. Here is is my question and a small subset of the data and output. I have a data set with many blanks. The blanks should be replaced with zero once imported. I tried read.table, read.csv (R 2.8 version),or scan, but none was successful. Any suggestion, please.. thanks. Keun-Hyung >garoben=read.table("c:\\Rdata\\garoben.txt",header=T,

...t; Today's Topics: 1. row sum question (Keun-Hyung Choi) 2. Re: How can I get the interpolated data? (pinwheels) 3. Re: error bars (Gavin Simpson) 4. Re: sorting variable names containing digits (Gabor Grothendieck) 5. Re: row sum question (jim holtman) 6. row sum question (keunhchoi at gmail.com) 7. Hmisc Dotplot with confidence intervals and panel.points problem (PSJ) 8. Re: Hmisc Dotplot with confidence intervals and panel.points problem (Frank E Harrell Jr) 9. Re: Hmisc Dotplot with confidence intervals and panel.points problem (PSJ) 10. AR(2)...

Dear members, I have a data set with many blanks. The blanks should be replaced with zero once imported. I tried read.table, read.csv (R 2.8 version),or scan, but none was successful. Any suggestion, please.. thanks. Keun-Hyung [[alternative HTML version deleted]]

Hello, I have a data set like one below. First, I'd like to replace the empty cells with NA, and then the one immediately above. I could replace NAs with the immediate one, but don't know for the empty cells. index <- which(is.na(data1$year)) while (any(index)) { dummy$data1[index] <- dummy$data1[index - 1] index <- which(is.na(data1$year)) } Second, The id

Dear R-list Suppose I have a data set stored in hmet, for which I did get confidence limit on a linear regression as shown below. My question is how I can subset only data points which are within the confidence limit. Thank you. Keun-Hyung --------------------------------------------------------------- Al=rnorm(100, 3) Cd=rnorm(100, 0.2) hmet=data.frame(Al=Al, Cd=Cd) plot(Al,