Add a permanent contour line to a surface plot in R plotly

Question

I am using the plotly package in R to draw a surface plot and a contour plot:

# Load package
library(plotly)

# Simulate the data for plotting
x