3

I would like to adopt this example How to create a Sierpinski triangle in LaTeX?, for a slightly modified Sierpinski triangle: The first step (the whole triangle is black) should be the same. Then in the second step, the three black triangles in the corners should only have a side length of 1/3 (instead of 1/2) of the side length of there "parent" triangle, and so on. Could someone help me with that, i've never used this "lindenmeyersystems" package...

Community
  • 1
aexl
  • 265
  • 2
  • 6
  • I do not believe that this graph theory construct can occur. A sierpinski triangle has a color number of 2. What you are describing requires three colors and as such is not longer either a Sierpinski Triangle or even a fractal defined by a lindenmeyar system. Try drawing what you describe by hand and then color in the triangles. – R. Schumacher May 04 '15 at 20:16
  • Here on page 19, you see the triangle, which I tried to describe: http://books.google.ch/books?id=flVeGoxUBogC&pg=PA7&hl=de&source=gbs_toc_r&cad=4#v=onepage&q&f=false – aexl May 04 '15 at 20:20
  • Er... Is that a Lindenmayer system? – cfr May 04 '15 at 20:42
  • 2
    @AlexS A Lindenmayer system is a formal grammar specification of a language. If you want to use the '\usetikzlibrary{lindenmayersystems}' package to draw this triangle then you need to develop the formal math rules that describe this variant of and S-triangle. If you need help with that, then take that question over to the stackoverflow for math of which you are a member. Then return here with a MWE if you have difficulty with the LaTeX implementation. – R. Schumacher May 04 '15 at 21:58
  • @R.Schumacher Oh, I didn't know that lindenberg system is such a thing, I just thought, is is a random name of a tikz package. The script does not have to use this lindenberg system package, I just thought it might be an easy task to adopt the code for drawing the regular sierpinski triangle, but I simply could not understand, what the code exactly does... But thank you for this information, I didn't know this. – aexl May 05 '15 at 00:34

1 Answers1

7

Something like that?

Done with MetaPost, inserted in a LuaLaTeX program.

\documentclass[border=2mm]{standalone}
\usepackage{luamplib}
\begin{document}
\begin{mplibcode}
  vardef Sierpinski_var(expr A, B, C, n) = % The recursive macro 
    if n = 0: filldraw A--B--C--cycle;
    else: 
      save AC, BC, AB; pair AC[], BC[], AB[];
      AC1 = 1/3[A,C]; AC2 = 2/3[A,C];
      BC1 = 1/3[B,C]; BC2 = 2/3[B,C];
      AB1 = 1/3[A,B]; AB2 = 2/3[A,B]; 
      draw AB1--AB2; draw BC1--BC2; draw AC1--AC2;
      Sierpinski_var(A, AB1, AC1, n-1); 
      Sierpinski_var(AC2, BC2, C, n-1); 
      Sierpinski_var(AB2, B, BC1, n-1);
    fi
  enddef;
  beginfig(1);
    u = 3cm; n = 4; 
    pair A, B, C; A = origin; B = u*right; C = u*dir 60;
    pair v; v = 1.1u*right; % translation vector
    for i = 0 upto 4: 
      draw image(Sierpinski_var(origin, u*right, u*dir 60, i);
        label.bot(textext("$A_" & decimal i & "$"), .5u*right))
        shifted (i*v);
    endfor;
  endfig;
\end{mplibcode}
\end{document}

enter image description here

Franck Pastor
  • 18,756
  • Oh wow, this is exactly what I'm looking for. I've never heard of lualatex, what is this exactly? Or what is the difference of the regular latex/pdflatex and lualatex? Is there an easy way to name these triangles with A_1, ..., A_5 below the triangles? – aexl May 05 '15 at 00:36
  • @AlexS You may consider LuaTeX the successor of pdfTeX: http://www.luatex.org/ One of its nice features is its integration of the MetaPost drawing program, which I used here: http://en.wikipedia.org/wiki/MetaPost – Franck Pastor May 05 '15 at 04:02
  • As for the labels: Yes it is possible, but not at all levels of recursion of course if they are meant to be all readable. I don't get the logica behing this denomination though: what are A1, A2… supposed to be? Summits or triangles? – Franck Pastor May 05 '15 at 04:04
  • I Just mean to label these steps from the left to the right with A_0, A_1, A_2, A_3 and A_4... – aexl May 05 '15 at 13:22
  • @AlexS This is done now. – Franck Pastor May 05 '15 at 15:37