eim Erstellen einer Trendlinie für ein Streudiagramm verwende ichadd_trace, um eine lineare Trendlinie hinzuzufügen.

Wenn die Daten nur eine "Datenreihe" haben, d. H. Es gibt nur eine Koordinatengruppe, funktioniert der folgende Code einwandfrei. Wenn ich jedoch eine Reihe von Serien vorstelle, sieht die "Trendlinie" folgendermaßen aus:

Hier ist der relevante Teil des Codes:

    p <- plot_ly(filteredFull(), x=Relative.Time.Progress, y=cumul.ans.keystroke,
                 mode='markers', color=KeystrokeRate, size=KeystrokeRate,
                 marker=list(sizeref=100), type='scatter', 
                           hoverinfo='text', text=paste("token: ",Token, "Keystrokes: ",
                                                          KeystrokeCount)) %>%
        layout(
          xaxis=list(range=c(0,1)),
          yaxis=list(range=c(0,max(filteredFull()$cumul.ans.keystroke)))
        )

     lm.all <- lm(cumul.ans.keystroke ~ Relative.Time.Progress,
              data=df)
      observe(print(summary(lm.all)))
      p <- add_trace(p, y=fitted(lm.all), x=Relative.Time.Progress,
                     mode='lines') %>%
        layout(
          xaxis= list(range = c(0,1))
        )
p

Ich kann bei Bedarf weiteren Code hinzufügen oder versuchen, ein minimales Arbeitsbeispiel zu erstellen. Ich hoffe jedoch, dass dies ein bekanntes Problem ist, das sich aus dem Code ergibt.