search for: 2,8

Hi, I want to put text on a plot containing something like: a = b^2 = <squared numeric value of b> using bquote. Example: mu = 5 plot(1:10,1:10) text(2,8, bquote(delta == mu^2)) # This works text(2.5,8, bquote(phantom(0) == .(mu^2))) # but is unpredictable text(2,8, bquote(delta == mu^2 == .(mu^2))) # This doesn't work The last t...

Hi everyone. I'm trying to break the y axis on a plot. For instance, I have 2 series (points and a loess). Since the loess is a "continuous" set of points, it passes in the break section. However, with gap.plot I cant plot the loess because of this (I got the message "some values of y will not be displayed"). Here's my code: library(plotrix); #ge...

Full_Name: Ben Saville Version: 2.1 OS: Windows XP Submission from: (NULL) (152.2.94.145) I'm using the gsummary function to calculate a sum of V1 (column one) from my data 'mytest' by group (V2,or column 2). If V1 (the variable of interest) is all the same value (in this case all 2's), I do not get back the corr...

Hi R People: Here is a simple set of commands: >x1 <- 1:10 >x2 <- sqrt(x1) >plot(x1) >points(x2,col="red",pch=3) >legend(2,8,legend=c("First","Second"),col=c("black","red"),pch=c(1,3)) > Fine. Now, I would like to put the legend box on the outside of the plot itself, perhaps in the lower left ha...

hi, ices with reencode make al lot of cpu work. the pid need more then 20% of it. its a 2,8 ghz cpu. is it normal ? thanks -- Mit freundlichen Gr?ssen Carsten Henkel mailto:carsten@chatlabel.de Wer nach einer hilfreichen Hand Ausschau halten will, findet sie am besten am Ende des eigenen Armes dieser Text ist zuf?llig gew?hlt und hat nic...

Is there any rational explanation for the bizarre seq() behavior below? > seq(2,8.1, lenght.out=3) [1] 2 3 4 5 6 7 8 > help(seq) > seq(2,8,length.out=3) [1] 2 5 8 > seq(2,8.1,length.out=3) [1] 2.00 5.05 8.10 Except maybe that it is early in the morning :) Best regards, Ryszard Ryszard Czerminski AstraZeneca Pharmaceuticals LP 35 Gatehouse Drive Waltham, MA 02451 US...

Hello all, I found a weird result of the GLM function that seems to be a bug. The code: a=c(rep(1,8),rep(2,8)) b=c(rep(0,8),rep(3,8)) cbind(a,b) model=glm(b~a, family=poisson) summary(model) generates a dataset with two groups. One group consists entirely of zeros, the other of 3's (as happened in a dataset I’m analyzing right now). Since they are count data, one should apply a poisson distr...

Dear R-mates, # Here's what I am trying to do. I have a dataset like this: id = c(rep(1,8), rep(2,8)) dur1 <- c( 17,18,19,18,24,19,24,24 ) est1 <- c( rep(1,5), rep(2,3) ) dur2 <- c(1,1,3,4,8,12,13,14) est2 <- rep(1,8) mydata = data.frame(id, estat=c(est1, est2), durat=c(dur1, dur2)) # I want to one have this: id = c(rep(1,8), rep(2,8)) dur...

