plotly from R to evaluate put protecction