search for: structabl

Displaying 14 results from an estimated 14 matches for "structabl".

Did you mean: structable
2005 Nov 28
2
str and structable error
Hallo I encountered a behaviour which puzzles me (but finally I did get what I wanted). I used structable and strucplot but I wanted to change names of variables in structable object. I tried to subset it, use names but to no avail. So I tried str and expected to get a structure of an object but: > sss<-structable(Titanic) > str(sss) Error in "[.structable"(x, args[[1]], ) : sub...
2014 Jan 10
0
proposal: stats::as.matrix.ftable method
...Male_F 22 351 Female_A 89 19 Female_B 17 8 Female_C 202 391 Female_D 131 244 Female_E 94 299 Female_F 24 317 > Related functions: The vcd package defines a more extensive suite of similar structable functions, including as.matrix.structable; however that function doesn't supply appropriate dimnames for the dimensions. Given as.matrix.ftable(), that is easy to correct: # use as.matrix.ftable, but # need to remove other attributes: dnames, split_vertical library(vcd) as.matrix.structabl...
2007 May 05
1
How to latex tables?
Suppose I have a table constructed from structable or simply just an object of class table. How can I convert it to a latex object? I looked in RSiteSearch, but only found info about matrices or data frames. Steve For example, here is a table t2 > str(t2) table [1:2, 1:2, 1:2] 6 8 594 592 57 ... - attr(*, "dimnames")=L...
2010 Dec 02
1
latex tables for 3+ dimensional tables/arrays
I'm looking for an R method to produce latex versions of tables for table/array objects of 3 or more dimensions, which, of necessity is flattened to a 2D display, for example with ftable(), or vcd::structable, as shown below. I'd be happy to settle for a flexible solution for the 3D case. > UCB <- aperm(UCBAdmissions, c(2, 1, 3)) > ftable(UCB) Dept A B C D E F Gender Admit Male Admitted 512 353 120 138 53 22 Rejected 313 207 205 279 138...
2009 May 21
1
vcd package --- change layout of plot
...plot Cities = PX ## panel argument is an attempt to modify an example in the vcd help file popViewport() ## create the graphic Error: Cannot pop the top-level viewport (grid and graphics output mixed?) # no point in gong on to code the plot for layout.pos.row = 2 > str(Pack.tab) Error in `[.structable`(x, i, args[[2]]) : subscript out of bounds > class(Pack.tab) [1] "structable" "ftable" > dim(Pack.tab) [1] 7 2 7 Cities PX SF Rank Feature 1 Flexible 2 0 Integrate.Probes 1 2 Large/he...
2005 Oct 20
0
vcd package 0.9-5 released
...sity plots * New function cotabplot() for visualizing conditional independence in a trellis-like layout, providing panel functions for association, mosaic, and sieve plots * Sieve plots are now integrated in the strucplot framework, sieve() replaces sieveplot() * Extended support for 'structable' objects (textual representation of mosaic plots): - structable objects can be used as input for mosaic(), sieve(), and assoc() - extract ("[") and replacement ("[<-") functions are available (old "[[" method removed) - methods for t(), dim(),...
2005 Oct 20
0
vcd package 0.9-5 released
...sity plots * New function cotabplot() for visualizing conditional independence in a trellis-like layout, providing panel functions for association, mosaic, and sieve plots * Sieve plots are now integrated in the strucplot framework, sieve() replaces sieveplot() * Extended support for 'structable' objects (textual representation of mosaic plots): - structable objects can be used as input for mosaic(), sieve(), and assoc() - extract ("[") and replacement ("[<-") functions are available (old "[[" method removed) - methods for t(), dim(),...
2012 Jun 20
2
array complexity for the MH test
If we take the matel-haenszel test on these data of five 2x2 tables stratified along Penicillin.Levels array(c(0, 0, 6, 5, 3, 0, 3, 6, 6, 2, 0, 4, 5, 6, 1, 0, 2, 5, 0, 0), dim = c(2, 2, 5), dimnames = list( Delay = c("None", "1.5h"), Response = c("Cured", "Died"), Penicillin.Level =
2007 Nov 30
1
Help with tables
...o a variable called "sick" and cross tabulating it vs. QCL_1 (my cluster variable) and it gave me the table I need in this way (showed at the bottom of this mail): How can I made a table like this in R???. I've tried combining my variables in a matrix and using xtabs, ftable, table, structable and a lot of combination of them but I haven't had succed with any of them. Please help me with this issue, I don't want to keep using SPSS any more. Thanx in advance. P.D. Result from SPSS is shown below. * * * C R O S S T A B U L A T I O N * * * $SICK (group)...
2007 Feb 28
4
PROC TABULATE with R
Un texte encapsul? et encod? dans un jeu de caract?res inconnu a ?t? nettoy?... Nom : non disponible Url : https://stat.ethz.ch/pipermail/r-help/attachments/20070228/6ebce030/attachment.pl
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
...is.null(expected) || > !is.null(gp) > if (!is.null(shade) && !shade) zero_shade = FALSE > > if (is.logical(main) && main) > main <- deparse(substitute(x)) > else if (is.logical(sub) && sub) > sub <- deparse(substitute(x)) > > if (is.structable(x)) { > if (is.null(direction) && is.null(split_vertical)) > split_vertical <- attr(x, "split_vertical") > x <- as.table(x) > } > if (is.null(split_vertical)) > split_vertical <- FALSE > > dl <- length(dim(x)) > > ## spl...
2013 Jul 04
0
Modificar una función de un paquete
...is.null(shade) && shade || !is.null(expected) || !is.null(gp) if (!is.null(shade) && !shade) zero_shade = FALSE if (is.logical(main) && main) main <- deparse(substitute(x)) else if (is.logical(sub) && sub) sub <- deparse(substitute(x)) if (is.structable(x)) { if (is.null(direction) && is.null(split_vertical)) split_vertical <- attr(x, "split_vertical") x <- as.table(x) } if (is.null(split_vertical)) split_vertical <- FALSE dl <- length(dim(x)) ## splitting argument if (!is.null(direction...
2013 Jul 06
0
Modificar una función de un paquete
...gt; > if (!is.null(shade) && !shade) zero_shade = FALSE > > > > if (is.logical(main) && main) > > main <- deparse(substitute(x)) > > else if (is.logical(sub) && sub) > > sub <- deparse(substitute(x)) > > > > if (is.structable(x)) { > > if (is.null(direction) && is.null(split_vertical)) > > split_vertical <- attr(x, "split_vertical") > > x <- as.table(x) > > } > > if (is.null(split_vertical)) > > split_vertical <- FALSE > > > > d...