这个问题来自早期的问题及其答案.
首先是一些玩具数据:
df = read.table(text =
"School Year Value
A 1998 5
B 1999 10
C 2000 15
A 2000 7
B 2001 15
C 2002 20", sep = "", header = TRUE)
最初的问题是如何为每所学校绘制价值年度线.答案或多或少对应于下面的p1和p2.但也要考虑p3.
library(ggplot2)
(p1 <- ggplot(data = df, aes(x = Year, y = Value, colour = School)) +
geom_line() + geom_point())
(p2 <- ggplot(data = df, aes(x = factor(Year), y = Value, colour = School)) +
geom_line(aes(group = School)) + geom_point())
(p3 <- ggplot(data = df, aes(x …如何使用 ggplot 2 创建折线图，其中 x 变量是分类变量或因子，y 变量是数字，组变量是分类变量？我已经尝试了 + geom_point() 和上面所述的变量，它可以工作，但是 + geom_line() 不行。
我已经审阅过以下帖子： 使用分类数据创建折线图、 带有两个分类变量的 ggplot2 条形图和尽管 + geom_line() 但图中没有线条，但没有一个回答我的问题。
在进入代码和示例之前，（1）是的，我绝对必须将 x 变量和组变量作为字符或因子，（2）不，我不需要条形图或只是 geom_point()。
下面的示例提供了使用因变量的不同变化运行的三个不同示例回归的多个自变量的系数。虽然下面的代码显示了我找到的解决方法（即创建一个名为“test”的 int 变量来代替包含形成回归的自变量名称的 chr 变量），但我需要能够保留自变量的 chr 名称。
这是我所拥有的：
library(dplyr)
library(ggplot2)
library(plotly)
library(tidyr)
var_names <- c("ST1", "ST2", "ST3",
"EFI1", "EFI2", "EFI3", "EFI4",
"EFI5", "EFI6")
####Dataset1####
reg <- c(26441.84, 20516.03, 12936.79, 17793.22, 18837.48, 15704.31, 17611.14, 17360.59, 14836.34)
r_adj <- c(30473.17, 35221.43, 29875.98, 30267.31, 29765.9, 30322.86, 31535.66, 30955.29, 29828.3)
a_adj <- c(19588.63, …