小编use*_*549的帖子

我有以下情节:

我用来生成这个图的代码是:

ggplot(df, aes(x = instance, y = total_hits))+
geom_point(size = 1)+
geom_line()+
geom_line(aes(x=df$instance, y = line1), colour="red")+
geom_vline(xintercept=805) +
geom_line(aes(x=df$instance, y = line2), colour="blue")+
geom_line(aes(x=df$instance, y = line3), colour="purple") 

我想在这个情节中添加一个图例来标记每一行.但是,由于我手动添加了每一行,我不知道如何添加图例.有什么提示/建议吗？

• 我无法共享我正在使用的数据,所以我只是想找一种手动添加图例的通用方法.

我有矢量:

v <- c("godzilla", "jurassic", "googly")

我想要这个向量中每个元素的前3个字母.我想最终得到:

# "god"   "jur"   "goo"

我已经尝试过使用apply,但它没有用.我该怎么办？

我有两个向量:

 a <- letters[1:5]
 b <- c('a','k','w','p','b','b')

现在我想计算向量a中每个字母出现的次数b.我想得到:

 # 1  2  0  0  0

我该怎么办？