Individual marker styling inconsistent

Hi, thank you for making and working on such a wonderful plotting package.

For one of the projects I'm working on, I'm trying to style individual markers, however it's inconsistent when trying to target individual markers. For example I want to make the fourth point as full opacity (1) and larger (15) while the others are at 0.2 and size 10. I would expect "sample4" to be at full opacity, but it's "sample3". Am I doing something wrong?

test_data <- data.frame(
    x_data = c(2.8113, 5.8112, 7.3461, 15.5405, 16.3035),
    y_data = c(2, 2, 2, 6, 3),
    groups = c("group1", "group1", "group2", "group2", "group1"),
    samples = c("sample1", "sample2", "sample3", "sample4", "sample5")
)
plotly::plot_ly(
    test_data,
    x = ~x_data,
    y = ~y_data,
    mode = "markers",
    type = "scatter",
    color = ~groups,
    text = ~samples,
    marker = list(
        size = c(10, 10, 10, 15, 10),
        opacity = c(0.2, 0.2, 0.2, 1, 0.2)
      )
    )

produces the following plot

Thanks a lot in advance!

plotly.R リポジトリで、提供された plot_ly の例を再現し、グループ化された marker ベクトルがプロットされた点にどのように割り当てられるかを確認してください。表示された marker のスタイルを、要求された size および opacity ベクトルと比較してください。sample4 が size 15 と opacity 1 を受け取り、他のサンプルが size 10 と opacity 0.2 を受け取れば完了です。