similar to: outer on matrices / arrays

Hello, Is there a way to generate EPS figures automatically out of a chunk of code? Basically, I would like to do something like Sweave does (I just find it a little cumbersome to create a .Rnw file and then keep track of the figure numbering). Thanks for your time. Ery Arias-Castro

Hello, This example seems strange to me: > if (2 > 3) print('Yes'); else print('No') Error: unexpected 'else' in " else" > {if (2 > 3) print('Yes'); else print('No')} Error: unexpected 'else' in "{if (2 > 3) print('Yes'); else" > { + if (2 > 3) print('no') + else print('yes') + }

Hello, I am not able to plot a circle of a given radius using symbols(). In the example below, the circle appears too large: plot(0, 0, xlim = c(-1, 1), ylim = c(-1, 1)) symbols(0, 0, circles = 1, inches = FALSE, add = TRUE) What's happening? Ery

In ubuntu 6,06 the R normally run, but latter to install the a vesion 6,10 plot this not appearing. computer with problem: /usr/share/X11/fonts$ ls misc Type1 X11R7 In computer OK: /usr/share/X11/fonts$ls 100dpi(*) 75dpi encodings fonts.cache-1 misc Type1 ----- Mensagem original ---- De: Peter Dalgaard <p.dalgaard@biostat.ku.dk> Para: Ricardo Arias Brito

Hi, I am trying to understand how the functions em() and me() from the mclust package work. I cannot make sense of what the algorithm returns. Here is a basic, simple example: ######################################### # two bivariate normals, centered at (-5,0) and (5,0), with Id covariance x1 = cbind(rep(-5, 100), rep(0, 100)) + matrix(rnorm(100*2), 100, 2) x2 = cbind(rep(5, 100),

Hi, I'm have a list of integer vectors and I want to perform an outer() like operation on the list. As an example, take the following list: mylist <- list(1:5,3:9,8:12) A simple example of the kind of thing I want to do is to find the sum of the shared numbers between each vector to give a result like: result <- array(c(15,12,0,12,42,17,0,17,50), dim=c(3,3)) Two for() loops is the

So that we can easily figure out whether or not we are running a debug build of Xen (e.g., via `xl dmesg''). Signed-off-by: Dario Faggioli <dario.faggioli@citrix.com> --- Changes from v1: * moved the #ifndef-ery around variable definition; * repositioned the "debug=%c" outside of the ''compiled-by'' section. diff --git a/xen/drivers/char/console.c

Hi all, I have an external application commanding asterisk by AMI and AsyncAGI. I also have a dialplan like this: ; AsyncAGI extensions exten => _8.,1,Noop(entering in AGI loop at 8 ${EXTEN}); exten => _8.,n,AGI(agi:async); exten => _8.,n,Hangup(); ; Meetme extensions exten => _1.,1,Noop(Conference ${EXTEN} ${CONTEXT}); exten =>

Dear all, I am facing a challenge when applying the outer product with a matrix by rows. What I have is a rather big matrix, which I would like to convert into a different matrix by doing something like outer(matrix_row, vector, function(x,y) x[1]+5*x[4]/y) In order to get there, I tried to get the matrix into a list using the mefa package, as subsetting the original data appears too

when a node tries to send a report it drops the following error: err: Reporting failed: undefined method `graph'' for #<Puppet::Transaction::Report:0xb7060948> on the server i have: reports = rrdgraph,store reportdir = /var/www/puppetreports rrddir = /var/www/html/rrd rrdinterval = $runinterval rrdgraph =

hello I want to make a boxplot with diferents rows and also include a column to sort into two groups to each of the other columns my  date set looks like this: 4        5        6        7        8        site 23    56        41      45    63         C 21    89        42      10   63        E 32    45        14      17    96        E 45    74        13      63    41        C    68    32   

Hello Timo, Timo Sirainen <tss at iki.fi> writes: > Thanks, looks like this was broken with Maildir and mbox formats. It > also caused expunges in some other situations to be lost. Fixed: > > https://github.com/dovecot/core/commit/950a6e61d6c2dac961ce031bdd8b2895bc32b827 Thanks a lot for the fix, testing it now! Is this patch suitable of being backported to 2.2.13? (Debian

Hi all Can anybody help me with this? I am trying to include in an automatic way the argument in arg.names in a barplot. I generate the labels I want to appear below the bars with a for loop, and they contain subscripts, so I need to use expression anch<-0.05 esp<-4 for (i in 1:dim(Ntot)[1]) { naux<-Ntot[i,] naux2<-naux[naux>0] nind<-which(naux>0)

Hi there, I'm trying to get some text in the outer margins of my plots and am having trouble - the margin text is overlapping my plots, even though the outer margin I'm trying to put it in is very big. I've simplified my problem down to this: ------------------------- X11(width=7.5,height=10) par(mfrow=c(6,1),oma=c(20,0,20,0), mar=c(0,3.1,1,2.1)) for (i in 1:6) {

>>>>> Gebhardt, Albrecht <Albrecht.Gebhardt at aau.at> >>>>> on Sun, 19 Mar 2017 09:14:56 +0000 writes: > Hi, > the function outer can not apply a constant function as in the last line of the following example: >> xg <- 1:4 >> yg <- 1:4 >> fxyg <- outer(xg, yg, function(x,y) x*y) >> fconstg

I'm using groupedData from nlme. I set up a groupedData data.frame with outer=~group1. When I try to plot with outer=TRUE, I get "subscript out of bounds." This happens most of the time. When it works, I get spaghetti-type plots for comparing groups. But I don't understand why it doesn't usually work. > longa.mod.1.gd <- groupedData(mod1.logit~time|

Hello, I'm trying to position a plot title "1 a)" in the top left corner of a graph; i've set outer=TRUE for it to be in the outer margin unfortunately this is cut off. Is there a way either to make it so that it is not cut off or increase the number of margins and then place it in margin below the outer? Heres what I have so far windows(width=7,height=7)

Hi: I am using R 1.7.0 on Windows. I am having trouble getting "outer" to work on one of my functions. Here is a simple example illustrating my problem: > b1 <- c(1.2,2.3) > b2 <- c(0.5,0.6) > x <- c(3e+01, 1e+02, 3e+02, 5e+02, 1e+03, 1e+04, 1e+05, 1e+06) > y <- c(2,4,2,5,2,3,1,1) > n <- c(5,8,3,6,2,3,1,1) > outer(b1,b2,FUN=bpllkd,x,y,n)

This message is in MIME format. The first part should be readable text, while the remaining parts are likely unreadable without MIME-aware tools. Send mail to mime@docserver.cac.washington.edu for more info. ---559023410-1804928587-922106403=:691 Content-Type: TEXT/PLAIN; charset=US-ASCII A couple of weeks ago I asked if anyone had generalised outer to include bound extents -- effectively

mtext(..., outer = TRUE) does not seem to center the text in the outer margins as it did previously. Reproduce with example(plot.profile.nls, package = "nls") On versions of the development sources before November 17 this produced main and subtitles that were centered horizontally on the page. After that the main title (from mtext("..", side = 3, outer = TRUE)) is centered