Questions on the construction of 2D and 3D graphics through the direct use of primitives, directives, and functions. Include the graphics3d tag for questions specifically on 3D graphics. This tag is not to be used for basic questions on visualizing functions and lists using the various flavors of ...

learn more… | top users | synonyms

20
votes
1answer
574 views

Convert Graphics3D containing BSpline to polygon primitives for export to 3DS?

Graphics3D[] objects created with BSpline functions will not export to 3DS format, which only supports the more basic primitives. Is there any straightforward way ...
7
votes
2answers
1k views

Controlling the 2D $x–y$ aspect ratio of a 3D plot

I have some data representing a nested list, each element being composed of 3 real numbers like ...
2
votes
2answers
1k views

Animation of Differential Equations from NDSolve with ParametricPlot3D and Evaluate

I have a system of differential equations (referred to as "s") and use NDSolve to obtain the solution. I substitute the interpolated functions for the original ...
6
votes
2answers
393 views

How do I transform a rasterized graphic's coordinates back to its original ListPlot data coordinates?

From this question I successfully made an elliptical fit for my data. However, when I try and collect the datapoints within the ellipse via this question the coordinates of my ellipse correspond to an ...
10
votes
2answers
797 views

Preventing label crowding in PieChart RadialCallout and RadialCenter

Is it possible to avoid this unreadable situation with label crowding when using PieChart's RadialCallout and ...
3
votes
2answers
847 views

Plotting best-response functions

I'm a newbie in Mathematica. I'm trying to solve for two functions (best-response functions in a simple game), and then to plot the functions on the same graph. One function is p1 = resp1(p2) and the ...
33
votes
7answers
6k views

How can I draw the Olympic rings with Mathematica?

How can I draw the 5 interlocking Olympic rings with Mathematica? (SVG version) Edit Hard choice, but some pretty cool answers here. I didn't have 3D answers in mind when I posted the question ...
5
votes
2answers
575 views

Finding concave hull for separated small clusters

Data : data3D = Import[file, "VertexData"]; Graphics3D[Point[data3D]] How to find concave polygon for separated small clusters.
12
votes
2answers
1k views

Finding a Concave Hull

I have a 3d clustered data: Is there any other way to get concavehull of 3D data points?
4
votes
3answers
295 views

Exporting a rasterized Row of Graphics

I'm running some code based on @R.M.'s answer to this question to create a couple plots side by side. I want to export the plots rasterized to a png. However, when I ...
25
votes
1answer
395 views

Tool to locate bloat in a notebook?

In developing a notebook, I often find I have created a very boated file that takes a long time to save. I would like to slim it down. It is usually the result of graphics and images, but they may be ...
26
votes
5answers
1k views

Create magnified call-out loupe effect on image

I'm trying to create a Mathematica Manipulate that generates a graphical call-out using a 'loupe'-style or magnifying glass enlarger - a possible solution is shown ...
17
votes
3answers
1k views

Creating diagrams for category theory

Lately I've been doing algebra and I have found myself drawing a bunch of diagrams when I attempt to solve a problem. Most of the diagrams are very simple so I thought, I bet I can do this in ...
7
votes
2answers
856 views

How to insert guide-lines in graphics without specifying range?

Is it possible to insert guide lines in Graphics - for example a horizontal line through y=0 coordinate without specifying the range of the line? Originally I assumed Infinity might do the trick: ...
4
votes
1answer
684 views

Removing clipping masks from exported PDFs

I usually export graphics from Mathematica as PDFs which I tweak with Adobe Illustrator. When most plots are exported from Mathematica as PDFs they contain a large number of mostly useless clipping ...
2
votes
1answer
285 views

Hakim's Sphere in Mathematica?

Hakim El Hattab's Sphere, consists of only a handful of lines of Javascript, and would probably be even terser if written in Mathematica. How difficult would it be to "transcode" Mathematica to JS? ...
2
votes
2answers
111 views

How to pad Background size in Style calls

When highlighting text using Style and Background, as in ...
3
votes
1answer
302 views

Rough edges plotting a surface

I'm trying to use SphericalPlot3D to create some images of a surface but I get some rough edges on the surface around the boundary. However, after rotating the ...
7
votes
3answers
773 views

How to rotate TickMarks in DateListPlot?

Is there a way to rotate TickMarks in DateListPlot to avoid overlap, eg: Part of the code used to generate this is: ...
2
votes
2answers
229 views

Working around behaviour of EdgeRenderingFunction

One can make graphs GraphPlot[{1 -> 2, 2 -> 3, 3 -> 4, 4 -> 5, 5 -> 1, 1 -> 1, 5 -> 5}] and one can generalize the input such that one ...
2
votes
1answer
219 views

DynamicModule with constant image size

I am new to this forum - I wonder if someone can help me improve this code. I would like the angle $\theta$ to start in the middle of the slider i.e. $\theta = 0$ instead of starting at $\theta = ...
1
vote
1answer
308 views

ListPlot Inset coordinates problem

Inset seem better suited for ad-hoc labels and legends than for precision, programmatic placement of annotation. Given the following 'bottom-up' graphic expression: ...
18
votes
2answers
780 views

Is there a way to outline text?

If I have: Graphics[ {Red, EdgeForm[Directive[White, Thick]], Inset[Style[Text@"Hi!", 44], {0, 0}]}, Background -> Black ] I unfortunately get: ...
4
votes
1answer
136 views

Using Dynamic with UpdateInterval and EventHandler Together

