I have a Region defined and want to display this with extra graphical primitives. Please see the following code:
In[137]:= area = RegionUnion[Disk[{0, 0}, 2], Disk[{3, 0}, 3]];
In[138]:= stuff = List[Point[{0, 0}], Point[{3, 0}], Line[{{0, 0}, {3, 0}}]];
In[139]:= Graphics[stuff]
In[140]:= DiscretizeRegion[area]
What do i have to do to get the output into one picture? I tried a lot, but i don't have a real plan. Any help is highly appreciated!
