我有两个小词a
和b
。
我想找到两个小节之间的共同值,然后对小节a
进行突变以表示匹配。
library(tidyverse)
a<-as_tibble(c("cat", "dog", "bird"))
b<-as_tibble(c("sheep", "cow", "dog", "pig", "cat", "mouse"))
dplyr::intersect(a, b)
预期输出:
value common
<chr> <dbl>
1 cat 1
2 dog 1
3 bird 0
最后的mutate
工作人员正在掩盖我,欢迎您提供帮助。
答案 0 :(得分:1)
仅检查变异中是否存在共同点会更容易:
79
或加入联接:
XAxis xAxis = lineChart.getXAxis();
xAxis.setPosition(XAxis.XAxisPosition.BOTTOM);
xAxis.setDrawGridLines(false);
xAxis.setValueFormatter(new IndexAxisValueFormatter(getAreaCount));
public ArrayList<String> getAreaCount() {
ArrayList<String> label = new ArrayList<>();
for (int i = 0; i < areaList.size(); i++)
label.add(areaList.get(i).getTopicName());
return label;
}
使用dplyr,处理一个小动作比使用多个小数容易得多,因此您的第一步应该是将它们放在一起,而不是制作一个新的。 :)在这种情况下,我认为相交不是工作的正确工具。但是,如果出于任何原因需要实际相交,则可以使用以上两种方法之一来注释/加入您的小标题a。
(此外,您可能会看到关于在向量上使用as_tibble的警告,因此您应该切换到tibble()或enframe(),以使代码更具前瞻性。)