search for: eqn

Full_Name: Ross Boylan Version: 2.2.0 OS: Linux Submission from: (NULL) (65.175.48.58) \eqn{{\bf\beta}_j}{b(j)} in my .Rd file produces this error -------------------------------------------- ! Missing $ inserted. <inserted text> $ l.7 \eqn{{\bf\beta}_j}{\bf\beta}_ jnormal-bracket5bracket-normal{b(j)} -- ! Missing $ inserted. <ins...

I'm seeing various things fail when I try to next braces inside \eqn. This source \eqn{{\bf\beta}_j}{b(j)} is the vector produces this error ---------------------------------------------- [4] ! Missing $ inserted. <inserted text> $ l.258 \eqn{{\bf\beta}_j}{\bf\beta}_ j{{b(j)} is the vector of coefficients f...

...probability of 1. } \usage{ quantile(x, \dots) \method{quantile}{default}(x, probs = seq(0, 1, 0.25), na.rm = FALSE, names = TRUE, type = 8, ...) } \arguments{ \item{x}{numeric vector whose sample quantiles are wanted.} \item{probs}{numeric vector of probabilities with values in \eqn{[0,1]}{[0,1]}.} \item{na.rm}{logical; if \code{TRUE} any \code{NA} or \code{NaN} is removed from \code{x} before the quantiles are computed. If \code{FALSE} the presence of \code{NA} or \code{NaN} in \code{x} aborts the function.} \item{names}{logical; if \code{TRUE...

...HTML-CSS"],\n', < 'tex2jax: {inlineMath: [["$","$"]]}\n', < '});\n', < '</script>\n') --- > and the modified R-2.12.1/src/library/base/man/svd.Rd: for demonstration: 47,51c47,50 < \deqn{ \mathbf{X} = \mathbf{U D V}^\top,} where \eqn{\mathbf{U}} and \eqn{\mathbf{V}} are < orthogonal, \eqn{\mathbf{V}^\top} means \emph{V transposed}, and < \eqn{\mathbf{D}} is a diagonal matrix with the singular < values \eqn{D_{ii}}{D[i,i]}. Equivalently, \eqn{\mathbf{D} = < \mat...

...ow=6,ncol=6) restrictmat<-diag(6) colnames(tempmat)<-c("AUD.l1","CHF.l1","CAD.l1","GBP.l1","EUR.l1","JPY.l 1") rownames(tempmat)<-c("AUD","CHF","CAD","GBP","EUR","JPY") eqn<-list() for ( i in 1:6 ) { datares <- tempmat[, which(restrictmat[i, ] == 1),drop=FALSE] eqn[[i]]<-paste(rownames(tempmat)[i]," ~","-1","+",colnames(datares)) print(eqn[[i]]) } The only problem now is that I don't know how to name them so that I can d...

...+ s1 * p + s2 * f + s3 * a ##system2 <- list( demand2, supply2 ) ##labels <- list( "Demand", "Supply" ) ##inst <- ~ d + f + a ##sv2 <- c(d0=3,s2=2.123,d2=4,s0=-2.123,s3=4.234,d1=4.234,s1=0.234) sv2 <- c(s0=-2.123,s1=0.234,s2=2.123,s3=4.234) obj <- function( s, eqn, data, parmnames ) { ## get the values of the parameters for( i in 1:length( parmnames ) ) { name <- names( parmnames )[i] val <- s[i] storage.mode( val ) <- "double" assign( name, val ) } lhs <- as.matrix( eval( as.formula( eqn )[[2]] )...

I have been working with the pls procedure and have problems getting the procedure to work with matrix or frame data. I suspect the problem lies in my understanding of frames, but can't find anything in the documentation that will help. Here is what I have done: I read in an 10000 x 8 table of data, and assign the first four columns to matrix A and the second four to matrix B pls <-

I should'nt have sent the last mail so fast. Same problem with \eqn{u_j = a_j + b x + c x^2, \quad j=1, \ldots, r-1} {u[j] = a[j] + b*x + c*x^2 j = 1,\dots,r-1} I thought the problem in the first case could have to do with the use use of \mbox{} (with the braces) within the arguments of \eqn, but here there are none braces in the arguments of \eqn{}{}....

I've been trying to figure out how to build a list of terms from a nonlinear model (terms() returns a error). I need to compute and evaluate the partial derivatives (Jacobian) for each equaiton in a set of equations. For example: > eqn <- q ~ s0 + s1 * p + s2 * f + s3 * a > sv2 <- c(d0=3,d1=4.234,d2=4,s0=-2.123,s1=0.234,s2=2.123,s3=4.234) > names( sv2 ) [1] "d0" "d2" "d1" "s0" "s2" "s3" "s1" ...after some processing.... > sv2 d0 d...

...code of linear.hypothesis. When I type "linear.hypothesis" I get: function (model, ...) UseMethod("linear.hypothesis") <environment: namespace:car> but when I type "ftest.systemfit", I do see the actual code. Why? Anyway, here are the results in more detail: eqns<-list(eq = y ~ trend+ x1 + x[,1] + x[,2] + x[,3] + x[,4] + x[,5] + x[,6] + x[,7] + x[,8] + x[,9] + x[,10] + x[,11] + x[,12] + x[,13] Rrestr10<-matrix(0,10,16);Rrestr10[1,16]=Rrestr10[2,15]=Rrestr10[3,14]=Rrestr10[4,13]=Rrestr10[5,12]=Rrestr10[6,11]=Rrestr10[7,10]=Rrestr10[8,9]=Rrestr10[9,8]...

I've been trying to figure out how to get the names of the parameter vector variables when inside the function that nlm calls to return the objective function value: knls <- function( theta, eqns, data, fitmethod="OLS", instr=NULL, S=NULL ) { ## print( names( theta ) ) # returns NULL ## get the values of the parameters for( i in 1:length( theta ) ) { val <- theta[i] storage.mode( val ) <- "double" assi...

...ing folks: I'm trying to finish off a package for non-linear simultaneous system estimation and I've been trying to figure out how to get the names of the parameter vector variables when inside the function that nlm calls to return the objective function value: knls <- function( theta, eqns, data, fitmethod="OLS", instr=NULL, S=NULL ) { ## print( names( theta ) ) # returns NULL ## get the values of the parameters for( i in 1:length( theta ) ) { val <- theta[i] storage.mode( val ) <- "double" assi...

Hi all, Don't know if this is a known issue, but I couldn't find anything so I report anyway. When checking eg ?qr in both RStudio and the naked R IDE, the help page is rendered incorrectly. More specifically, any use of \bold{...} is printed as is, rather than interpreted as bold. Same happens on ?svd. According to the manual Writing R Extensions, this should still be recognized. When I

...qr.Q} \alias{qr.R} \arguments{ \item{qr}{object representing a QR decomposition. This will typically have come from a previous call to \code{\link{qr}} or \code{\link{lsfit}}.} \item{complete}{logical expression of length 1. Indicates whether an arbitrary orthogonal completion of the \eqn{\bold{Q}} or \eqn{\bold{X}} matrices is to be made, or whether the \eqn{\bold{R}} matrix is to be completed by binding zero-value rows beneath the square upper triangle.} \item{ncol}{integer in the range \code{1:nrow(qr$qr)}. The number of columns to be in the reconstructed \eqn{\bol...

...with OLS using 'lm', with 2SLS using 'systemfit' and it didn't accept those transformations like 'lm' does. Here's an example: this is, of course, OK: > data(kmenta) > demand <- q ~ p + d > instr <- ~ d + f > fit1 <- systemfit("2SLS", eqns=list(demand), inst=instr, data=kmenta) But, now if I'd like to estimate a model with logarithm of p as a regressor, an error occurs: > demand2 <- q ~ log(p) + d > fit2 <- systemfit("2SLS", eqns=list(demand2), inst=instr, data=kmenta) Error in log(p) : Object "p&qu...

...stat 'doc/manual/R-exts.texi.spot': No such file or directory --------------------------------------- There is indeed no doc/manual/R-exts.texi.spot file. This make instruction comes form this in R.spec: --------- %if 0%{?fedora} >= 19 # What a hack. # Current texinfo doesn't like @eqn. Use @math instead where stuff breaks. cp doc/manual/R-exts.texi doc/manual/R-exts.texi.spot cp doc/manual/R-intro.texi doc/manual/R-intro.texi.spot sed -i 's|@eqn|@math|g' doc/manual/R-exts.texi sed -i 's|@eqn|@math|g' doc/manual/R-intro.texi %endif # And now, undo the hack. :P %i...

...o \code{\link{optim}}'s \code{control} argument.} \item{rotate}{a list of additional arguments for the rotation function.} } } \item{\dots}{Components of \code{control} can also be supplied as named arguments to \code{factanal}.} } \details{ The factor analysis model is \deqn{x = \Lambda f + e}{ x = Lambda f + e} for a \eqn{p}--element row-vector \eqn{x}, a \eqn{p \times k}{p x k} matrix of \emph{loadings}, a \eqn{k}--element vector of \emph{scores} and a \eqn{p}--element vector of errors. None of the components other than \eqn{x} is observed, but the major res...

It seems that MASS suggest to judge on the basis of sum(residuals(mode,type="pearson"))/df.residual(mode). My question: Is there any rule of thumb of the cutpoiont value? The paper "On the Use of Corrections for Overdispersion" suggests overdispersion exists if the deviance is at least twice the number of degrees of freedom. Are there any further hints? Thanks. -- Ronggui

I'm trying to solve a system of 3 equations as part of a sub-routine in R, ie first eqn a/x-b*sqrtx+c=log(1/dx+1/e(sqrtx); snd eqn (f*y)/z-g/y-h=-log(2/x+(z/y)/(i*x) and third eqn is of the form zz=x/(j-k(z/y) where a..k inclusive are constants, x,y,z and zz are inputs. How can this be done in R? [[alternate HTML version deleted]]

...in Rd files outside \code and similar. So I was surprised to find that ca 80 CRAN packages have constructions like (from ISwR) \item{\code{folate}}{ a numeric vector, folate concentration ($\mu$g/l). } This does not render sensibly in non-latex conversions, and it is what we have \eqn{} for. That $ needs to be escaped is an implementation restriction that we hope to remove so that things like (package fields) greater than or equal to 2*m where m= length( grid$x). do not generate an error (although \code{}) markup would be appropriate and avoid the problem). It is not cle...