相关疑难解决方法(0)

我有一个文本变量和一个分组变量.我想将text变量按行数折叠成每行一个字符串(合并).因此,只要组列说m我想将文本组合在一起等等.我提供了之前和之后的样本数据集.我正在写这个包,并且迄今为止避免了所有依赖于其他包除了wordcloud并且希望保持这种方式.

我怀疑rle可能有用,cumsum但无法弄清楚这一点.

先感谢您.

数据是什么样的

                                 text group
1       Computer is fun. Not too fun.     m
2               No its not, its dumb.     m
3              How can we be certain?     f
4                    There is no way.     m
5                     I distrust you.     m
6         What are you talking about?     f
7       Shall we move on?  Good then.     f
8 Im hungry.  Lets eat.  You already?     m

我希望数据看起来像什么

                                                       text group
1       Computer is fun. Not too fun. …

每个人

使用R中的以下代码,我显示了一个简单的甘特图:

dat <- read.csv2(text="start;duration
 1;4
 7;3
 15;2
 ")
 plot(NA, xlim=c(0,20), ylim=c(0,9), ylab="",xlab="X", xaxt="n", yaxt="n")
 with(dat, segments(x0=start, x1=start+duration, y0=2,y1=2))
 with(dat, text( start+duration/2, 2.5, labels=duration))
 axis(1, at=seq(0,20,by=2), labels=seq(0,20,by=2))

现在我如何修改此代码以便能够从csv文件中的这些数据:

A; 2; 7;
B; 5; 10;
C; 5; 12;
D; 16; 22;
E; 18; 20;

绘制这样一个甘特图

非常感谢,任何回复!