search for: geq

...- 0.001 alpha <- 0.3 T2 <-40 step <- function(x){ if(x>=0) step <- 1 else step <- 0 } Nmax <- 250 n <- 1 while(n<Nmax){ surviv <- function(n){ surviv <- exp(-k*n)/(1+exp(alpha*(n-tau))) } geq <- function(n){ geq <- Hct0+beta1*as.integer(integrate(surviv,0,n)[1])+step(n-T2)*(beta2-beta1)*as. integer(integrate(surviv,0,n-T2)[1]) } plot(n, geq(n), type="p", pch=19, xlim=c(0,250), ylim=c(0.25,0.35), xlab="time in days", ylab=&quo...

Hello At the start of October, Duane Johnson announced the Query mixin plugin on this list. The code was attached to the announcement email. Unfortunately, I''ve not been able to locate the attached code. Goggle has not helped me this time. Could somebody forward it to me? Thanks in advance Harvey This e-mail has been scanned for all viruses by MessageLabs.

...True, but I'm not worried about that; method tables are easy to add once type substitutions are allowed. Dropping down to a mythical low-level language that I call template C, we would have: struct ComparableDict<T> { bool (*equals)(T a, T b); bool (*leq)(T a, T b); bool (*geq)(T a, T b); } T max<T>(ComparableDict<T>* dict, T a, T b) { if ((*dict->geq)(a,b)) return a; else return b; } This mechanism duplicates the dictionary-passing used in Haskell type classes. The correct dictionary for any given type is inferred by the high-level language, b...

Dear all, I have some trouble with special characters while building my R package. I tried to follow the usual LATEX format, but could not fix the problem: For instance, for "greater than or equal", I tried "\geq", but R says that this is an unknown macro. Could anyone direct me how to solve this issue? Best Ozgur ----- ************************************ Ozgur ASAR Research Assistant Middle East Technical University Department of Statistics 06531, Ankara Turkey Ph: 90-312-2105309 http://www.stat...

...e PDF output (Rcmd Rd2dvi.sh --pdf), however when the Rd file is converted to text or html this command is converted to "<=q". A workaround is to use \le instead of \leq which works with my LaTeX distribution (MiKTeX 2.3.?). Another way would be to change Rdconv.pm by adding \leq and \geq to the substitution lists in text2html, text2txt and the other similar functions. I don't know much about LaTeX so it may be that \leq has been phased out in favour of \le and the books and websites I read might be out of date. Cheers, Tim Keighley > version _ platform i386-pc-mi...

...a two-tailed binomial exact test in error or is it a feature? If it is a feature, could someone provide a reference for its two-tailed p-value computations? Using Blaker's (2000 - Canad. J. Statist 28: 783-798) approach,the p-value is the minimum of the two-tailed probabilities $P \left(Y\geq y_{obs}\right)$ and $P\left(Y\leq y_{obs}\right)$ plus an attainable probability in the other tail that is as close as possible to, but not greater than that one-tailed probability. Consider the following examples performed in R version 1.9 under windows 2000. > binom.test(110,500,.2)...

...about that; method tables are easy to add once type > substitutions are allowed. Dropping down to a mythical low-level language > that I call template C, we would have: > > struct ComparableDict<T> { > bool (*equals)(T a, T b); > bool (*leq)(T a, T b); > bool (*geq)(T a, T b); > } > > T max<T>(ComparableDict<T>* dict, T a, T b) { > if ((*dict->geq)(a,b)) return a; else return b; > } > What do the parametrized types give you that you don't get from using opaque instead of T? Type checking has already passed by the t...

...; statements. cmd/tests: Add tests for LEQ comparison operator in "if" statements. cmd/tests: Add tests for EQU comparison operator in "if" statements. cmd/tests: Add tests for NEQ comparison operator in "if" statements. cmd/tests: Add tests for GEQ comparison operator in "if" statements. cmd/tests: Add tests for GTR comparison operator in "if" statements. cmd/tests: Add tests for mixed number/stringified numbers comparisons in "if" statements. cmd: Correctly set the 'raw' parameter in ca...

...p;rr~s;a zys7wWju&1~iV8_C9mL-_p$JeZ@&tRp7Potl!e!E8z!}jp@=k^~`Etr1EEzDZUKzW0 z*Rxi4BIo08ZO3K3b#F2#o}|TVs8X%<i=5AP`g_YHg=>r|XLbT at J0ZA>fahD1^)<CA zyN-$Fi21H%Nf+J>GUS2{fcZ1l5(wIEqP3mGoDKT)r}-$&>`F3Vd5^hvtOV#QNS^cD zwdu)NsZ`Eh at 1BvV4`%KJMd!dN==}sh?c?(b6TQ2O)p;mU+(|c40yJGeQ&4PP!23Zf zYp|TAY`JBBsRt;$3%ENRqqc2Tr5%kw2eI=&Q@*+adMs=?^wd59h`OiMPW+VJeA762 zoV4$D72)7SzX+^Q0QuJ3D46gmQAI1|Wtb%LY?>7YvP=Mij{>cTF)9d^0cVCb9tx5u z1G6>-_-BCmagDxD)rs^P at j#83_)XK$+D at n>EfT(zlC{vU0K`J28U519>5aBgc_cn2 z8X>yGn>F#_>y40?`Ks5|X8^>e1uzf~sLEwt&Q&Y...