Thanks Rui,
It is very useful indeed.
Bests,
Niklas

2013/2/26 Rui Barradas <ruipbarra...@sapo.pt>

> Hello,
>
> I'm not sure I understand, do you want to treat BCC, CBC and CCB as the
> same? If so try
>
> w2 <- apply( y , 1 , function(x) paste0(sort(x) , collapse = "" ))
>
> table(w2)
>
>
> Hope this helps,
>
> Rui Barradas
>
> Em 26-02-2013 13:58, Niklas Fischer escreveu:
>
>> Hi again,
>>
>>
>>
>> Thanks for Anthony about the links on reproducible codes.
>>
>>
>>
>> Thanks for Rui about ordering when rows are intact.
>>
>>
>>
>> One more question
>>
>>
>>
>>
>>
>> Here is your code.
>>
>>
>>
>> x <-
>>      cbind(
>>          sample( LETTERS[1:6] , 100 , replace = TRUE ) ,
>>          sample( LETTERS[1:6] , 100 , replace = TRUE ) ,
>>          sample( LETTERS[1:6] , 100 , replace = TRUE )
>>      )
>>
>> y <- as.matrix( x )
>>
>> w2 <- apply( y , 1 , paste0 , collapse = "" )
>> table(w2)
>>
>>
>>
>>
>>
>>
>>
>> Do you know any trick to organize merge certain elements together?
>>
>> For example, if the final table includes
>>
>> BCC, CCB, CBC how should I sum frequency of one element like BCC? I have a
>> very long table it would be indeed very useful!
>>
>>
>>
>>
>>
>> Niklas.
>>
>> 2013/2/25 Rui Barradas <ruipbarra...@sapo.pt>
>>
>>  Hello,
>>>
>>> I disagree with the way you've sorted the matrix, like this all A's
>>> become
>>> first, then B's, etc, irrespective of the respondents. Each row is a
>>> respondent, and the rows should be kept intact, but with a different
>>> ordering. To this effect, use order():
>>>
>>> z <- y[order(y[,1], y[,2], y[,3]), ]
>>>
>>>
>>> Then use the rest of your code.
>>>
>>> Or, which would save us the sorting, paste the rows elements together
>>> directly from matrix 'y' and use the fact that table() sorts its output.
>>>
>>> w2 <- apply( y , 1 , paste0 , collapse = "" )
>>> table(w2)
>>>
>>>
>>> Hope this helps,
>>>
>>> Rui Barradas
>>>
>>> Em 25-02-2013 18:32, Anthony Damico escreveu:
>>>
>>>   in the future, please provide R code to re-create some example data :)
>>>
>>>> read
>>>> http://stackoverflow.com/****questions/5963269/how-to-make-****<http://stackoverflow.com/**questions/5963269/how-to-make-**>
>>>> a-great-r-reproducible-****examplefor<http://**
>>>> stackoverflow.com/questions/**5963269/how-to-make-a-great-r-**
>>>> reproducible-examplefor<http://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-examplefor>
>>>> >
>>>>
>>>> more detail..
>>>>
>>>>
>>>>
>>>> # create a data table with three unique columns' values..
>>>> # treat these values just like letters
>>>> x <-
>>>>       cbind(
>>>>           sample( LETTERS[1:6] , 100 , replace = TRUE ) ,
>>>>           sample( LETTERS[1:6] , 100 , replace = TRUE ) ,
>>>>           sample( LETTERS[1:6] , 100 , replace = TRUE )
>>>>       )
>>>>
>>>> # look at x.. this is good data i hope?
>>>> x
>>>>
>>>> # convert this to a matrix
>>>> y <- as.matrix( x )
>>>>
>>>> # i don't think you care about ordering, so sort left-to-rightwards
>>>> z <- apply( y , 2 , sort )
>>>>
>>>> # look at your results
>>>> z
>>>>
>>>> # paste these results together across the matrix
>>>> w <- apply( z , 1 , paste0 , collapse = "" )
>>>>
>>>> # count the final distinct results
>>>> table( w )
>>>>
>>>>
>>>>
>>>>
>>>> On Mon, Feb 25, 2013 at 1:04 PM, Niklas Fischer
>>>> <niklasfischer...@gmail.com>****wrote:
>>>>
>>>>   Dear R users,
>>>>
>>>>>
>>>>> I have three questions measuring close relationships.
>>>>> The questions are same and the respondents put the answer in order.
>>>>>
>>>>> I'd like to examine the pattern of answers and visualize it.
>>>>>
>>>>> For example q1 (A,B,C,D,E) and q2 and q3 are the same. If the
>>>>> respondents
>>>>> selects A B C (so BCA or BAC or CBA or CAB), I'd like to construct
>>>>> frequency table for ABC and other combinations for example DEF.
>>>>>
>>>>>
>>>>> Unfortunately, there are many answers, and three-way contingency table
>>>>> includes lots of cells which make it diffucult to interpret and
>>>>> requires
>>>>> lots of extra work to organize data.
>>>>>
>>>>> What is the best way to construct fruequency table of these kind of
>>>>> variables and to visulize the results with the most simple form
>>>>>
>>>>>
>>>>> All the bests,
>>>>> Niklas
>>>>>
>>>>>           [[alternative HTML version deleted]]
>>>>>
>>>>> ______________________________****________________
>>>>> R-help@r-project.org mailing list
>>>>> https://stat.ethz.ch/mailman/****listinfo/r-help<https://stat.ethz.ch/mailman/**listinfo/r-help>
>>>>> <https://stat.**ethz.ch/mailman/listinfo/r-**help<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>
>>>>> <http://www.**R-project.org/posting-guide.**html<http://www.R-project.org/posting-guide.html>
>>>>> >
>>>>>
>>>>> and provide commented, minimal, self-contained, reproducible code.
>>>>>
>>>>>
>>>>>           [[alternative HTML version deleted]]
>>>>
>>>> ______________________________****________________
>>>> R-help@r-project.org mailing list
>>>> https://stat.ethz.ch/mailman/****listinfo/r-help<https://stat.ethz.ch/mailman/**listinfo/r-help>
>>>> <https://stat.**ethz.ch/mailman/listinfo/r-**help<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<http://www.R-project.org/posting-guide.html>
>>>> >
>>>>
>>>> and provide commented, minimal, self-contained, reproducible code.
>>>>
>>>>
>>>>
>>

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

Reply via email to