我正在尝试自动化这里的一些系统,特别是基于调查数据生成报告.
假设我对1个问题有3条评论.
current_comments <- c("too slow", "not fast enough", "bad speed")
Run Code Online (Sandbox Code Playgroud)
基本上我想要做的是将注释合并到一个由" - "分隔的字符串中,看起来像这样
>current_comments
[1] "too slow - not fast enough - bad speed"
Run Code Online (Sandbox Code Playgroud)
这样我就可以将它粘在一个单元格中进行导出.
我知道我可以通过使用粘贴功能来实现这一点.
> paste(current_comments[1], " - ", current_comments[2], " - ", current_comments[3])
[1] "too slow - not fast enough - bad speed"
Run Code Online (Sandbox Code Playgroud)
但从自动化角度来看,如何通过不同数量的评论来做到这一点.
很抱歉有一个新手问题,但这让我在下午的大部分时间里难以接受.
编辑:按照要求继续dput(head(clean_data, 10))使用名称和问题进行更改
ture(list(res_qnumber = 1:10, res_ID = c(44024431L, 44024431L,
44024431L, 44024431L, 44024431L, 44024431L, 44024431L, 44024431L,
44024431L, 44024431L), res_name = c("name1", "name1",
"name1", "name1", "name1", "name1", "name1",
"name1", "name1", "name1"), …Run Code Online (Sandbox Code Playgroud) 假设我有两个因素,我想在同一个图上绘制它们,两个因素都有相同的水平.
s1 <- c(rep("male",20), rep("female", 30))
s2 <- c(rep("male",10), rep("female", 40))
s1 <- factor(s1, levels=c("male", "female"))
s2 <- factor(s2, levels=c("male", "female"))
Run Code Online (Sandbox Code Playgroud)
我原本以为使用table函数会产生正确的图形结果,但它会弹出.
table(s1, s2)
s2
s1 male female
male 10 10
female 0 30
Run Code Online (Sandbox Code Playgroud)
那么真的有两个问题,表格功能是什么来获得这个结果?我可以使用哪些其他功能来创建具有相同级别功能的2系列图形?
此外,如果它是一个因素我在gplots包中使用barplot2来绘制它.