用Mathematica画房子

hjnk900

RT...房子要包含烟囱、窗户和门  
有谁会画吗？比如下图的这些样式，可否给一些代码的格式提示

色k

这是吃饱了撑的节奏么

hjnk900

回复 2# 色k


    我们老师吃饱了撑的...

isee

看来是作业，熟悉应用的。。。

hbghlyj

1. house = Graphics[{(*main house*)Brown, Rectangle[{0, 0}, {5, 4}],
2.    (*chimneys*)Blue, Rectangle[{1, 4}, {1.5, 5}], Rectangle[{3.5, 4}, {4, 5}],
3.    (*roof*)Red, Triangle[{{0, 4}, {2.5, 5}, {5, 4}}],
4.    (*windows*)LightBlue, Rectangle[{0.5, 1.5}, {1.5, 2.5}], Rectangle[{3, 1.5}, {4, 2.5}],
5.    (*door*)Green, Rectangle[{2, 0}, {2.75, 1}]},
6.    (*set options for house*)PlotRange -> {{-0.5, 5.5}, {-0.5, 5.5}}, AspectRatio -> Automatic, ImageSize -> Medium, Axes -> None]

复制代码