Hello, I'm new in using the R, but from what I read is an excellent tool. Would you like if I could help, I am trying create an array from reading a text file. The idea is to read the file, and transform the data in binary format, for example. The calves of this file format. A,B,C,D,G A,C,E,O F,G Put this away a b c d e f g o 1 1 1 1 1 0 0 1 0 2 1 0 1 0 1 0 0 1 3 0 0 0 0 0 1 0 0 and display in monitor. Thanks for the help _________________________________________________________________ ?rea de Clientes Optimus Clix ? Toda a gest??o dos seus servi??os online! http://cliente.clix.pt/.
Try this: Lines <- "A,B,C,D,G A,C,E,O F,G" x <- read.table(textConnection(Lines), sep = ",", fill = TRUE, colClasses rep('character', 3)) xtabs( ~ r + values, transform(stack(x), r = rownames(x))) On Thu, Jun 17, 2010 at 7:10 AM, <ricardosousa2000@clix.pt> wrote:> > Hello, > I'm new in using the R, but from what I read is an excellent tool. > Would you like if I could help, I am trying create an array from > reading > a text file. > The idea is to read the file, and transform the data in binary format, > for example. The calves of this file format. > A,B,C,D,G > A,C,E,O > F,G > Put this away > a b c d e f g o > 1 1 1 1 1 0 0 1 0 > 2 1 0 1 0 1 0 0 1 > 3 0 0 0 0 0 1 0 0 > and display in monitor. > Thanks for the help > _________________________________________________________________ > > Ãrea de Clientes Optimus Clix â Toda a gestão dos seus serviços online! > http://cliente.clix.pt/. > ______________________________________________ > 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. >-- Henrique Dallazuanna Curitiba-Paraná-Brasil 25° 25' 40" S 49° 16' 22" O [[alternative HTML version deleted]]
try this:> x <- textConnection(" A,B,C,D,G+ A,C,E,O + F,G")> # assume you read in your data by Lines since not the same number of fields in each line > input <- readLines(x) > close(x) > # remove blanks that might be there > input <- gsub(' *', '', input) > # split by comma > in.s <- strsplit(input, ',') > # determine the range of items for the array > id <- sort(unique(unlist(in.s))) > # create the output matrix > output <- matrix(0, ncol=length(id), nrow=length(in.s)) > colnames(output) <- id > # now iterate and set values > for (i in seq_along(in.s)){+ output[i, unlist(in.s[[i]])] <- 1 + }> > > > outputA B C D E F G O [1,] 1 1 1 1 0 0 1 0 [2,] 1 0 1 0 1 0 0 1 [3,] 0 0 0 0 0 1 1 0>On Thu, Jun 17, 2010 at 6:10 AM, <ricardosousa2000 at clix.pt> wrote:> > ? Hello, > ? ? ? I'm new in using the R, but from what I read is an excellent tool. > ? ? ?Would you like if I could help, I am trying create an array from reading > ? a text file. > ? ? ?The idea is to read the file, and transform the data in binary format, > ? for example. The calves of this file format. > ? A,B,C,D,G > ? A,C,E,O > ? F,G > ? Put this away > ? ? ?a b c d e f g o > ? 1 ?1 1 1 1 0 0 1 0 > ? 2 ?1 0 1 0 1 0 0 1 > ? 3 ?0 0 0 0 0 1 0 0 > ? ?and display in monitor. > ? ? Thanks for the help > ? ? _________________________________________________________________ > > ? ?rea de Clientes Optimus Clix ? Toda a gest??o dos seus servi??os online! > ? http://cliente.clix.pt/. > ______________________________________________ > R-help at 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. >-- Jim Holtman Cincinnati, OH +1 513 646 9390 What is the problem that you are trying to solve?