before/after 的 ggplot2 斜率图
ggplot2 slope chart of before/after
我对 ggplot2 不够熟练，但它似乎是创建斜率图表以图形方式表示我的结果的最佳库。我必须表示一个斜率图表，指出治疗前后结果的差异。
请注意，我需要证明这两种处理产生了几乎相同的结果；这就是我寻找这张图表的原因。
谢谢。
id<-c(1:5)
after<-c(35.69, 38.96, 33.10, 27.11, 36.55)
before<-c(35.96, 39.70, 33.85, 27.92, 38.38)
df<-data.frame(id, after,before)
这就是你想要的吗？
df <- data.frame(id, after,before) %>%
pivot_longer(cols = c("after", "before"),
names_to = "time")
ggplot(data = df,
aes(x = time,
y = value,
group = id,
color = factor(id))) +
geom_line(size = 2,
alpha = 0.5) +
geom_point(size = 3)
我对 ggplot2 不够熟练，但它似乎是创建斜率图表以图形方式表示我的结果的最佳库。我必须表示一个斜率图表，指出治疗前后结果的差异。 请注意，我需要证明这两种处理产生了几乎相同的结果；这就是我寻找这张图表的原因。 谢谢。
id<-c(1:5)
after<-c(35.69, 38.96, 33.10, 27.11, 36.55)
before<-c(35.96, 39.70, 33.85, 27.92, 38.38)
df<-data.frame(id, after,before)
这就是你想要的吗？
df <- data.frame(id, after,before) %>%
pivot_longer(cols = c("after", "before"),
names_to = "time")
ggplot(data = df,
aes(x = time,
y = value,
group = id,
color = factor(id))) +
geom_line(size = 2,
alpha = 0.5) +
geom_point(size = 3)