r - Rのplotlyを使用して棒グラフの配色を変更するには?

Question

plotly ライブラリを使用して棒グラフに別の配色を使用したいのですが、そのコードは現在次のようになっています。

library(plotly)

p <- plot_ly(
 x=c("1","2", "3", "4", "5", "6", "7", "8", "9"),
 y=c(0.79, 0.57, 0.57, 0.59, 0.46, 0.38, 0.33, 0.57),
 name = "2007",
 type = "bar"
)
p

p2 <- add_trace(
  p,
  x=c("1","2", "3", "4", "5", "6", "7", "8", "9"),
  y=c(0.79, 0.57, 0.57, 0.59, 0.46, 0.38, 0.25, 0.58),
  name = "2008",
  type = "bar")
p2