I've been having some difficulty with the aforementioned use of these three functions/options and would greatly appreciate some help. I know that they're is probably an easy way of making a disk move ...
2
votes
2answers
206 views

Manipulating spacing in a text object

I want to visually illustrate substitution in a mathematical expression. This is an example: ...
7
votes
1answer
312 views

Color ramp banding in PDFKit when exporting Raster image Inset to PDF

Here I produce a Raster image with large uniformly colored rectangles and put it in an Inset: ...
10
votes
2answers
272 views

Two-sided slider getting stuck

I'm implementing a two-sided slider to be able to set upper and lower bound in just one slider: The problem is that it can get stuck when both locators are at the far left: And I'm unable to ...
9
votes
2answers
1k views

Epilog->Inset crops text with large font sizes

Why does Epilog->Inset crop the first and last letters here ("a" and "g") when FontSize is set to large values (which varies ...
5
votes
2answers
480 views

Inserting a jpeg image at a specified point in the XY-plane

I know how to import an image into Mathematica using the Import command. The original image can come from anywhere, but call this image "myimage" after importing ...
8
votes
3answers
339 views

Question about VertexTextureCoordinates

Background: consider the following snippet: ...
11
votes
5answers
996 views

How to texturize a Disk/Circle/Rectangle?

The documentation for Texture states that "other filled objects" can be texturized: Texture[obj] is a graphics directive ...
10
votes
1answer
281 views

Camera Troubles in Mathematica

I'm trying to animate a torus being cut by a plane, so that as the plane enters the torus the part in front of the plane disappears (the idea is to show the cross section). That much I can do, but I ...
4
votes
2answers
369 views

Dates as FrameTicks on a ListLinePlot

For reasons too lengthy to explain, I would like to display a list of dates or years (as numbers or strings) as FrameTicks on a ...
8
votes
1answer
872 views

How to position legends exactly where I want them?

I just noticed another plot legend question today and while user solutions to this, in particular code by @Jens, are IMO better than the built in solutions, exact positioning often still requires some ...
52
votes
2answers
42k views

Cutting bagels into linked halves

I recently came across this video: Mathematically correct breakfast, which shows how a bagel can be neatly sliced into two identical linked halves. I'd like to try this with Mathematica. Here's a ...
9
votes
2answers
955 views

How to calculate mix of 4 colors defined in CIELAB L*a*b* model?

I have 4 colors that I converted from RGB to CIELAB L*a*b* model. How can I calculate mix of these 4 colors when I have (L,a,b) for each such color? How can I ...
3
votes
2answers
609 views

X label in GraphicsColumn is cut off

I'm trying to use GraphicsColumn to plot two curves with very different ranges. for example, ...
0
votes
2answers
326 views

DateListPlot FillingStyle problem

In the following query, If the option PlotStyle->{Red,Blue} is inserted it works but FillingStyle->{Red,Blue} does not: ...
19
votes
3answers
1k views

Finding the centroid of a disk in an image

I got about 100 images of the sun and have to find the centre of the star in the images. I have binarized the images and used ComponentMeasurementsto find the ...
12
votes
2answers
398 views

Anti-aliasing with the multiple-object form of Polygon?

Observe: rand = RandomReal[1, {4, 3, 2}]; Graphics @ Polygon @ rand Graphics[Polygon /@ rand] I am losing ...
17
votes
4answers
3k views

ListPlot with plotmarkers determined by point

I am trying to build on a simple example here: td = Prime[Range[25]] dsk = Graphics[{Blue, Disk[]}] ListPlot[td, PlotMarkers -> {dsk, 0.7}] How can I make ...
1
vote
1answer
214 views

How do I slice an image of size “width × height” in n² pieces of size “width / n × height / n”?

Background: What I want is to make a jigsaw from an image. (A simple one where the pieces are polygons.) I have the following strategy in mind. Create a set of polygons and assign images (or just the ...
11
votes
3answers
1k views

Creating a Sierpinski gasket with the missing triangles filled in

I'm creating some questions for my math classes. The one below refers to the Sierpinski gasket. I found some great demonstrations to create the gasket. So that's good. Solving the problem is ...
5
votes
2answers
235 views

Applying different color to result of a geometric transformation

Background: consider the following two snippets. ...
76
votes
2answers
6k views

How to manipulate 2D plots?

When it comes to visual analysis, large datasets or data with intricate internal details often makes plotting in 2D useless, as the outcome is either just a fraction of the full dataset, or no details ...
4
votes
1answer
523 views

How to create tournament bracket

I'd like to create a tournament bracket using Mathematica. I've looked around online, but haven't found any examples yet. Can someone show me how to do this? Specifically, I'd like to have a ...
4
votes
2answers
279 views

remove quotes in a combination of a text with graphics in the JournalArticle Style

I have a puzzling and very specific question. It may be of limited interest to community. I apologize in advance in this case. Let us see. I am making an illustration to a text that I write in the ...
19
votes
2answers
1k views

How can I customize arrowhead shape to match common LaTeX styles?

How do I control the shape of my arrow heads? LaTeX's TikZ package has a wide variety of predefined arrowhead styles, some of which I'd like to try to match for Mathematica figures I'm importing into ...
2
votes
2answers
258 views

Varying plot sizes for identical PlotRanges in ListLinePlot, where one has a legend

I am trying to make some figures using ListLinePlot in Mathematica 8. Although the PlotRanges are the same, the resulting frame sizes are different. The only difference (as I see it) between the two ...
7
votes
1answer
439 views

Want Interactive PlotRange of Graphics[{}]

I am trying to do: ...