search for: modelstr

...s occasionally, but approximately 90% of the time, I get the following error from modelCheck(): Error in handleRes(res[[3]]) : An OpenBUGS module or procedure was called that did not exist. The specific code seems not to matter, but here is an example (model taken from the OpenBUGS tutorial): modelString = " model { for (i in 1:N) { r[i] ~ dbin(p[i], n[i]) b[i] ~ dnorm(0, tau) logit(p[i]) <- alpha0 + alpha1 * x1[i] + alpha2 * x2[i] + alpha12 * x1[i] * x2[i] + b[i] } alpha0 ~ dnorm(0, 1.0E-6) alpha1 ~ dnorm(0, 1...

...ion_not_permitted); > + } > + > + // Delete target file. > + bool existed; > + if ( error_code ec = sys::fs::remove(filePath, existed) ) > + return ec; > + > + // Create new file of specified size in same directory but with random name. > + SmallString<128> modelStr; > + modelStr.assign(filePath); > + modelStr.append(".tmp%%%%%%%"); > + SmallString<128> tempFilePath; > + if ( error_code ec = sys::fs::unique_file_sized(Twine(modelStr), size, > + tempFilePath, false) ) { This sh...

I now have an implementation of FileOutputBuffer (OutputBuffer was already taken). The patch supports the functionality listed below and I've tested that it works for lld. -------------- next part -------------- A non-text attachment was scrubbed... Name: FileOutputBuffer.patch Type: application/octet-stream Size: 25308 bytes Desc: not available URL:

Greetings, I am running a factor analysis model in rjags and have received the following error Error parsing model file: syntax error on line 5 near "" Line 5 is model { Here is my syntax. Any insight would be greatly appreciated. require(rjags) modelstring = " model { for (i in 1 : nData) { for (j in 1 : nIndicators) { y[i,j] ~ dnorm(mu[i,j],psi[j]) ephat[i,j] <- y[i,j] - mu[i,j] } mu[i,1] <- alpha[1]+xi[i,1] # Factor 1 mu[i,2] <- alpha[2]+lam[2]*xi[i,1] mu[i,3] <- alpha[3]+lam[3]*xi[i,1] mu[i,4] <- a...

...h => firstParse.day) end #of if return firstParse end #of def # remove whitespace and other characters such as newline def remove_whitespace(dirty_name) return dirty_name.split('' '').join(" ") end #find names in strings from the net def paramMatcher(modelString, param, cssScrapedString) case modelString when ''Venue'' venues = Venue.all i=0 venues.each do |v| if v.venueName.scan(cssScrapedString)[0] or cssScrapedString.scan(v.venueName)[0] return [v.venueName, v.city_location, v.longitude, v.latitude] en...

>> #1. Map the physical drive slots to how they show up in FBSD so if a >> disk is removed and the machine is rebooted all the disks after that >> removed one do not have an 'off by one error'. i.e. if you have >> ada0-ada14 and remove ada8 then reboot - normally FBSD skips that >> missing ada8 drive and the next drive (that used to be ada9) is now

I have data that looks like this: > df1 group id 1 red A 2 red B 3 red C 4 blue D 5 blue E 6 blue F I want a list of the groups containing vectors with the ids. I am avoiding subset(), as it is only recommended for interactive use. Here's what I have so far: df1 <- data.frame(group=c("red", "red", "red", "blue",