search for: sgn

Dear R users, I have the "any" function of R  any(ind.c, ind.r, ind.sgn) all are logical factors  it works fine when any of three is true but when they are combined it doesnt work. i tried this any(ind.c, ind.r, ind.sgn,((ind.c==TRUE) & (ind.r==TRUE)), ((ind.c==TRUE) & (ind.sgn==TRUE)),((ind.r==TRUE) & (ind.sgn==TRUE)),  ((ind.c==TRUE) & (ind.r==TRU...

...". This is in 1.3.1 on Solaris 2.6 (full description at bottom). [Apologies for making everyone read this 3 times; my bug.report() burped.] Peter Dalgaard <p.dalgaard@biostat.ku.dk> says the problem is in fround.c, which reads in part: pow10 = R_pow_di(10., dig) ... return sgn * (intx + R_rint(x * pow10) / pow10); and (says Peter), > the problem is most likely that pow10 (== 1/100) has no finite binary > representation. Patches are welcome... I'm not up to patching C code, but I will say that a workaround is: R> round(round(100000/3, -2)) - 33300 [1] 0 a...

Hello LLVM, A recent commit creates the isIntDivCheap() target query. http://reviews.llvm.org/D12082 The current approach has a couple shortcomings. First, when targets decide divide is cheap, the DAGCombiner ignores obvious power-of-2 optimizations. In the targets I know, shifts are cheaper than divides in both speed and size. The target cannot see the value in the isIntDivCheap() call, so

...nd) to 192.168.10.103 Jun 17 09:38:10 firewall in.tftpd[22668]: RRQ from 192.168.10.103 filename ITLFile.tlv Jun 17 09:38:10 firewall in.tftpd[22668]: sending NAK (1, File not found) to 192.168.10.103 Jun 17 09:38:11 firewall in.tftpd[22669]: RRQ from 192.168.10.103 filename SEP6C504DDAF067.cnf.xml.sgn Jun 17 09:38:11 firewall in.tftpd[22669]: sending NAK (1, File not found) to 192.168.10.103 Jun 17 09:38:11 firewall in.tftpd[22671]: RRQ from 192.168.10.103 filename XMLDefault.cnf.xml.sgn Jun 17 09:38:11 firewall in.tftpd[22671]: sending NAK (1, File not found) to 192.168.10.103 Jun 17 09:38:12 f...

...and congratulations on the release of 1.4.0! ---- begin C code for fround.c: ---- double fround(double x, double digits) { #define MAX_DIGITS DBL_MAX_10_EXP /* = 308 (IEEE); was till R 0.99: (DBL_DIG - 1) */ /* Note that large digits make sense for very small numbers */ double pow10, sgn, intx; int dig; #ifdef IEEE_754 if (ISNAN(x) || ISNAN(digits)) return x + digits; if(!R_FINITE(x)) return x; #endif if (digits > MAX_DIGITS) digits = MAX_DIGITS; dig = (int)floor(digits + 0.5); if(x < 0.) { sgn = -1.; x = -x; } else sgn = 1.; if (dig ==...

Dear R users, i want to put the results of a list to a for loop. i will give an example m1<-matrix(rep(1,15),ncol=5)   ind.sgn <- lapply(1:ncol(m1), combn, x = ncol(m1))  ind.sgn [[1]]      [,1] [,2] [,3] [,4] [,5] [1,]    1    2    3    4    5 [[2]]      [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [1,]    1    1    1    1    2    2    2    3    3     4 [2,]    2    3    4    5    3    4    5    4    5     5 [[...

...gt; > From what I remember, udiv by power of 2 already gets turned into a shift in instcombine; the tricky case is sdiv by power of 2, which takes significantly more than one instruction. The generic implementation is this: > > // Splat the sign bit into the register > SDValue SGN = > DAG.getNode(ISD::SRA, DL, VT, N0, > DAG.getConstant(VT.getScalarSizeInBits() - 1, DL, > getShiftAmountTy(N0.getValueType()))); > AddToWorklist(SGN.getNode()); > > // Add (N0 < 0) ? abs2 - 1 : 0; >...

...cutoff <- sqrt(npar * qf(1 - alphamax, npar, nobs - npar)) outmat <- array(0, c(nobs, npar)) out <- list() prof <- profiler(fitted) on.exit(prof$setDefault()) for (par in which) { pars <- prof$getFittedPars() prof$setDefault(varying = par) sgn <- -1 count <- 1 varying <- rep(TRUE, npar) varying[par] <- FALSE tau <- double(2 * maxpts) par.vals <- array(0, c(2 * maxpts, npar), list(NULL, names(pars))) tau[1] <- 0 par.vals[1, ] <- pars base...

...:35 PM, bilal ghayyad <bilmar_gh at yahoo.com> > wrote: > > Dear Warren; > > > > Please, keep all discussions to the list.? > There's no need to email me personally about this. > > > > <snip> > >? > > cmterm-7942_7962-sip.9-2-1.cop.sgn (which is written > that it is SIP IP Phone load) and > cmterm-7942_7962-sip.9-2-1.zip which is written that it is > SIP IP Phone firmware files only. So what is the difference > between them "the load and the firmware"? > > > > The .sgn file is basically just a z...

Hi I have the following formula (I hope it is clear - if no, I can try to do better the next time) h(x, a, b) = integral(0 to pi/2) ( ( integral(D/sin(alpha) to Inf) ( ( f(x, a, b) ) dx ) dalpha ) and I want to do an mle with it. I know how to use mle() and I also know about integrate(). My problem is to give the parameter values a and b to the

...ylab="gpp",pch=15,cex=0.8,xlim=c(0,50), ylim=c(0,40)) o1<-glm(gpp ~ temp, weight=NULL, family=gaussian) os1<-segmented(o1, seg.Z=~temp, psi=15, control=seg.control(n.boot=0, display=T, it.max=5)) plot(os1, add=TRUE, res=TRUE, se=FALSE, show.gap=TRUE, linkinv = FALSE, res.col=1, rev.sgn=FALSE, const=0) summary(os1) And the most surprising fact is that it works for some of my data, eg: temp gpp 5 5.08050857592085 10 9.50809597873546 15 21.0206415558052 20 21.5340216521042 25 22.8455243983385 30 17.6106786978697 but not for the others, that fit within similar range (in what cas...

The kernel side for rescan, which is needed if you want to enable qgroup tracking on a non-empty volume. The first patch splits btrfs_qgroup_account_ref into readable ans reusable units. The second patch adds the rescan implementation (refer to its commit message for a description of the algorithm). The third patch starts an automatic rescan when qgroups are enabled. It is only separated to

Hello, I have got the following problem: given is a large string sequence consisting of the four letters "A" "C" "G" and "T" (as before). Additionally, I have got a second string sequence of the same length giving a label for each character. The labels are "+" and "-". Now I would like to create an 8x8 matrix which contains the

This is a first draft of a subvolume quota implementation. It is possible to limit subvolumes and any group of subvolumes and also to track the amount of space that will get freed when deleting snapshots. The current version is functionally incomplete, with the main missing feature being the initial scan and rescan of an existing filesystem. I put some effort into writing an introduction into

Dear Group members! Since I have set up a Samba PDC-Server (openSUSE 11.2-64bit with default package Samba 3.4.3) approx. 8 months ago, I have encountered 3 or 4 times a severe crash of Samba. What happens is that all over a sudden Samba floods /var/log/messages and /var/log/warn with the following message (cropped out date/time/servername, etc.): smbd[19724]:

Does anyone have any ideas (or even experience) regarding a modified log transformation that would assign real finite values to zeros and negative numbers? I encounter this routinely in a couple of different situations: * Physical measurements that are often lognormally distributed except for values that are less than additive normal measurement error. I'd like to take

Hi ! I've been trying to improve NV50 shader generation a bit the last couple of weeks, so here is what I've produced. I don't know if it's usable for you or just a pile of horrible hacks, but at least it makes some mesa demos render more correcly, p.e. the teapot (aside from mip-mapping issues of the floor texture), arbfplight, and I think the gears also didn't appear as they

...yj)) } covariancexy <- covariancexy / n ## get variance of X and Y (SD) varXj <- (n * sumXjSquared-sumXj^2)/(n*(n - 1)) varYj <- (n * sumYjSquared-sumYj^2)/(n*(n - 1)) sdxij <- (sumXjSquared)-(sumXj^2/n) sdxik <- (sumYjSquared)-(sumYj^2/n) ## make beta 'sgn function to return sign with magnitude of 1 betacoeff <- sign(covariancexy) * ((varYj^0.5) / (varXj^0.5)) ## 'make intercept Intercept <- meanyj - meanxj * betacoeff ## Make R the pearson produce moment correlation coefficient if (varYj==0 | varXj==0){ corrCoeff <-...

I am trying to fit a very simple broken stick model using the package "segmented" but I have hit a roadblock. > str(data) 'data.frame': 18 obs. of 2 variables: $ Bin : num 0.25 0.75 1.25 1.75 2.25 2.75 3.25 3.75 4.25 4.75 ... $ LnFREQ: num 5.06 4.23 3.50 3.47 2.83 ... I fit the lm easily: > fit.lm<-lm(LnFREQ~Bin, data=id07) But I keep getting an error

...osting ("Samba crashes & floods logfiles: "smbd/notify_inotify.c:244(inotify_handler) - No data on inotify fd?!")? My smb.conf ======================================== (all default values and comments are cropped automatically by SWAT): [global] workgroup = SOMEGROUPNAME.SGN server string = max open files = 10000 add machine script = /usr/sbin/useradd -c SambaMachine -g sambamachines -G "" -d /dev/null/ -s /bin/false %u logon script = %G.bat logon path = \\%N\profiles\%U\%a logon drive = z: domain logons = Yes os level...