r - ggplot2 中 geom_line 层的正确参数

Question

我有这样一个数据框:

1   Pos like    77
2   Neg like    58
3   Pos make    44
4   Neg make    34
5   Pos movi    154
6   Neg movi    145    
...
20  Neg will    45

我想使用 ggplot2 中的 geom_text 层生成一个绘图。

我用过这段代码

q <- ggplot(my_data_set, aes(x=value, y=value, label=variable)) 
q <- q + geom_text()
q

产生了这个情节:

显然，这不是一个理想的情节。

我想制作一个类似的图，除了我想在 x 轴上有 Positive 类，在 y 轴上有 Negative 类。

更新:这是我试图模仿的一个例子:

我似乎无法找出将参数提供给 geom_line 层的正确方法。

在给定我的数据框的情况下，在 X 轴上绘制正参数值以及在 Y 轴上绘制负参数值的正确方法是什么？

感谢您的关注。

Answer 1

my_data_set <- read.table(text = "
id variable value
Pos like    77
Neg like    58
Pos make    44
Neg make    34
Pos movi    154
Neg movi    145", header = T)

library(data.table)
my_data_set <- as.data.frame(data.table(my_data_set)[, list(
                      Y = value[id == "Neg"],
                      X = value[id == "Pos"]),
               by = variable])

library(ggplot2)
q <- ggplot(my_data_set, aes(x=X, y=Y, label=variable)) 
q <- q + geom_text()
q