おもしろいコマンドや１行プログラムなどきぼーん。
おいらは
DensityPlot[Sin[x/y], {x, -10, 10}, {y, -3, 3}, PlotPoints -> 500, Mesh -> False];
↑こんな図とか好き。