Problem with Graphics`PolygonUtils`PolygonCombine

The name of the pictureThe name of the pictureThe name of the pictureClash Royale CLAN TAG#URR8PPP











up vote
7
down vote

favorite












Writing:



Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, 1] /. 
p : __Polygon :> Graphics`PolygonUtils`PolygonCombine[p]


I get:



enter image description here



but if I write:



Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. 
p : __Polygon :> Graphics`PolygonUtils`PolygonCombine[p]


I get:



enter image description here



How can I avoid this problem by having to use this function?







share|improve this question


























    up vote
    7
    down vote

    favorite












    Writing:



    Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, 1] /. 
    p : __Polygon :> Graphics`PolygonUtils`PolygonCombine[p]


    I get:



    enter image description here



    but if I write:



    Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. 
    p : __Polygon :> Graphics`PolygonUtils`PolygonCombine[p]


    I get:



    enter image description here



    How can I avoid this problem by having to use this function?







    share|improve this question
























      up vote
      7
      down vote

      favorite









      up vote
      7
      down vote

      favorite











      Writing:



      Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, 1] /. 
      p : __Polygon :> Graphics`PolygonUtils`PolygonCombine[p]


      I get:



      enter image description here



      but if I write:



      Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. 
      p : __Polygon :> Graphics`PolygonUtils`PolygonCombine[p]


      I get:



      enter image description here



      How can I avoid this problem by having to use this function?







      share|improve this question














      Writing:



      Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, 1] /. 
      p : __Polygon :> Graphics`PolygonUtils`PolygonCombine[p]


      I get:



      enter image description here



      but if I write:



      Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. 
      p : __Polygon :> Graphics`PolygonUtils`PolygonCombine[p]


      I get:



      enter image description here



      How can I avoid this problem by having to use this function?









      share|improve this question













      share|improve this question




      share|improve this question








      edited Aug 14 at 8:26









      Alexey Popkov

      37.5k4102254




      37.5k4102254










      asked Aug 14 at 7:51









      TeM

      1,643618




      1,643618




















          2 Answers
          2






          active

          oldest

          votes

















          up vote
          6
          down vote



          accepted










          A small modification of the original code solves the problem:



          Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. 
          p : __Polygon .. :> Graphics`PolygonUtils`PolygonCombine[p]



          output




          The new code also works for the initial problem.






          share|improve this answer




















          • Thanks, it works perfectly!
            – TeM
            Aug 14 at 8:44

















          up vote
          4
          down vote













          You can use Graphics`PolygonUtils`PolygonCombine on all polygons rather than on groups of polygons separately:



          pp = ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] ;
          allpolygons = Join @@ Cases[Normal@pp, __Polygon, Infinity];
          Graphics[ EdgeForm[Darker@LightBlue], Opacity[.5, LightBlue],
          Graphics`PolygonUtils`PolygonCombine[allpolygons], Options[pp]]


          enter image description here






          share|improve this answer
















          • 1




            (+1) Or simpler: Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. p : __Polygon .. :> Graphics`PolygonUtils`PolygonCombine[p].
            – Alexey Popkov
            Aug 14 at 8:36










          • @AlexeyPopkov, i could have sworn that I tried that first; somehow it didn't work then:) You might want to post that as an answer.
            – kglr
            Aug 14 at 8:38











          • Simply brilliant, thanks to both! P.S .: is it possible to find a list of the unofficial features of Wolfram Mathematica?
            – TeM
            Aug 14 at 8:43






          • 1




            @TeM, some are collected in What are some useful, undocumented Mathematica functions?
            – kglr
            Aug 14 at 8:57










          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',
          convertImagesToLinks: false,
          noModals: false,
          showLowRepImageUploadWarning: true,
          reputationToPostImages: null,
          bindNavPrevention: true,
          postfix: "",
          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%2f179987%2fproblem-with-graphicspolygonutilspolygoncombine%23new-answer', 'question_page');

          );

          Post as a guest






























          2 Answers
          2






          active

          oldest

          votes








          2 Answers
          2






          active

          oldest

          votes









          active

          oldest

          votes






          active

          oldest

          votes








          up vote
          6
          down vote



          accepted










          A small modification of the original code solves the problem:



          Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. 
          p : __Polygon .. :> Graphics`PolygonUtils`PolygonCombine[p]



          output




          The new code also works for the initial problem.






          share|improve this answer




















          • Thanks, it works perfectly!
            – TeM
            Aug 14 at 8:44














          up vote
          6
          down vote



          accepted










          A small modification of the original code solves the problem:



          Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. 
          p : __Polygon .. :> Graphics`PolygonUtils`PolygonCombine[p]



          output




          The new code also works for the initial problem.






          share|improve this answer




















          • Thanks, it works perfectly!
            – TeM
            Aug 14 at 8:44












          up vote
          6
          down vote



          accepted







          up vote
          6
          down vote



          accepted






          A small modification of the original code solves the problem:



          Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. 
          p : __Polygon .. :> Graphics`PolygonUtils`PolygonCombine[p]



          output




          The new code also works for the initial problem.






          share|improve this answer












          A small modification of the original code solves the problem:



          Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. 
          p : __Polygon .. :> Graphics`PolygonUtils`PolygonCombine[p]



          output




          The new code also works for the initial problem.







          share|improve this answer












          share|improve this answer



          share|improve this answer










          answered Aug 14 at 8:43









          Alexey Popkov

          37.5k4102254




          37.5k4102254











          • Thanks, it works perfectly!
            – TeM
            Aug 14 at 8:44
















          • Thanks, it works perfectly!
            – TeM
            Aug 14 at 8:44















          Thanks, it works perfectly!
          – TeM
          Aug 14 at 8:44




          Thanks, it works perfectly!
          – TeM
          Aug 14 at 8:44










          up vote
          4
          down vote













          You can use Graphics`PolygonUtils`PolygonCombine on all polygons rather than on groups of polygons separately:



          pp = ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] ;
          allpolygons = Join @@ Cases[Normal@pp, __Polygon, Infinity];
          Graphics[ EdgeForm[Darker@LightBlue], Opacity[.5, LightBlue],
          Graphics`PolygonUtils`PolygonCombine[allpolygons], Options[pp]]


          enter image description here






          share|improve this answer
















          • 1




            (+1) Or simpler: Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. p : __Polygon .. :> Graphics`PolygonUtils`PolygonCombine[p].
            – Alexey Popkov
            Aug 14 at 8:36










          • @AlexeyPopkov, i could have sworn that I tried that first; somehow it didn't work then:) You might want to post that as an answer.
            – kglr
            Aug 14 at 8:38











          • Simply brilliant, thanks to both! P.S .: is it possible to find a list of the unofficial features of Wolfram Mathematica?
            – TeM
            Aug 14 at 8:43






          • 1




            @TeM, some are collected in What are some useful, undocumented Mathematica functions?
            – kglr
            Aug 14 at 8:57














          up vote
          4
          down vote













          You can use Graphics`PolygonUtils`PolygonCombine on all polygons rather than on groups of polygons separately:



          pp = ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] ;
          allpolygons = Join @@ Cases[Normal@pp, __Polygon, Infinity];
          Graphics[ EdgeForm[Darker@LightBlue], Opacity[.5, LightBlue],
          Graphics`PolygonUtils`PolygonCombine[allpolygons], Options[pp]]


          enter image description here






          share|improve this answer
















          • 1




            (+1) Or simpler: Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. p : __Polygon .. :> Graphics`PolygonUtils`PolygonCombine[p].
            – Alexey Popkov
            Aug 14 at 8:36










          • @AlexeyPopkov, i could have sworn that I tried that first; somehow it didn't work then:) You might want to post that as an answer.
            – kglr
            Aug 14 at 8:38











          • Simply brilliant, thanks to both! P.S .: is it possible to find a list of the unofficial features of Wolfram Mathematica?
            – TeM
            Aug 14 at 8:43






          • 1




            @TeM, some are collected in What are some useful, undocumented Mathematica functions?
            – kglr
            Aug 14 at 8:57












          up vote
          4
          down vote










          up vote
          4
          down vote









          You can use Graphics`PolygonUtils`PolygonCombine on all polygons rather than on groups of polygons separately:



          pp = ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] ;
          allpolygons = Join @@ Cases[Normal@pp, __Polygon, Infinity];
          Graphics[ EdgeForm[Darker@LightBlue], Opacity[.5, LightBlue],
          Graphics`PolygonUtils`PolygonCombine[allpolygons], Options[pp]]


          enter image description here






          share|improve this answer












          You can use Graphics`PolygonUtils`PolygonCombine on all polygons rather than on groups of polygons separately:



          pp = ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] ;
          allpolygons = Join @@ Cases[Normal@pp, __Polygon, Infinity];
          Graphics[ EdgeForm[Darker@LightBlue], Opacity[.5, LightBlue],
          Graphics`PolygonUtils`PolygonCombine[allpolygons], Options[pp]]


          enter image description here







          share|improve this answer












          share|improve this answer



          share|improve this answer










          answered Aug 14 at 8:32









          kglr

          158k8182379




          158k8182379







          • 1




            (+1) Or simpler: Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. p : __Polygon .. :> Graphics`PolygonUtils`PolygonCombine[p].
            – Alexey Popkov
            Aug 14 at 8:36










          • @AlexeyPopkov, i could have sworn that I tried that first; somehow it didn't work then:) You might want to post that as an answer.
            – kglr
            Aug 14 at 8:38











          • Simply brilliant, thanks to both! P.S .: is it possible to find a list of the unofficial features of Wolfram Mathematica?
            – TeM
            Aug 14 at 8:43






          • 1




            @TeM, some are collected in What are some useful, undocumented Mathematica functions?
            – kglr
            Aug 14 at 8:57












          • 1




            (+1) Or simpler: Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. p : __Polygon .. :> Graphics`PolygonUtils`PolygonCombine[p].
            – Alexey Popkov
            Aug 14 at 8:36










          • @AlexeyPopkov, i could have sworn that I tried that first; somehow it didn't work then:) You might want to post that as an answer.
            – kglr
            Aug 14 at 8:38











          • Simply brilliant, thanks to both! P.S .: is it possible to find a list of the unofficial features of Wolfram Mathematica?
            – TeM
            Aug 14 at 8:43






          • 1




            @TeM, some are collected in What are some useful, undocumented Mathematica functions?
            – kglr
            Aug 14 at 8:57







          1




          1




          (+1) Or simpler: Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. p : __Polygon .. :> Graphics`PolygonUtils`PolygonCombine[p].
          – Alexey Popkov
          Aug 14 at 8:36




          (+1) Or simpler: Normal@ParametricPlot[x, x^2 t, x, 0, 2, t, 0, .1] /. p : __Polygon .. :> Graphics`PolygonUtils`PolygonCombine[p].
          – Alexey Popkov
          Aug 14 at 8:36












          @AlexeyPopkov, i could have sworn that I tried that first; somehow it didn't work then:) You might want to post that as an answer.
          – kglr
          Aug 14 at 8:38





          @AlexeyPopkov, i could have sworn that I tried that first; somehow it didn't work then:) You might want to post that as an answer.
          – kglr
          Aug 14 at 8:38













          Simply brilliant, thanks to both! P.S .: is it possible to find a list of the unofficial features of Wolfram Mathematica?
          – TeM
          Aug 14 at 8:43




          Simply brilliant, thanks to both! P.S .: is it possible to find a list of the unofficial features of Wolfram Mathematica?
          – TeM
          Aug 14 at 8:43




          1




          1




          @TeM, some are collected in What are some useful, undocumented Mathematica functions?
          – kglr
          Aug 14 at 8:57




          @TeM, some are collected in What are some useful, undocumented Mathematica functions?
          – kglr
          Aug 14 at 8:57

















           

          draft saved


          draft discarded















































           


          draft saved


          draft discarded














          StackExchange.ready(
          function ()
          StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f179987%2fproblem-with-graphicspolygonutilspolygoncombine%23new-answer', 'question_page');

          );

          Post as a guest













































































          Comments

          Popular posts from this blog

          Long meetings (6-7 hours a day): Being “babysat” by supervisor

          Is the Concept of Multiple Fantasy Races Scientifically Flawed? [closed]

          Confectionery