search for: mybar

Displaying 7 results from an estimated 7 matches for "mybar".

Did you mean: ybar
2011 Jul 23
1
call a function with explicitly not setting an argument
...fun2, serializes all arguments and is out of my control. myfun <- function(...){ return(myfun2(...)); } now, the value for arguments of myfun are stored in variables. Say I want to call it with arguments 'foo' and 'bar', which are stored in variables 'myfoo' and 'mybar'. So in my script I call myfun(foo=myfoo, bar=mybar); However, I also want to be able to call myfun2 without any arguments. Is there any value that I can assign to myfoo and mybar, so that myfun(foo=myfoo, bar=mybar); is identical to myfun(); -- View this message in context: http://r.789...
2011 Oct 16
2
right justify right-axis tick values in lattice
...to a fixed width font (courier for example), but I haven't figured out the incantation to make that work in graphics. here is my example: panel.right <- function(x, y, ...) { panel.barchart(x, y, ...) print(x);print(y) panel.axis(side="right", at=pretty(y), outside=TRUE) } mybar <- function(...) { args <- list(...) args$par.settings=list(clip=list(panel="off")) args$par.settings$layout.widths$axis.key.padding <- 4 do.call("barchart", args) } mybar(c(1,10,100,10,1) ~ "abcd", panel=panel.right, ylab.right="right") th...
2023 Nov 18
1
combine barchart and xyplot in lattice
...3) * 10000), round(dnorm(6:20, 17, 4) * 10000)), direction = rep(c("inbound", "outbound"), c(15, 15))) vehicles <- data.frame(hour = 6:20, count = c(100, 120, 140, 125, 105, 80, 70, 75, 80, 100, 110, 120, 115, 110, 100)) library(lattice) library(latticeExtra) # This works mybars <- barchart(traffic ~ as.factor(hour), groups = direction, stack = TRUE, horizontal = FALSE, data = mydf, auto.key = list(columns = 2, space = "bottom"), xlab = "hour") mylines <- xyplot(count ~ as.factor(hour), type = "l", lwd = 2, col = 2, data = vehicles) m...
2023 Nov 18
1
combine barchart and xyplot in lattice
...t; direction = rep(c("inbound", "outbound"), c(15, 15))) > > vehicles <- data.frame(hour = 6:20, > count = c(100, 120, 140, 125, 105, 80, 70, 75, 80, 100, 110, 120, 115, > 110, 100)) > > library(lattice) > library(latticeExtra) > > # This works > mybars <- barchart(traffic ~ as.factor(hour), groups = direction, > stack = TRUE, horizontal = FALSE, data = mydf, > auto.key = list(columns = 2, space = "bottom"), xlab = "hour") > > mylines <- xyplot(count ~ as.factor(hour), type = "l", lwd = 2, > col...
2007 Jul 02
3
0.23.0 puppet dependancy issue
Hello, I use some define in classes like class foo { define bar() {} } before in .22.4 i had require => Bar[''mybar''] on object and it worked. Now i have : err: Could not apply complete configuration: Could not retrieve dependency ''Shorewall-realize[shorewall.conf]'' at /etc/puppet/manifests/classes/shorewall.pp: for exemple. Do anyone knwo why it fails now as i do not see what in...
2009 Mar 11
0
Working up examples of barplots with customized marginal items
...has to be executed again each time a device is created. That applies to ### the most recently created device. p <- barplot(xmatr, beside=T, names=c("Men","Women"), col=gc) text(bp-0.25, 2, valueNames, srt=90, pos=4) ### If that looks OK, then do this postscript(file="mybar-1.eps",height=6, width=6, onefile=F, horizontal=F, paper="special",family="Times") p <- barplot(xmatr, beside=T, names=c("Men","Women"), col=gc) text(bp-0.25, 2, valueNames, srt=90, pos=4) dev.off() ### note that the par settings have shifted back t...
2012 Oct 02
3
PROBLEM : Cannot require an Exec
hello: i currently am using Puppet to run some commands in a sequence. there are two sequences of exec resources. we found that we cannot use require => Exec and it does not work at all as expected. here is some sample code. exec { "exec-AAA": command => "/bin/true", returns => 0, notify => Exec["exec-BBB"], } exec { "exec-BBB":