這是我重復測量的資料集。分數是因變數，曝光是我的混合模型中的主要固定因素。
structure(list(ID = c(50L, 50L, 60L, 60L, 60L, 60L, 70L, 70L),
Time = c(1L, 2L, 1L, 2L, 3L, 4L, 1L, 2L), Score = c(100L,
150L, 100L, 400L, -205L, -601L, 100L, 226L), exposure = c(1L,
1L, 1L, 1L, 1L, 1L, 2L, 2L)), class = "data.frame", row.names = c(NA,
-8L))
我想做一個意大利面條圖來說明每個參與者隨著時間的推移得分趨勢，作為他們所擁有的暴露水平的影響。我想繪制圖表來說明每個參與者在根據他們的暴露組分組時隨時間推移的得分趨勢。我附上的圖片是沒有分組的意大利面條圖的例子
到目前為止，這是我的代碼：
ggplot ( DB, aes ( x= Time, Y= Score, group_by=exposure, color = ID)
geom_points()
geom_line()
theme_bw()
uj5u.com熱心網友回復：
除了一些拼寫錯誤之外，我認為您可能需要分組，ID讓每個參與者寫一行，然后按 . 著色exposure。如果exposure沒有離散級別，您可能希望省略factor()下面代碼中的位。
library(ggplot2)
df <- structure(list(
ID = c(50L, 50L, 60L, 60L, 60L, 60L, 70L, 70L),
Time = c(1L, 2L, 1L, 2L, 3L, 4L, 1L, 2L),
Score = c(100L, 150L, 100L, 400L, -205L, -601L, 100L, 226L),
exposure = c(1L, 1L, 1L, 1L, 1L, 1L, 2L, 2L)
), class = "data.frame", row.names = c(NA, -8L))
ggplot(df, aes(Time, Score, group = ID, color = factor(exposure)))
geom_point()
geom_line()
theme_bw()
由reprex 包于 2022-06-06 創建(v2.0.1)
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/487260.html