The Stack Overflow podcast is back! Listen to an interview with our new CEO.

3 added 352 characters in body

I have a "named" point in Mathematica 10 and am plotting it like this using RegionPlot:

    $$PointStyle = Directive@{PointSize[Large], Red}; Show[RegionPlot[ { curve["path to camp"], point["camp location"] }, Method -> {"DiscretizationMethod" -> "Symbolic"}, PlotStyle -> {$$$$PointStyle = Directive@{PointSize[1], Red}; distanceX = Sqrt[(x - 8000)^2 + y^2]; distanceY = Sqrt[x^2 + y^2]; rate1 = 45; rate2 = 60; point["camp location"] = Point[{8000, 0}]; curve["Circle of Apollonius"] = ImplicitRegion[distanceX/distanceY == rate1/rate2, {x, y}]; Show[ RegionPlot[{curve["Circle of Apollonius"], point["camp location"]}, Method -> {"DiscretizationMethod" -> "Symbolic"}, PlotRange -> {{0, 40000}, {-20000, 20000}}, PlotStyle -> {$$PointStyle}, etc... more parameters]]]]


As can be seen in the output the dot is kind of small. Unfortunately, the plot is not using my attempt to change the PointSize directive and plots the point as a small period-sized dot no matter what. How can I change the size of the dot?

I tried using a separate ListPlot inside of the Show, but in this case no dot appears at all:

    $$PointStyle = Directive@{PointSize[Large], Red}; Show[{ RegionPlot[{ curve["path to camp"] }, Method -> {"DiscretizationMethod" -> "Symbolic"}], ListPlot[{ point["camp location"]}, PlotStyle -> {$$PointStyle}]}]


I have a "named" point in Mathematica 10 and am plotting it like this using RegionPlot:

    $$PointStyle = Directive@{PointSize[Large], Red}; Show[RegionPlot[ { curve["path to camp"], point["camp location"] }, Method -> {"DiscretizationMethod" -> "Symbolic"}, PlotStyle -> {$$PointStyle}, etc... more parameters]]


Unfortunately, the plot is not using my attempt to change the PointSize directive and plots the point as a small period-sized dot no matter what. How can I change the size of the dot?

I tried using a separate ListPlot inside of the Show, but in this case no dot appears at all:

    $$PointStyle = Directive@{PointSize[Large], Red}; Show[{ RegionPlot[{ curve["path to camp"] }, Method -> {"DiscretizationMethod" -> "Symbolic"}], ListPlot[{ point["camp location"]}, PlotStyle -> {$$PointStyle}]}]


I have a "named" point in Mathematica 10 and am plotting it like this using RegionPlot:

  $$PointStyle = Directive@{PointSize[1], Red}; distanceX = Sqrt[(x - 8000)^2 + y^2]; distanceY = Sqrt[x^2 + y^2]; rate1 = 45; rate2 = 60; point["camp location"] = Point[{8000, 0}]; curve["Circle of Apollonius"] = ImplicitRegion[distanceX/distanceY == rate1/rate2, {x, y}]; Show[ RegionPlot[{curve["Circle of Apollonius"], point["camp location"]}, Method -> {"DiscretizationMethod" -> "Symbolic"}, PlotRange -> {{0, 40000}, {-20000, 20000}}, PlotStyle -> {$$PointStyle}]]


As can be seen in the output the dot is kind of small. Unfortunately, the plot is not using my attempt to change the PointSize directive and plots the point as a small period-sized dot no matter what. How can I change the size of the dot?

I tried using a separate ListPlot inside of the Show, but in this case no dot appears at all:

    $$PointStyle = Directive@{PointSize[Large], Red}; Show[{ RegionPlot[{ curve["path to camp"] }, Method -> {"DiscretizationMethod" -> "Symbolic"}], ListPlot[{ point["camp location"]}, PlotStyle -> {$$PointStyle}]}]

2 showed response to comment

I have a "named" point in Mathematica 10 and am plotting it like this using RegionPlot:

    $$PointStyle = Directive@{PointSize[Large], Red}; Show[RegionPlot[ { curve["path to camp"], point["camp location"] }, Method -> {"DiscretizationMethod" -> "Symbolic"}, PlotStyle -> {$$PointStyle}, etc... more parameters]]


Unfortunately, the plot is not using my attempt to change the PointSize directive and plots the point as a small period-sized dot no matter what. How can I change the size of the dot?

I tried using a separate ListPlot inside of the Show, but in this case no dot appears at all:

    $$PointStyle = Directive@{PointSize[Large], Red}; Show[{ RegionPlot[{ curve["path to camp"] }, Method -> {"DiscretizationMethod" -> "Symbolic"}], ListPlot[{ point["camp location"]}, PlotStyle -> {$$PointStyle}]}]


I have a "named" point in Mathematica 10 and am plotting it like this using RegionPlot:

    $$PointStyle = Directive@{PointSize[Large], Red}; Show[RegionPlot[ { curve["path to camp"], point["camp location"] }, Method -> {"DiscretizationMethod" -> "Symbolic"}, PlotStyle -> {$$PointStyle}, etc... more parameters]]


Unfortunately, the plot is not using my attempt to change the PointSize directive and plots the point as a small period-sized dot no matter what. How can I change the size of the dot?

I have a "named" point in Mathematica 10 and am plotting it like this using RegionPlot:

    $$PointStyle = Directive@{PointSize[Large], Red}; Show[RegionPlot[ { curve["path to camp"], point["camp location"] }, Method -> {"DiscretizationMethod" -> "Symbolic"}, PlotStyle -> {$$PointStyle}, etc... more parameters]]


Unfortunately, the plot is not using my attempt to change the PointSize directive and plots the point as a small period-sized dot no matter what. How can I change the size of the dot?

I tried using a separate ListPlot inside of the Show, but in this case no dot appears at all:

    $$PointStyle = Directive@{PointSize[Large], Red}; Show[{ RegionPlot[{ curve["path to camp"] }, Method -> {"DiscretizationMethod" -> "Symbolic"}], ListPlot[{ point["camp location"]}, PlotStyle -> {$$PointStyle}]}]

1

# Controlling PointSize in a RegionPlot

I have a "named" point in Mathematica 10 and am plotting it like this using RegionPlot:

    $$PointStyle = Directive@{PointSize[Large], Red}; Show[RegionPlot[ { curve["path to camp"], point["camp location"] }, Method -> {"DiscretizationMethod" -> "Symbolic"}, PlotStyle -> {$$PointStyle}, etc... more parameters]]


Unfortunately, the plot is not using my attempt to change the PointSize directive and plots the point as a small period-sized dot no matter what. How can I change the size of the dot?