{ // without the style file for #plotdiv, // the server will complain that the figure margins are too large! const div = html` n (count) distribution type

This is a demo of the rplot function in the opencpu.js library. It calls the R function randomplot in the R package appdemo.

`; const button = div.querySelector('button'); button.onclick = () => { //disable the button to prevent multiple clicks $("#plotSubmitbutton").attr("disabled", "disabled"); // Use the "appdemo" server ocpu.seturl("https://cloud.opencpu.org/ocpu/apps/rwebapps/appdemo/R"); //read the value for 'myname' var nfield = parseInt($("#nfield").val()); var distfield = $("#distfield").val(); //create the plot area on the plotdiv element var req = $("#plotdiv").rplot("randomplot", { n : nfield, dist : distfield }) //if R returns an error, alert the error message req.fail(function(){ $("#plotdiv").text("R returned an error: " + req.responseText); }); //after request complete, re-enable the button req.always(function(){ $("#plotSubmitbutton").removeAttr("disabled") }); }; return div; }