Mathematica数据处理(8)--美化(上)

    xiaoxiao2025-04-20  10

    今天我们来讲一下关于Plot画出图的美化

    说是美化,其实就是关于一些画图选项,我会分三篇文章讲完

    下面的是这次会用到的

    一些函数, Dash 虚线, Thick 粗细, Opacity 透明度, ImageSize 图像大小,

    PlotRange 画图范围 AspectRatio 宽高比;

    Plot[Sin[x], {x, 0, 2 Pi}]

    这是默认情况下的图

    下面我们想改变线的颜色和虚实

    Plot[Sin[x], {x, 0, 2 Pi}, PlotStyle -> {Red, Dashed}]

    得到下面的图

    那么如何在一个坐标系中画出两条不一样的线呢

    这里就要用到 Directive这个函数

    Plot[{Sin[x], Cos[x]}, {x, 0, 6 Pi}, PlotStyle -> { Directive[Red, Dashed, Thick], Directive[Blue, Opacity[.5], Thickness[.01]] }, AspectRatio -> .5, ImageSize -> Large ]

    得到下面的图

    下面看一下对于散点图如何来美化

    ListPlot[Prime[Range[25]]]

    的到下面的图

    我们想要改变点的颜色,形状,并把线连起来

    ListPlot[ Prime[Range[25]], PlotStyle -> {Dashed, Black}, Joined -> True, Mesh -> All, PlotMarkers -> {Graphics[Circle[{0, 0}, 1]], .03}, ImageSize -> Large ]

    的到下面的图

    我们看一下PlotRange的一些其他的用处

    Plot[Sin[x], {x, 0, 2 Pi},PlotRange -> {{Pi/2 - .005, Pi/2 + .005}, {0.99999, 1}}]

    注意看坐标

    对的,其实每一条曲线都是有直线段组成的

    你们可以试一下下面这段代码

    Manipulate[Plot[Sin[x]*a, {x, 0, 6}, PlotRange -> {{0, 6}, {-2, 2}}], {a, 0, 2}] Manipulate[Plot[Sin[x]*a, {x, 0, 6}], {a, 0, 2}]

    我就截个屏

    这是关于图形美化的第一篇,还会有两篇

    2016/8/14

    以上,所有

    转载请注明原文地址: https://ju.6miu.com/read-1298277.html
    最新回复(0)