Hola a todos, Estoy intentando resolver un problema de optimización con R con restricciones lineales, pero no consigo incluir dichas restricciones. Es decir, f<-function(w){ sd(...) # desviación típica de ciertos datos } optim(rep(1/2,8),fn = f,lower=0,upper=1,method='L-BFGS-B') # no se como incluir aquí las restricciones Las restricciones son: la suma de los w_i es 1 y todos los w_i son mayores o iguales que cero. Ya he mirado: constrOptim pero no consigo nada. Salu2, y muchas gracias. -- Víctor Nalda Castellet...

Dear all; This must have a rather simple answer but haven't been able to figure it out: I have a data frame with say 2 groups (group 1 & 2). I want to select from group 1 say "n" rows and calculate the mean; then select "m" rows from group 2 and calculate the mean as well. So far I've been using a for loop for doing it but when it comes to a large data set is rather inefficient. Any hint...

Need to buy fast computer for running R on. Today we use 2,8 MHz intel D cpu and the calculations takes around 15 days. Is it possible to get the same calculations down to minutes/hours by only changing the hardware? Should I go for an really fast dual 32 bit cpu and run R over linux or xp or go for an quad core / 64 bit cpu? Is it effective to run R on 64...

I have a data frame and I would like to reshape it to wide format while at the same time applying different aggregate functions to each column AND at times multiple aggregate functions:   test1 = data.frame(         id = c(rep('101',8),rep('102',8)),         phase  = rep(c('D','D','L','L'),4),         day = rep(c('1','1','1','1','2','2','2','2'),2),         col1 = c(rep(1,8),rep(2,8)),         col2 = c(runif(8,min=0,max=1),runif(8,min=0...

Hey folks, I'm new to the R Project so I'm facing a great problem. I've read a file into R: >myVal I V L F C M A G T W S Y P H Q D N E K R 1 4,5 4,2 3,8 2,8 2,5 1,9 1,8 -0,4 -0,7 -0,9 -0,8 -1,3 -1,6 -3,2 -3,5 -3,5 -3,5 -3,5 -3,9 -4,5 > mode(myVal) [1] list Now I want to multiplicate each of this values with this one: >data A C D E F G H I K L M N P Q R S T V W Y 28 8 11 14 17 34 7 26 15 26 10 9 12 8 11 21 19...

...ll),jitter(Better.adapt),colour=I(alpha(Second.adapt,1/5)),facets=~Pol,data=d1) but that does not give me what I want (There is no legend and I don't think anything corresponds to the seven values of Second.adapt). Minimal example: Goodall <- c(rep(1:3,5)) Better.adapt <- c(rep(1,7),rep(2,8)) Second.adapt <- c(rep(1:5,3)) d1 <- data.frame(Goodall=c(Goodall),Better.adapt=c(Better.adapt),Second.adapt=c(Second.adapt)) library(ggplot2) qplot(jitter(Goodall),jitter(Better.adapt),colour=Second.adapt,data=d1) # follwoing doesn't work: qplot(jitter(Goodall),jitter(Better.adapt),co...

Hello all, I want to stream multiple live programs. For that purpose the analog signal of radio program must be digitalized and encoded. I'm using RME HDSP 9652 (with 26 input channels) soundcard for capturing the sound. For encoding I'm using jackified version of ices (ices-kh) and JACK server to connect multiple ices processes to the soundcard. My operating system is Linux Mandrake 10.0 with kernel 2.6. The drivers for soundcard is ALSA 1.0.6. My Ha...

Hi! Since installation of R 0.90 there are problems with the size of text and numbers also in the x11-device (I reported about similar problems with the postscript device recently). For numbers and letters a different size is used: plot(1:10,1:10,type="n") text(2,8,"F5F5F5F5F5") text(2,7,"F5F5F5F5F5",cex=2) The same problem is also found in the postscript device. The difference is small but clearly visible. Thanks for fixing soon! Wolfgang Koller ---------------------------------------------------------- Wolfgang Koller, koller2@f...

# CASE 1 # The following plots a single cell or block for all three location 0,1,2. y <- rep(2,8) hist(y) # why is this a single block? hist(y,xlim=c(0,2)) # same thing hist(y,breaks=2) # same # CASE 2 # adding a different value, plots as expected y <- append(y,0) hist(y) # plots as expected In most cases of the data I have variance...

Hello all, Recently I bought a TDM02B digium card to conect to the PSTN. We pluged it on a Pentium IV 2,8 Ghz, Asus Motherboard, but when we try to start asterisk, the box hangs. Someone have the same card running with asterisk in a similar machine? Could you tell me your box hardware details? Thanks for your time, Ismael Gil.

Dear all, I would like something simple to do in R that I do not know how I should search for it. Let's say that I have a list of a<-c(1,2,3,4,5) b<-(6,7,8) and I want to get back all their possible cominations like 1,6 1,7 1,8 2,6 2,7 2,8 3,6 3,7 3,8 and so on. How I can do that? B.R Alex [[alternative HTML version deleted]]

I have a data frame and I would like to reshape it to wide format while at the same time applying different aggregate functions to each column AND at times multiple aggregate functions: test1 = data.frame( id = c(rep('101',8),rep('102',8)), phase = rep(c('D','D','L','L'),4), day = rep(c('1','1','1','1','2','2','2','2'),2), col1 = c(rep(1,8),rep(2,8)), col2 = c(runif(8,min=0,max=1),runif(8,min=0,max...