Displaying 5 results from an estimated 5 matches for "xorig".
Did you mean:
orig
2017 Dec 08
2
Curiously short cycles in iterated permutations with the same seed
I have noticed that when I iterate permutations of short vectors with the same seed, the cycle lengths are much shorter than I would expect by chance. For example:
X <- 1:10
Xorig <- X
start <- 112358
N <- 10
for (i in 1:N) {
seed <- start + i
for (j in 1:1000) { # Maximum cycle length to consider
set.seed(seed) # Re-seed RNG to same initial state
X <- sample(X) # Permute X and iterate
if (all(X == Xorig)) {
cat(sprintf("Seed:...
2017 Dec 08
0
Curiously short cycles in iterated permutations with the same seed
...c
On Fri, Dec 8, 2017 at 6:39 AM, Boris Steipe <boris.steipe at utoronto.ca>
wrote:
> I have noticed that when I iterate permutations of short vectors with the
> same seed, the cycle lengths are much shorter than I would expect by
> chance. For example:
>
> X <- 1:10
> Xorig <- X
> start <- 112358
> N <- 10
>
> for (i in 1:N) {
> seed <- start + i
> for (j in 1:1000) { # Maximum cycle length to consider
> set.seed(seed) # Re-seed RNG to same initial state
> X <- sample(X) # Permute X and iterate
> if (all(...
2014 Sep 08
3
problema con los cambios de marcas temporales en el eje X
...a))
xlabels <- paste(datIn$mes,"-",datIn$anio,sep="")
par(oma=c(4,2,1,1))
plot(datIn$xbar, axes=F, type="b", pch=19, ylim=c(400,650), xlab="", ylab="xbar")
axis(1,at=1:length(datIn$xbar), labels=xlabels,cex.lab=0.5, las=2)
axis(2)
box()
datIn$xorig <- 1:dim(datIn)[1]
arrows(
x0=datIn$xorig, y0=datIn$lci
,x1=datIn$xorig, y1=datIn$lcs,
,angle=90, code=3, length=0.1
)
mtext("Fechas", side=1, line=1, outer=T)
#---------------------------
<Rplot.png>
Saludos,
Carlos Ortega
www.qualityexc...
2014 Sep 08
2
problema con los cambios de marcas temporales en el eje X
Muchas gracias Carlos, previo a mi correo, entre las pruebas que hice estaba una parecida a la que apuntas de la siguiente manera:
attach (Libro1)
plot (xbar~as.Date(fechas,"%d/%m/%y"), ylim=c(400,660), xaxt="n", type="b", pch=19,cex=1)
xlabels<-strptime(fecha,format="%d/%m/%Y")
axis.Date (1,at=xlabels,format="%b-%y")
2010 May 13
1
cdplot() with 'POSIXct' x
Hi,
Given that cdplot() is used to produce the conditional density of a
categorical y along a numerical x, it seems natural that it could be
used with a date or time x (such as 'POSIXct'). Is this desirable? If
so, I've created a patch that would allow this, by coercing the POSIXct
x variable to produce the density, but use the original POSIXct x to
draw the x axis.
Index: