小编DHB*_*HBI的帖子

我已经很好地了解了这个网站和其他人如何根据特定列中的值设置hjust和vjust.以下显示了数据的结构(但多年来是许多条目的简化子集):

    YearStart <- c(2001,2002,2003,2001,2002,2003)
    Team <- c("MU","MU","MU","MC","MC","MC")
    Attendance <- c(67586,67601,67640,33058,34564,46834)
    Position <- c(3,1,3,1,9,16)
    offset <-c()

    df <- data.frame(YearStart,Team,Attendance,Position)

所以

> head(df)
  YearStart Team Attendance Position
1      2001   MU      67586        3
2      2002   MU      67601        1
3      2003   MU      67640        3
4      2001   MC      33058        1
5      2002   MC      34564        9
6      2003   MC      46834       16

我想acheive是vjust基于团队的价值.在下文中,MU将是vjust = 1并且MC将是vjust = -1,因此我可以从与其关联的数据组控制数据标签的位置.

我试图破解几个使用包含查找表的函数的例子(它不是直接的ifelse,因为我有很多Team的值)但我似乎无法通过aes方法将字符串传递给函数沿着这些方向:

lut <- list(MU=1,MC=-1)
vj <-function(x){lut[[x]]}
p=ggplot(df, aes(YearStart, Attendance, label=Position, …