different colours in the same series

I have a spline graph, with a single series.
Each value can have a different origin.
I would like to display the legend corresponding to the colour, and also choose my own colours.
Here is the code:

hc<-hchart(df, "spline", hcaes(x=res_date_collecte, y=res_valeur, color=res_statut), marker=list(radius=3, symbol="circle"))%>%

and this is the graph :

thanks for your help