Ich habe eine Reihe von 'gepaarten' Beobachtungen aus einer Studie für dasselbe Thema, und ich versuche, eine Spaghetti-Zeichnung zu erstellen, um diese Beobachtungen wie folgt zu visualisieren:

library(plotly)
df <- data.frame(id = rep(1:10, 2),
                 type = c(rep('a', 10), rep('b', 10)),
                 state = rep(c(0, 1), 10),
                 values = c(rnorm(10, 2, 0.5), rnorm(10, -2, 0.5)))
df <- df[order(df$id), ]
plot_ly(df, x = type, y = values, group = id, type = 'line') %>%
  layout(showlegend = FALSE)

It produziert die korrekte Handlung, die ich suche. Der Code zeigt jedoch jede gruppierte Zeile in einer eigenen Farbe an, was wirklich ärgerlich und ablenkend ist. Ich kann anscheinend keinen Weg finden, um Farben loszuwerden.

Bonus Frage: Ich möchte eigentlich @ verwendcolor = state und färben Sie die geneigten Linien stattdessen mit dieser Variablen.

rgendwelche Ansätze / Gedanke