how about something like this: > x C1 C2 C3 R1 0 0 1 R2 1 0 0 R3 0 0 0 R4 0 1 0 > z <- stack(x) > z values ind 1 0 C1 2 1 C1 3 0 C1 4 0 C1 5 0 C2 6 0 C2 7 0 C2 8 1 C2 9 1 C3 10 0 C3 11 0 C3 12 0 C3 > z.1 <- cbind(z, row.names(x)) > z.1 values ind row.names(x) 1 0 C1 R1 2 1 C1 R2 3 0 C1 R3 4 0 C1 R4 5 0 C2 R1 6 0 C2 R2 7 0 C2 R3 8 1 C2 R4 9 1 C3 R1 10 0 C3 R2 11 0 C3 R3 12 0 C3 R4 > writeLines(paste(z.1$ind, z.1$row, z.1$values, sep=';')) C1;R1;0 C1;R2;1 C1;R3;0 C1;R4;0 C2;R1;0 C2;R2;0 C2;R3;0 C2;R4;1 C3;R1;1 C3;R2;0 C3;R3;0 C3;R4;0 >
On Thu, Jan 7, 2010 at 9:03 PM, sugimoto <iey...@sugimoto.at> wrote: > > Hi all, > > I have the following problem: > I have a data frame (actually it is a prop.table) which I want to print as > a > list, e.g.: > C1 C2 C3 > R1 0.0 0.0 1.0 > R2 1.0 0.0 0.0 > R3 0.0 0.0 0.0 > R4 0.0 1.0 0.0 > > should be printed like > C1;R1;0.0 > C2;R1;0.0 > C3;R1;1.0 > C1;R2;1.0 > C2;R2;0.0 > ..... > > Is there any existing solution out there or could somebody please give me a > hint on how to solve the problem? > > Many thanks in advance, > I. Sugimoto > -- > View this message in context: > http://n4.nabble.com/Print-data-frame-as-list-including-row-column-name-tp1009409p1009409.html > Sent from the R help mailing list archive at Nabble.com. > > ______________________________________________ > R-help@r-project.org mailing list > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide > http://www.R-project.org/posting-guide.html<http://www.r-project.org/posting-guide.html> > and provide commented, minimal, self-contained, reproducible code. > -- Jim Holtman Cincinnati, OH +1 513 646 9390 What is the problem that you are trying to solve? [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
