Your question isn't very clear but maybe you want this?
p<- plot_ly(data = df,
x= ~DAYS,
y= ~SCORE,
type = "scatter",
mode = 'lines',
color = ~GROUP) |>
add_trace(split = ~ USUBJID, showlegend = FALSE)
p