Diamonds chart

print(Sys.Date())
## [1] "2025-03-28"
plot_ly(data=diamonds,x=diamonds$carat,y=diamonds$price,mode="markers",color=diamonds$color)
## No trace type specified:
##   Based on info supplied, a 'scatter' trace seems appropriate.
##   Read more about this trace type -> https://plotly.com/r/reference/#scatter