How can I make a webpage where people can evaluate my code?












6












$begingroup$


Inspired by JS Fiddle I'd like a way to write a little snippet of Mathematica code and then get it to show up on a website so people can play with it. I know I could put it into a cloud notebook, but I'd like this to be free.



So...how do?










share|improve this question









$endgroup$

















    6












    $begingroup$


    Inspired by JS Fiddle I'd like a way to write a little snippet of Mathematica code and then get it to show up on a website so people can play with it. I know I could put it into a cloud notebook, but I'd like this to be free.



    So...how do?










    share|improve this question









    $endgroup$















      6












      6








      6


      3



      $begingroup$


      Inspired by JS Fiddle I'd like a way to write a little snippet of Mathematica code and then get it to show up on a website so people can play with it. I know I could put it into a cloud notebook, but I'd like this to be free.



      So...how do?










      share|improve this question









      $endgroup$




      Inspired by JS Fiddle I'd like a way to write a little snippet of Mathematica code and then get it to show up on a website so people can play with it. I know I could put it into a cloud notebook, but I'd like this to be free.



      So...how do?







      wolfram-cloud






      share|improve this question













      share|improve this question











      share|improve this question




      share|improve this question










      asked Jan 20 at 3:06









      b3m2a1b3m2a1

      27.8k357161




      27.8k357161






















          1 Answer
          1






          active

          oldest

          votes


















          8












          $begingroup$

          I made use of an undocumented API for Mathematica cloud notebooks to write a little set of JavaScript functions that can be used to do just this, parsing Mathematica cells out of a browser URL. I then put this up here: https://www.wolframcloud.com/objects/b3m2a1/WLFiddle



          I have to other versions of this for slightly different use cases, too:





          • https://www.wolframcloud.com/objects/b3m2a1/WLFiddleEmbed for embedding


          • https://www.wolframcloud.com/objects/b3m2a1/WLDelayedFiddle for onclick loading


          It uses a free sandbox cloud notebook, so it doesn't actually cost me anything (I think).



          Now all you need to do is basic64 encode your cell content and pass it in. Or you can use a little package I wrote for this:



          << https://github.com/b3m2a1/mathematica-tools/raw/master/WLFiddle.wl
          MakeWLFiddle::usage

          "MakeWLFiddle[nb] turns nb or its current selection into a fiddle URL
          MakeWLFiddle[cells] turns a set of cells into a fiddle URL"


          We can call this on a notebook selection and it'll format a URL for us to use automatically, like say this one that provides the following Manipulate:



          Manipulate[
          ContourPlot[
          q1/Norm[{x, y} - p[[1]]] + q2/Norm[{x, y} - p[[2]]], {x, -2,
          2}, {y, -2, 2}, Contours -> 10], {{q1, -1}, -3, 3}, {{q2, 1}, -3,
          3}, {{p, {{-1, 0}, {1, 0}}}, {-1, -1}, {1, 1}, Locator},
          Deployed -> True]


          I just put that in a notebook and called



          MakeWLFiddle[EvaluationNotebook]


          You can also select a subsection of a notebook and evaluate the same in a Button and it'll just package up the selected cells. This should work for any number of cells, but won't work for big data since I cooked everything into the URL query.



          Also look at the Options:



          {"ShortenURL" -> True, "BaseURL" -> Automatic}


          "BaseURL" can be an arbitrary URL or "Delayed" or "Embed".



          Warning: if WRI gets mad at me about this at any point this may disappear






          share|improve this answer









          $endgroup$













            Your Answer





            StackExchange.ifUsing("editor", function () {
            return StackExchange.using("mathjaxEditing", function () {
            StackExchange.MarkdownEditor.creationCallbacks.add(function (editor, postfix) {
            StackExchange.mathjaxEditing.prepareWmdForMathJax(editor, postfix, [["$", "$"], ["\\(","\\)"]]);
            });
            });
            }, "mathjax-editing");

            StackExchange.ready(function() {
            var channelOptions = {
            tags: "".split(" "),
            id: "387"
            };
            initTagRenderer("".split(" "), "".split(" "), channelOptions);

            StackExchange.using("externalEditor", function() {
            // Have to fire editor after snippets, if snippets enabled
            if (StackExchange.settings.snippets.snippetsEnabled) {
            StackExchange.using("snippets", function() {
            createEditor();
            });
            }
            else {
            createEditor();
            }
            });

            function createEditor() {
            StackExchange.prepareEditor({
            heartbeatType: 'answer',
            autoActivateHeartbeat: false,
            convertImagesToLinks: false,
            noModals: true,
            showLowRepImageUploadWarning: true,
            reputationToPostImages: null,
            bindNavPrevention: true,
            postfix: "",
            imageUploader: {
            brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
            contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
            allowUrls: true
            },
            onDemand: true,
            discardSelector: ".discard-answer"
            ,immediatelyShowMarkdownHelp:true
            });


            }
            });














            draft saved

            draft discarded


















            StackExchange.ready(
            function () {
            StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f189854%2fhow-can-i-make-a-webpage-where-people-can-evaluate-my-code%23new-answer', 'question_page');
            }
            );

            Post as a guest















            Required, but never shown

























            1 Answer
            1






            active

            oldest

            votes








            1 Answer
            1






            active

            oldest

            votes









            active

            oldest

            votes






            active

            oldest

            votes









            8












            $begingroup$

            I made use of an undocumented API for Mathematica cloud notebooks to write a little set of JavaScript functions that can be used to do just this, parsing Mathematica cells out of a browser URL. I then put this up here: https://www.wolframcloud.com/objects/b3m2a1/WLFiddle



            I have to other versions of this for slightly different use cases, too:





            • https://www.wolframcloud.com/objects/b3m2a1/WLFiddleEmbed for embedding


            • https://www.wolframcloud.com/objects/b3m2a1/WLDelayedFiddle for onclick loading


            It uses a free sandbox cloud notebook, so it doesn't actually cost me anything (I think).



            Now all you need to do is basic64 encode your cell content and pass it in. Or you can use a little package I wrote for this:



            << https://github.com/b3m2a1/mathematica-tools/raw/master/WLFiddle.wl
            MakeWLFiddle::usage

            "MakeWLFiddle[nb] turns nb or its current selection into a fiddle URL
            MakeWLFiddle[cells] turns a set of cells into a fiddle URL"


            We can call this on a notebook selection and it'll format a URL for us to use automatically, like say this one that provides the following Manipulate:



            Manipulate[
            ContourPlot[
            q1/Norm[{x, y} - p[[1]]] + q2/Norm[{x, y} - p[[2]]], {x, -2,
            2}, {y, -2, 2}, Contours -> 10], {{q1, -1}, -3, 3}, {{q2, 1}, -3,
            3}, {{p, {{-1, 0}, {1, 0}}}, {-1, -1}, {1, 1}, Locator},
            Deployed -> True]


            I just put that in a notebook and called



            MakeWLFiddle[EvaluationNotebook]


            You can also select a subsection of a notebook and evaluate the same in a Button and it'll just package up the selected cells. This should work for any number of cells, but won't work for big data since I cooked everything into the URL query.



            Also look at the Options:



            {"ShortenURL" -> True, "BaseURL" -> Automatic}


            "BaseURL" can be an arbitrary URL or "Delayed" or "Embed".



            Warning: if WRI gets mad at me about this at any point this may disappear






            share|improve this answer









            $endgroup$


















              8












              $begingroup$

              I made use of an undocumented API for Mathematica cloud notebooks to write a little set of JavaScript functions that can be used to do just this, parsing Mathematica cells out of a browser URL. I then put this up here: https://www.wolframcloud.com/objects/b3m2a1/WLFiddle



              I have to other versions of this for slightly different use cases, too:





              • https://www.wolframcloud.com/objects/b3m2a1/WLFiddleEmbed for embedding


              • https://www.wolframcloud.com/objects/b3m2a1/WLDelayedFiddle for onclick loading


              It uses a free sandbox cloud notebook, so it doesn't actually cost me anything (I think).



              Now all you need to do is basic64 encode your cell content and pass it in. Or you can use a little package I wrote for this:



              << https://github.com/b3m2a1/mathematica-tools/raw/master/WLFiddle.wl
              MakeWLFiddle::usage

              "MakeWLFiddle[nb] turns nb or its current selection into a fiddle URL
              MakeWLFiddle[cells] turns a set of cells into a fiddle URL"


              We can call this on a notebook selection and it'll format a URL for us to use automatically, like say this one that provides the following Manipulate:



              Manipulate[
              ContourPlot[
              q1/Norm[{x, y} - p[[1]]] + q2/Norm[{x, y} - p[[2]]], {x, -2,
              2}, {y, -2, 2}, Contours -> 10], {{q1, -1}, -3, 3}, {{q2, 1}, -3,
              3}, {{p, {{-1, 0}, {1, 0}}}, {-1, -1}, {1, 1}, Locator},
              Deployed -> True]


              I just put that in a notebook and called



              MakeWLFiddle[EvaluationNotebook]


              You can also select a subsection of a notebook and evaluate the same in a Button and it'll just package up the selected cells. This should work for any number of cells, but won't work for big data since I cooked everything into the URL query.



              Also look at the Options:



              {"ShortenURL" -> True, "BaseURL" -> Automatic}


              "BaseURL" can be an arbitrary URL or "Delayed" or "Embed".



              Warning: if WRI gets mad at me about this at any point this may disappear






              share|improve this answer









              $endgroup$
















                8












                8








                8





                $begingroup$

                I made use of an undocumented API for Mathematica cloud notebooks to write a little set of JavaScript functions that can be used to do just this, parsing Mathematica cells out of a browser URL. I then put this up here: https://www.wolframcloud.com/objects/b3m2a1/WLFiddle



                I have to other versions of this for slightly different use cases, too:





                • https://www.wolframcloud.com/objects/b3m2a1/WLFiddleEmbed for embedding


                • https://www.wolframcloud.com/objects/b3m2a1/WLDelayedFiddle for onclick loading


                It uses a free sandbox cloud notebook, so it doesn't actually cost me anything (I think).



                Now all you need to do is basic64 encode your cell content and pass it in. Or you can use a little package I wrote for this:



                << https://github.com/b3m2a1/mathematica-tools/raw/master/WLFiddle.wl
                MakeWLFiddle::usage

                "MakeWLFiddle[nb] turns nb or its current selection into a fiddle URL
                MakeWLFiddle[cells] turns a set of cells into a fiddle URL"


                We can call this on a notebook selection and it'll format a URL for us to use automatically, like say this one that provides the following Manipulate:



                Manipulate[
                ContourPlot[
                q1/Norm[{x, y} - p[[1]]] + q2/Norm[{x, y} - p[[2]]], {x, -2,
                2}, {y, -2, 2}, Contours -> 10], {{q1, -1}, -3, 3}, {{q2, 1}, -3,
                3}, {{p, {{-1, 0}, {1, 0}}}, {-1, -1}, {1, 1}, Locator},
                Deployed -> True]


                I just put that in a notebook and called



                MakeWLFiddle[EvaluationNotebook]


                You can also select a subsection of a notebook and evaluate the same in a Button and it'll just package up the selected cells. This should work for any number of cells, but won't work for big data since I cooked everything into the URL query.



                Also look at the Options:



                {"ShortenURL" -> True, "BaseURL" -> Automatic}


                "BaseURL" can be an arbitrary URL or "Delayed" or "Embed".



                Warning: if WRI gets mad at me about this at any point this may disappear






                share|improve this answer









                $endgroup$



                I made use of an undocumented API for Mathematica cloud notebooks to write a little set of JavaScript functions that can be used to do just this, parsing Mathematica cells out of a browser URL. I then put this up here: https://www.wolframcloud.com/objects/b3m2a1/WLFiddle



                I have to other versions of this for slightly different use cases, too:





                • https://www.wolframcloud.com/objects/b3m2a1/WLFiddleEmbed for embedding


                • https://www.wolframcloud.com/objects/b3m2a1/WLDelayedFiddle for onclick loading


                It uses a free sandbox cloud notebook, so it doesn't actually cost me anything (I think).



                Now all you need to do is basic64 encode your cell content and pass it in. Or you can use a little package I wrote for this:



                << https://github.com/b3m2a1/mathematica-tools/raw/master/WLFiddle.wl
                MakeWLFiddle::usage

                "MakeWLFiddle[nb] turns nb or its current selection into a fiddle URL
                MakeWLFiddle[cells] turns a set of cells into a fiddle URL"


                We can call this on a notebook selection and it'll format a URL for us to use automatically, like say this one that provides the following Manipulate:



                Manipulate[
                ContourPlot[
                q1/Norm[{x, y} - p[[1]]] + q2/Norm[{x, y} - p[[2]]], {x, -2,
                2}, {y, -2, 2}, Contours -> 10], {{q1, -1}, -3, 3}, {{q2, 1}, -3,
                3}, {{p, {{-1, 0}, {1, 0}}}, {-1, -1}, {1, 1}, Locator},
                Deployed -> True]


                I just put that in a notebook and called



                MakeWLFiddle[EvaluationNotebook]


                You can also select a subsection of a notebook and evaluate the same in a Button and it'll just package up the selected cells. This should work for any number of cells, but won't work for big data since I cooked everything into the URL query.



                Also look at the Options:



                {"ShortenURL" -> True, "BaseURL" -> Automatic}


                "BaseURL" can be an arbitrary URL or "Delayed" or "Embed".



                Warning: if WRI gets mad at me about this at any point this may disappear







                share|improve this answer












                share|improve this answer



                share|improve this answer










                answered Jan 20 at 3:06









                b3m2a1b3m2a1

                27.8k357161




                27.8k357161






























                    draft saved

                    draft discarded




















































                    Thanks for contributing an answer to Mathematica Stack Exchange!


                    • Please be sure to answer the question. Provide details and share your research!

                    But avoid



                    • Asking for help, clarification, or responding to other answers.

                    • Making statements based on opinion; back them up with references or personal experience.


                    Use MathJax to format equations. MathJax reference.


                    To learn more, see our tips on writing great answers.




                    draft saved


                    draft discarded














                    StackExchange.ready(
                    function () {
                    StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f189854%2fhow-can-i-make-a-webpage-where-people-can-evaluate-my-code%23new-answer', 'question_page');
                    }
                    );

                    Post as a guest















                    Required, but never shown





















































                    Required, but never shown














                    Required, but never shown












                    Required, but never shown







                    Required, but never shown

































                    Required, but never shown














                    Required, but never shown












                    Required, but never shown







                    Required, but never shown







                    Popular posts from this blog

                    Mario Kart Wii

                    What does “Dominus providebit” mean?

                    Antonio Litta Visconti Arese