Displaying 4 results from an estimated 4 matches for "cotab".
Did you mean:
colab
2013 Jul 04
2
Modificar una función de un paquete
Estimados miembros de la lista.
Estoy trabajando con la función mosaic del paquete vcd. Cómo puedo hacer
para ver el contenido fe la función y modificar algunos de sus argumentos?
Muchas gracias,
Manuel
--
*Manuel Spínola, Ph.D.*
Instituto Internacional en Conservación y Manejo de Vida Silvestre
Universidad Nacional
Apartado 1350-3000
Heredia
COSTA RICA
mspinola@una.ac.cr
2013 Jul 04
1
Modificar una función de un paquete
...ot;) {
> ## dn <- dimnames(observed)
> ## dnn <- names(dn)
> ## dx <- dim(observed)
> ## dl <- length(dx)
>
> ## ## split workhorse
> ## zerostack <- character(0)
> ## split <- function(x, i, name, row, col, zero) {
> ## cotab <- co_table(x, 1)
> ## margin <- sapply(cotab, sum)
> ## v <- split_vertical[i]
> ## d <- dx[i]
>
> ## ## compute total cols/rows and build split layout
> ## dist <- unit.c(unit(margin, "null"), spacing[[i]])
> ## idx...
2013 Jul 04
0
Modificar una función de un paquete
...ing, gp,
split_vertical, prefix = "") {
## dn <- dimnames(observed)
## dnn <- names(dn)
## dx <- dim(observed)
## dl <- length(dx)
## ## split workhorse
## zerostack <- character(0)
## split <- function(x, i, name, row, col, zero) {
## cotab <- co_table(x, 1)
## margin <- sapply(cotab, sum)
## v <- split_vertical[i]
## d <- dx[i]
## ## compute total cols/rows and build split layout
## dist <- unit.c(unit(margin, "null"), spacing[[i]])
## idx <- matrix(1:(2 * d), nrow = 2,...
2013 Jul 06
0
Modificar una función de un paquete
...mes(observed)
> > ## dnn <- names(dn)
> > ## dx <- dim(observed)
> > ## dl <- length(dx)
> >
> > ## ## split workhorse
> > ## zerostack <- character(0)
> > ## split <- function(x, i, name, row, col, zero) {
> > ## cotab <- co_table(x, 1)
> > ## margin <- sapply(cotab, sum)
> > ## v <- split_vertical[i]
> > ## d <- dx[i]
> >
> > ## ## compute total cols/rows and build split layout
> > ## dist <- unit.c(unit(margin, "null"), spacin...