0

I was wondering if anyone has a solution as to why the following code which works in Mathematica 12.0, doesn't work when using Cloud Deploy?

CloudDeploy@
 DynamicModule[{pt = {\[Pi]/2, 3}}, 
  ClickPane[
   Plot[3 Sin[x], {x, -6, 6}, 
    Epilog -> {Dynamic@Arrow[{{1, 5}, pt}], Text["Extremum", {2, 5}]},
     PlotRange -> 
     6], (With[{x = (2 Round[-1/2 + #[[1]]/\[Pi]] + 1) \[Pi]/2}, 
      pt = {x, 3 Sin[x]}]) &]]

Thanks in advance

Tim B
  • 547
  • 2
  • 9
  • 1
    Quick check with examples from documentation shows that ClickPane does not seem fully supported on WPC yet. I guess it boils down to not supporting MousePosition["Graphics"] which means that it will be tough to get a workaround. – Kuba Sep 16 '19 at 08:53
  • Okay, thank you. I'll check if there is a way to replicate what I want with LocatorPane, since that has worked without any issues. – Tim B Sep 16 '19 at 08:57

0 Answers0