Linked Questions

584 votes
19 answers
148k views

Where can I find examples of good Mathematica programming practice?

I consider myself a pretty good Mathematica programmer, but I'm always looking out for ways to either improve my way of doing things in Mathematica, or to see if there's something nifty that I haven't ...
88 votes
9 answers
18k views

How to make an inkblot?

How to effectively create a polygon that looks like a realistic inkblot? So far, I could come up with this (borrowing from Ed Pegg Jr.'s Rorschach demonstration): ...
user avatar
48 votes
2 answers
8k views

How to build a bvh (a motion capture file format) player in Mathematica?

How to build a bvh player that can be used to visualize human motions in Mathematica? Any idea or sample code would be appreciated. ...
user avatar
  • 4,541
34 votes
3 answers
2k views

xkcdConvert routines perform slower in Mathematica 9

I am experiencing some rather large performance decreases in Mathematica version 9.0 using the xkcd-styled plotting routines. I had used the xkcdConvert code ...
user avatar
  • 1,256
21 votes
4 answers
719 views

Reproducing the XKCD "Consensus New Year" plot

This xkcd strip for December 31, 2018 had the following plot: How may I use CountryData with DateListPlot (or other related ...
user avatar
13 votes
4 answers
3k views

Building a Noisy Function

Here's a nice function with a nice plot: f[t_] := Exp[-Abs[t]] Sin[t]; Plot[f[t], {t, -10, 10}, PlotRange -> All] What I would like to do is to make it noisy.....
user avatar
  • 65.7k
10 votes
4 answers
1k views

How can one draw a network with nodes and links in a grid shape?

I'd like to be able to use MMa's graphics to make something like this which I know must absolutely be possible (and probably easy) with MMa. I don't actually even need different colors (though that'd ...
user avatar
  • 3,002
23 votes
3 answers
2k views

Download xkcd Click and Drag comic

Inspired by the recent question about xkcd styled plots I started looking at xkcd again and I came across a comic titled Click and Drag. And if you do that, you start exploring a larger drawing. A ...
user avatar
  • 264k
14 votes
3 answers
882 views

How to make figures in a casual, old-fashioned style

I'm writing a math textbook and use Mathematica to make figures. However, like all modern software, Mathematica produces perfectly crisp mathematically accurate figures. Meanwhile, I feel that old-...
user avatar
  • 1,406
12 votes
3 answers
1k views

Custom edge style (e.g. brush stroke, writing ink, etc.)

I would like to draw a graph with Mathematica in such a way that it looks like a handmade drawing or painting. To be more precise, is there a way to set a custom edge style such that it looks made ...
user avatar
  • 235
13 votes
3 answers
10k views

Get polynomial interpolation formula

I'm attempting to get a polynomial interpolation formula out of Mathematica but I am absolutely lost. I stared out using ...
user avatar
  • 233
13 votes
1 answer
20k views

Enlarge the axes text

Plot[Sin[x^2], {x, 0, 3}, AxesLabel -> {"x value", Sin[x^2]}] In the above code give a graph. In the graph the axes fonts are too small. My problem is that, ...
user avatar
  • 233
2 votes
3 answers
12k views

How do I place frame ticks without having corresponding numbers? [duplicate]

Possible Duplicate: Remove tick labels, but retain tick marks in RegionPlot (and related functions) I need to display a 2D graph, say $y=x^2$ with tick-marks along the $x$ and $y$-axes but with ...
user avatar
5 votes
2 answers
811 views

Code for an iteration method

As I am new to writing code for Mathematica, I would really appreciate if someone could provide me the code for the following iteration process. For $x_0\in[1,2]=C$, $$x_{n+1}=(1-\alpha_n)Sx_n+\...
user avatar
11 votes
2 answers
2k views

Reproducing the xkcd "Self-Description" comic

Trying to brush up on my programming, I wanted to see if I can reproduce at least the first two panels of the following comic in Mathematica: I have some code for trying to reproduce the first panel, ...
user avatar

15 30 50 per page