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