Coloring point based on combination of two variables in R plot (without ggplot)

Question

Exmaplary image I want to have]1

I\'m trying to plot a result of survival analysis. The code I scripted is like below.

six <- survfit(Surv(t, d)~ Rx + w