遇到如下问题：x是个数值型向量。
<br />
set.seed(1)<br />
x = sample(1:3,rep=T)<br />
x<br />
[1] 1 2 2 3 1 3 3 2 2 1<br />
想对x处理得到如下的矩阵：
<bblatex>
\left( {\begin{array}{ccccccc}
1 & 2 & 3 &1 & 3 & 2 & 1 \\
0 & 2 & 0 & 0 & 3 & 2 & 0 \end{array} } \right)
</bblatex>
即相邻的相同的元素放到同一列，遇到不同的元素时另起一列。
我首先想到的是用if语句，但仔细一想貌似很麻烦。大家帮我出出注意，谢谢：）
有没有什么函数能直接把相同的字符归类的？
<br />
paste(x,collapse="")<br />
[1] "1223133221"<br />
</p>
