search for: outer

...a layout with exactly two rows and columns the base value of ?"cex"? is reduced by a factor of 0.83: if there are three or more of either rows or columns, the reduction factor is 0.66). I generate a multipage PDF in which mfrow varies such that cex is impacted. This affect mtext in the outer margin. Sample code is pasted at the bottom of this email. The impact is most obvious if one examines the text at the bottom of each page as one moves page-to-page. Does anyone have a suggestion for how to overcome this (other than using brute force). Dennis Dennis Fisher MD P < (The "...

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 <- outer(xg, yg, function(x,y) 1.0) Error in outer(xg, yg, function(x, y) 1) : dims [product 16] do not match the l...

Dear R users, can someone help with these short puzzles? 1) Is there a function like outer() that evaluates a three-argument function on a threedimensional grid - or else how to define such a function, say, outer.3()? E.g., calculate (x/y)^z on (x,y,z) element of {1,2,3}x{3,4}x{4,5} and return the results in a 3-dimensional array. I would naively use outer() on two of the arguments withi...

> Or is this a bad idea? I don't like the proposal. I have seen code like the following (in fact, I have written such code, where I had forgotten a function was not vectorized) where the error would have been discovered much later if outer() didn't catch it. > outer(1:3, 11:13, sum) Error in outer(1:3, 11:13, sum) : dims [product 9] do not match the length of object [1] Bill Dunlap TIBCO Software wdunlap tibco.com On Mon, Mar 20, 2017 at 6:36 AM, Martin Maechler <maechler at stat.math.ethz.ch> wrote: >>...

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...

>>>>> 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 <- outer(xg, yg, function(x,y) 1.0) > Error in outer(xg, yg, function(x, y) 1)...

Greetings R-help community, I am relatively new to R, which may be why I am having trouble understanding this problem. I am trying to use outer() to generate a graphable surface of a function. If there is a better way to do this, I would appreciate the insight. Otherwise, could someone suggest a method to get the outer() function to work here? Below is my simplified R program. Further down is the output. Thanks in advance, Kyle #####...

Proposal for Outer Loop Vectorization Implementation Plan ============================================= ===== Goal: ===== Extending Loop Vectorizer (LV) such that it can handle outer loops, via VPlan infrastructure enhancements. Understand the trade-offs in trying to make concurrent progress with moving remaining in...

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|...

Dear all, I have something about function outer() that I can't understand. Just see the following example. The two NaNs are due to 0/0, but I can't figure out the cause of the last two errors. I wonder if some one can explain this for me. ___________________________________________________________________ > sx=rbinom(10,1,0.5);ot=rbi...

I was looking at the ClassTemplatePartialSpecializationDecl::getInstantiatedFromMember documentation, in the included example it says: "(..) the instantiation of Outer<float>::Inner<int*> will end up instantiating the partial specialization Outer<float>::Inner<U*> (...)". To understand the concept better, I dumped the AST for the following code: template<typename T> struct Outer { template<typename U> struct Inner {flo...

>Another might be to introduce changes under feature flags to ease the revert/reintroduce/revert cycle. This is essentially the first guard. We plan to have flags/settings to control which types of outer loops are handled. The new code path is initially exclusive to outer loop vectorization. If we disable all types of outer loops (and that's the initial default), LV continues to be good old innermost loop vectorizer. >I'd like to hear what plan is in place to ensure we don't destabi...

...ing function gam from package mgcv to fit splines. ?When I try to make a prediction slightly beyond the original 'x' range, I get this error: > A = runif(50,1,149) > B = sqrt(A) + rnorm(50) > range(A) [1] 3.289136 145.342961 > > > fit1 = gam(B ~ s(A, bs="ps"), outer.ok=TRUE) > predict(fit1, newdata=data.frame(A=149.9), outer.ok=TRUE) Error in splineDesign(knots, x, ord, derivs, outer.ok = outer.ok) : the 'x' data must be in the range 3.14708 to 145.485 unless you set 'outer.ok = TRUE' > I've inserted the argument 'outer.ok=TRUE...

Dear r-plus users, i would like to use outer in the following case outer(x,y,FUN="fun") i suppose that my function fun is of the following form: fun<-function(x,y) { if(y>x) return(x+y) if(y<=x) return(0) } My problem is that the command outer(x,y,FUN="fun") return me a null matrix instead of an upper triangular...

I'm having an issue where a certain set of types and insert/extractvalue are producing the incorrect values. It appears as though extractvalue getting my sub-structure is not getting the correct data. I have these types: %outer = type { i32, %inner, i1 } %inner = type { double, i32 } The trouble is that when I have a value of type %outer then proceed to extract the components of the contained %inner structure I get corrupt values. If I don't have the "i1" type in there everything works fine, leading me to t...

...w regressions are landing as well. Philip On 12/14/2017 01:49 PM, Saito, Hideki wrote: >> Another might be to introduce changes under feature flags to ease the revert/reintroduce/revert cycle. > This is essentially the first guard. We plan to have flags/settings to control which types of outer loops are handled. > The new code path is initially exclusive to outer loop vectorization. If we disable all types of outer loops > (and that's the initial default), LV continues to be good old innermost loop vectorizer. > >> I'd like to hear what plan is in place to ensure w...

...-3.1 converts this into: --after Reassociate expressions: %add = add i32 %next.0, 1 %add1 = add i32 %add, %total.0 -- after Canonicalize natural loops: %add = add i32 %next.0.ph, 1 %add1 = add i32 %add, %total.0 -- and during 'loop invariant code motion': LICM hoisting to while.cond.outer: %add = add i32 %next.0.ph, 1 - LLVM-3.2 converts it into: (Notice the reversion of %total.0 and %next.0) --after Reassociate expressions: %add = add i32 %total.0, 1 %add1 = add i32 %add, %next.0 -- after Canonicalize natural loops: %add = add i32 %total.0, 1 %add1 = add i32 %add, %next...

...; "Autoloads" "package:base" The Problem: I'm using a function which is constructing a subset of a dataframe. This dataframe is used in another function. The structure is like this: > inner = function (){ + print('inner:') + print(s) + } > outer = function(){ + t = data.frame(list(X=1:10, Y=LETTERS[1:10])) + s = t[t[,'X'] < 5, ] + print('outer:') + print(t[, 'Y']) + inner() + } > outer() And the response in the R-Console is: [1] "outer:" [1] A B C D E F G H I J Levels: A B C D E F G H I J [1] &quo...

Depending on the setting of par()$usr, the 'at' setting in mtext(.., adj=0, outer=T) may cause the text to appear in an anomalous position (e. g. in the first instance below, at the left of the plot region rather than at 'at=0' in the figure region), or the text may not appear at all. If one does not set the 'at' parameter the text appears (with 'adj=0')...

...gthy message, but I don't know what I made wrong in my real example since the simple code works. I have two variables a, b and a function f for which I would like to calculate all possible combinations of the values of a and b. If f is multiplication, I would simply do: a <- 1:5 b <- 1:5 outer(a,b) ## A bit more complicated is this: f <- function(a,b,d) { return(a*b+(sum(d))) } additional <- runif(100) outer(X=a, Y=b, FUN=f, d=additional) ## So far so good. But now my real example. I would like to plot the ## log-likelihood surface for two parameters alpha and beta of ## a Gomp...