Tutorial 2 -  List, Table, Array

         ECE Generic - University of Houston

              Han Q Le (c) -copyrighted 

1. List basic

1.1 General discussion

Sometimes, data is not just one single item, for example:

Out[36]=

social network Tutorial_2_answer_1.gif Tutorial_2_answer_2.gif Tutorial_2_answer_3.gif Tutorial_2_answer_4.gif Tutorial_2_answer_5.gif Tutorial_2_answer_6.gif Tutorial_2_answer_7.gif
market share 0.46 0.29 0.02 0.04 0.04 0.06 0.09

Variable “social network” is not just one thing, but a List of things. Likewise for variable “market share”. How do we represent such a variable?

Graphics:PlotLabel /. Options[{marketshare = {0.46, 0.29,
        0.02, 0.04, 0.04, 0.06, 0.09} ;, ,
        RowBox[{RowBox[{socialnetwork, =, RowBox[{{,
        RowBox[{GraphicsBox[TagBox[RasterBox[NumericArray[<18,45,3>,
        UnsignedInteger8], {{0, 18}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 18}, PlotRange -> {{0, 45}, {0,
        18}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<25,45,3>,
        UnsignedInteger8], {{0, 25}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSize -> {61.3636, Automatic}, ImageSizeRaw -> {45,
        25}, PlotRange -> {{0, 45}, {0, 25}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<25,45,3>,
        UnsignedInteger8], {{0, 25}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSize -> {68.6364, Automatic}, ImageSizeRaw -> {45,
        25}, PlotRange -> {{0, 45}, {0, 25}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<12,45,3>,
        UnsignedInteger8], {{0, 12}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSize -> {77.7273, Automatic}, ImageSizeRaw -> {45,
        12}, PlotRange -> {{0, 45}, {0, 12}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<45,45,3>,
        UnsignedInteger8], {{0, 45}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 45}, PlotRange -> {{0, 45}, {0,
        45}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<45,45,3>,
        UnsignedInteger8], {{0, 45}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 45}, PlotRange -> {{0, 45}, {0,
        45}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<20,45,3>,
        UnsignedInteger8], {{0, 20}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSize -> {61.3636, Automatic}, ImageSizeRaw -> {45,
        20}, PlotRange -> {{0, 45}, {0, 20}}]}], }}]}], ;}]}]

In other words, a List is a 1-dimensional array, formed by:  { , , , ,...} ; Note that the separator is , NOT semiconlon ;

One way to remember the separator syntax is this:  .csv: comma-separated value. In Mathematica, just like in C++, Python, semicolon ; is for terminating a statement.

There is another thing worth noticing: socialnetwork is a list of items, but each item is not a number, but an image. We will learn later on that Mathematica, like any other advanced language, deals with objects that can be anything as a single entity.

Another example, a grocery shopping List.

Out[33]=

item unit
juice 3
eggs 4
fruits 12
vegetables 8
milk 2
cereals 6
coffee 1
tea 2
ice cream 3
napkins 5
foils 2
storage bags 10
toothpaste 4
shampoo 3
detergent 2

Variable “item” is the List of grocery item to be shopped, and variable “unit” is the List of number of units to be purchased.

Exercise 1.1

Define a variable groceryitem that contains data of the first column, and groceryunit that contains the data in the second column. Note that a variable value that is a string requires quotation mark, such as “storage bags”.

Answer

In[70]:=

Tutorial_2_answer_9.gif

1.2 Compared with other languages

All programming languages that are at a higher level than Assembly language allow data structure of multiple items, known as “array”. Usually it is a sequential block of memory that can be addressed by a single variable name, and the index points to the content of the position in the memory block.

Example from C++:
Tutorial_2_answer_10.gif

In Mathematica, Python, R, and some other languages, we use array with a more elevated concept: List, which is an ordered set of objects that may allow mixing of different types of variables. But first, let’s compare the syntax. Similar to C++, Mathematica uses curly brackets: {}, unlike Python with [] (A most common habit twister when switching between Mathematica and Python is the [] and () for function and {} for list).

Tutorial_2_answer_11.gif

Tutorial_2_answer_12.gif

Tutorial_2_answer_13.gif

1.3 Generalized data and variables

Any object data (or data object) can be a named variable.

In[1]:=

Tutorial_2_answer_14.gif

Out[2]=

Tutorial_2_answer_15.png

In[3]:=

Graphics:PlotLabel /. Options[{RowBox[{RowBox[{pict, =,
        GraphicsBox[TagBox[RasterBox[NumericArray[<188,300,3>,
        UnsignedInteger8], {{0, 188}, {300, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {300, 188}, PlotRange -> {{0, 300}, {0,
        188}}]}],  , ;}], , pict}]

Out[4]=

Tutorial_2_answer_17.gif

Exercise 1.2

Use your computer webcam to take a picture of yourself and name “mypict”. If you don’t have one, just download from your phone or your social media page. The function to use is:

In[56]:=

Tutorial_2_answer_18.png

After you capture an image, name it mypict, then verify you have it by calling mypict.

Answer (this is only an example - delete, replace with yours)

In[57]:=

Graphics:PlotLabel /. Options[{RowBox[{RowBox[{mypict, =,
        GraphicsBox[TagBox[RasterBox[NumericArray[<240,320,3>,
        UnsignedInteger8], {{0, 240}, {320, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True, MetaInformation ->
        Association[System`Convert`CommonDump`ConvertText[Exif,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}]
        ->
        Association[System`Convert`CommonDump`ConvertText[DateTime,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}]
        -> DateObject[{2019, 1, 29, 21, 46, 8.337},
        System`Convert`CommonDump`ConvertText[Instant,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        System`Convert`CommonDump`ConvertText[Gregorian,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        -6.], System`Convert`CommonDump`ConvertText[PixelXDimension,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}]
        -> 320,
        System`Convert`CommonDump`ConvertText[PixelYDimension,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}]
        -> 240, System`Convert`CommonDump`ConvertText[TimeZoneOffset,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}]
        -> -6., System`Convert`CommonDump`ConvertText[Software,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}]
        -> System`Convert`CommonDump`ConvertText[Created with the
        Wolfram Language : www.wolfram.com,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities ->
        MathML}]]]], Selectable -> False], DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {320, 240}, PlotRange -> {{0, 320}, {0,
        240}}]}], ;}], , mypict}]

Out[58]=

Tutorial_2_answer_20.gif

END exercise

Now, we will try a sound data object:

In[7]:=

Tutorial_2_answer_21.gif

In[8]:=

Tutorial_2_answer_22.png

Out[8]=

Tutorial_2_answer_23.gif

In[9]:=

Tutorial_2_answer_24.png

Here we learn a syntax of Mathematica: instead of using [], we can also use @ (which means apply, such as applying the function to the variable. Example:

In[4]:=

Tutorial_2_answer_25.png

Out[4]=

Tutorial_2_answer_26.png

In[5]:=

Tutorial_2_answer_27.png

Out[5]=

Tutorial_2_answer_28.png

Exercise 1.3 Record your student ID info

Use this function: SystemDialogInput[“RecordSound”] to record a sound object: “saying your name, and student ID” for example: “John Doe <pause>  0987654321”. Recommended setting: 22 kHz, 16-bit, mono.

Tutorial_2_answer_29.png

then apply EmitSound[myID] to verify it you have the data.
Check with SpeechRecognize[myID]

An alternative function is AudioCapture[]

Answer

In[50]:=

Tutorial_2_answer_30.png

Out[50]=

Tutorial_2_answer_31.gif

In[51]:=

Tutorial_2_answer_32.png

Out[51]=

Tutorial_2_answer_33.png

Exercise 1.4 Synthesize your spoken student ID

We can use function Speak to generate an immediate system sound, like this

In[1]:=

Tutorial_2_answer_34.png

However, it doesn’t give us a sound object. We can use a different function SpeechSynthesize

However, we need to choose a voice style, check your computer voice styles:

In[2]:=

Tutorial_2_answer_35.png

Out[2]=

Tutorial_2_answer_36.png

Now, define a variable for a string that contains your name and student ID. Then generate a speech based on that string named it myIDsynth

Answer

In[3]:=

Tutorial_2_answer_37.gif

In[5]:=

Tutorial_2_answer_38.png

Out[5]=

Tutorial_2_answer_39.png

In[6]:=

Tutorial_2_answer_40.png

In[7]:=

Tutorial_2_answer_41.gif

Out[7]=

Tutorial_2_answer_42.gif

1.4 List of different types of object: concept of record, database

In[61]:=

In[43]:=

Tutorial_2_answer_44.png

Out[43]=

Exercise 1.5 Create a list of your personal data as shown below

Tutorial_2_answer_46.gif

Answer (replace the below with your info)

Tutorial_2_answer_47.gif

In[3]:=

Tutorial_2_answer_48.png

Out[3]=

Tutorial_2_answer_49.gif

END exercise

Additional examples:

Tutorial_2_answer_50.png

Out[6]=

Tutorial_2_answer_51.png

In[24]:=

Tutorial_2_answer_52.gif

Out[24]=

Tutorial_2_answer_53.gif

In[18]:=

Tutorial_2_answer_54.gif

Out[18]=

Tutorial_2_answer_55.gif

1.5 Reference elements of a List

In[66]:=

Graphics:PlotLabel /. Options[{RowBox[{RowBox[{x2, =,
        RowBox[{{,
        RowBox[{GraphicsBox[TagBox[RasterBox[NumericArray[<150,150,3>,
        UnsignedInteger8], {{0, 150}, {150, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageResolution -> {96, 96}, Interleaving -> True],
        Selectable -> False], DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {150, 150}, PlotRange -> {{0, 150}, {0,
        150}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<150,150,3>,
        UnsignedInteger8], {{0, 150}, {150, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageResolution -> {120, 120}, Interleaving -> True],
        Selectable -> False], DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {150, 150}, PlotRange -> {{0, 150}, {0,
        150}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<150,150,3>,
        UnsignedInteger8], {{0, 150}, {150, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageResolution -> {150, 150}, Interleaving -> True],
        Selectable -> False], DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {150, 150}, PlotRange -> {{0, 150}, {0,
        150}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<150,150,3>,
        UnsignedInteger8], {{0, 150}, {150, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageResolution -> {150, 150}, Interleaving -> True],
        Selectable -> False], DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {150, 150}, PlotRange -> {{0, 150}, {0,
        150}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<150,150,3>,
        UnsignedInteger8], {{0, 150}, {150, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageResolution -> {150, 150}, Interleaving -> True],
        Selectable -> False], DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {150, 150}, PlotRange -> {{0, 150}, {0,
        150}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<150,150,3>,
        UnsignedInteger8], {{0, 150}, {150, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageResolution -> {150, 150}, Interleaving -> True],
        Selectable -> False], DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {150, 150}, PlotRange -> {{0, 150}, {0,
        150}}]}], }}]}], ;}], , Manipulate[x2[[n]]
        &nbsp;&nbsp;(*&nbsp;&nbsp;double square
        bracket&nbsp;&nbsp;*), {n, {1, 2, 3, 4, 5, 6},
        ControlType&rarr; SetterBar}]}]

Out[67]=

Tutorial_2_answer_58.png

Tutorial_2_answer_59.png

Tutorial_2_answer_60.png

Tutorial_2_answer_61.png

Tutorial_2_answer_62.png

Tutorial_2_answer_63.png

Tutorial_2_answer_64.png

Tutorial_2_answer_65.png

Tutorial_2_answer_66.png

Tutorial_2_answer_67.png

Tutorial_2_answer_68.png

Tutorial_2_answer_69.png

Tutorial_2_answer_70.png

One can embed the data inside a Manipulate object, so that one doesn’t have to execute statements outside or prior to the Manipulate object.

In[73]:=

Tutorial_2_answer_71.gif

In[38]:=

Graphics:PlotLabel /. Options[{RowBox[{RowBox[{x2, =,
        RowBox[{{,
        RowBox[{GraphicsBox[TagBox[RasterBox[NumericArray[<150,150,3>,
        UnsignedInteger8], {{0, 150}, {150, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageResolution -> {96, 96}, Interleaving -> True],
        Selectable -> False], DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {150, 150}, PlotRange -> {{0, 150}, {0,
        150}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<150,150,3>,
        UnsignedInteger8], {{0, 150}, {150, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageResolution -> {120, 120}, Interleaving -> True],
        Selectable -> False], DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {150, 150}, PlotRange -> {{0, 150}, {0,
        150}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<150,150,3>,
        UnsignedInteger8], {{0, 150}, {150, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageResolution -> {150, 150}, Interleaving -> True],
        Selectable -> False], DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {150, 150}, PlotRange -> {{0, 150}, {0,
        150}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<150,150,3>,
        UnsignedInteger8], {{0, 150}, {150, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageResolution -> {150, 150}, Interleaving -> True],
        Selectable -> False], DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {150, 150}, PlotRange -> {{0, 150}, {0,
        150}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<150,150,3>,
        UnsignedInteger8], {{0, 150}, {150, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageResolution -> {150, 150}, Interleaving -> True],
        Selectable -> False], DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {150, 150}, PlotRange -> {{0, 150}, {0,
        150}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<150,150,3>,
        UnsignedInteger8], {{0, 150}, {150, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageResolution -> {150, 150}, Interleaving -> True],
        Selectable -> False], DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {150, 150}, PlotRange -> {{0, 150}, {0,
        150}}]}], }}]}], ;}], , Manipulate[pict, {pict, x2,
        ControlType&rarr; SetterBar} ]}]

Tutorial_2_answer_73.gif

Tutorial_2_answer_74.gif

Tutorial_2_answer_75.gif

2. Examples of using List objects

2.1 List - graphics example 1

Here, just to change the subject to make it more interesting, we’ll do some example in business, marketing instead of just engineering.

Let’s do this exercise: generate this graphics:

Tutorial_2_answer_76.gif

2.1.1 Step 1: data

Graphics:PlotLabel /. Options[{marketshare = {0.46, 0.29,
        0.02, 0.04, 0.04, 0.06, 0.09} ;, ,
        RowBox[{RowBox[{socialnetwork, =, RowBox[{{,
        RowBox[{GraphicsBox[TagBox[RasterBox[NumericArray[<18,45,3>,
        UnsignedInteger8], {{0, 18}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 18}, PlotRange -> {{0, 45}, {0,
        18}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<25,45,3>,
        UnsignedInteger8], {{0, 25}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 25}, PlotRange -> {{0, 45}, {0,
        25}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<25,45,3>,
        UnsignedInteger8], {{0, 25}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 25}, PlotRange -> {{0, 45}, {0,
        25}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<12,45,3>,
        UnsignedInteger8], {{0, 12}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 12}, PlotRange -> {{0, 45}, {0,
        12}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<45,45,3>,
        UnsignedInteger8], {{0, 45}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 45}, PlotRange -> {{0, 45}, {0,
        45}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<45,45,3>,
        UnsignedInteger8], {{0, 45}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 45}, PlotRange -> {{0, 45}, {0,
        45}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<20,45,3>,
        UnsignedInteger8], {{0, 20}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 20}, PlotRange -> {{0, 45}, {0,
        20}}]}], }}]}], ;}]}]

Tutorial_2_answer_78.gif   Below are equivalent examples in R (open cell to see  ->  )

END R example - resume Mathematica lecture

2.1.2 Step 2: make a PieChart3D

Exercise 2.1 make a pie chart

Make a pie chart with given list data of market share above.

Answer

In[7]:=

Tutorial_2_answer_79.gif

Out[8]=

Tutorial_2_answer_80.gif

2.1.3 Step 3: make a PieChart3D with logos as legends

Exercise 2.2 pie chart with legends

Make a pie chart of market share data with logos as legends

Answer

In[23]:=

Graphics:PlotLabel /. Options[{marketshare = {0.46, 0.29,
        0.02, 0.04, 0.04, 0.06, 0.09} ;, ,
        RowBox[{RowBox[{socialnetwork, =, RowBox[{{,
        RowBox[{GraphicsBox[TagBox[RasterBox[NumericArray[<18,45,3>,
        UnsignedInteger8], {{0, 18}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 18}, PlotRange -> {{0, 45}, {0,
        18}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<25,45,3>,
        UnsignedInteger8], {{0, 25}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 25}, PlotRange -> {{0, 45}, {0,
        25}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<25,45,3>,
        UnsignedInteger8], {{0, 25}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 25}, PlotRange -> {{0, 45}, {0,
        25}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<12,45,3>,
        UnsignedInteger8], {{0, 12}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 12}, PlotRange -> {{0, 45}, {0,
        12}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<45,45,3>,
        UnsignedInteger8], {{0, 45}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 45}, PlotRange -> {{0, 45}, {0,
        45}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<45,45,3>,
        UnsignedInteger8], {{0, 45}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 45}, PlotRange -> {{0, 45}, {0,
        45}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<20,45,3>,
        UnsignedInteger8], {{0, 20}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 20}, PlotRange -> {{0, 45}, {0,
        20}}]}], }}]}], ;}], , PieChart3D[marketshare,
        ChartLegends&rarr;socialnetwork]}]

Out[25]=

Tutorial_2_answer_82.gif

2.1.4 Step 4: use alternate color

In[67]:=

Graphics:PlotLabel /. Options[{marketshare = {0.46, 0.29,
        0.02, 0.04, 0.04, 0.06, 0.09} ;, ,
        RowBox[{RowBox[{socialnetwork, =, RowBox[{{,
        RowBox[{GraphicsBox[TagBox[RasterBox[NumericArray[<18,45,3>,
        UnsignedInteger8], {{0, 18}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 18}, PlotRange -> {{0, 45}, {0,
        18}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<25,45,3>,
        UnsignedInteger8], {{0, 25}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 25}, PlotRange -> {{0, 45}, {0,
        25}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<25,45,3>,
        UnsignedInteger8], {{0, 25}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 25}, PlotRange -> {{0, 45}, {0,
        25}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<12,45,3>,
        UnsignedInteger8], {{0, 12}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 12}, PlotRange -> {{0, 45}, {0,
        12}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<45,45,3>,
        UnsignedInteger8], {{0, 45}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 45}, PlotRange -> {{0, 45}, {0,
        45}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<45,45,3>,
        UnsignedInteger8], {{0, 45}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 45}, PlotRange -> {{0, 45}, {0,
        45}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<20,45,3>,
        UnsignedInteger8], {{0, 20}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 20}, PlotRange -> {{0, 45}, {0,
        20}}]}], }}]}], ;}], , color = {Hue[0.6, 1, 0.5], Hue[0.54, 0.7,
        1], Hue[0.6, 0.5, 1], Hue[0.75, 0.7, 1] , Hue[0.08, 1, 1],
        Hue[0.35, 0.7, 1], Hue[0., 0.8, 1]} ;}]

Exercise 2.3 pie chart with given color

Use option ChartStyle

Answer

In[26]:=

Graphics:PlotLabel /. Options[{marketshare = {0.46, 0.29,
        0.02, 0.04, 0.04, 0.06, 0.09} ;, ,
        RowBox[{RowBox[{socialnetwork, =, RowBox[{{,
        RowBox[{GraphicsBox[TagBox[RasterBox[NumericArray[<18,45,3>,
        UnsignedInteger8], {{0, 18}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 18}, PlotRange -> {{0, 45}, {0,
        18}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<25,45,3>,
        UnsignedInteger8], {{0, 25}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 25}, PlotRange -> {{0, 45}, {0,
        25}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<25,45,3>,
        UnsignedInteger8], {{0, 25}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 25}, PlotRange -> {{0, 45}, {0,
        25}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<12,45,3>,
        UnsignedInteger8], {{0, 12}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 12}, PlotRange -> {{0, 45}, {0,
        12}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<45,45,3>,
        UnsignedInteger8], {{0, 45}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 45}, PlotRange -> {{0, 45}, {0,
        45}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<45,45,3>,
        UnsignedInteger8], {{0, 45}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 45}, PlotRange -> {{0, 45}, {0,
        45}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<20,45,3>,
        UnsignedInteger8], {{0, 20}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 20}, PlotRange -> {{0, 45}, {0,
        20}}]}], }}]}], ;}], , color = {Hue[0.6, 1, 0.5], Hue[0.54, 0.7,
        1], Hue[0.6, 0.5, 1], Hue[0.75, 0.7, 1] , Hue[0.08, 1, 1],
        Hue[0.35, 0.7, 1], Hue[0., 0.8, 1]} ; , ,
        PieChart3D[marketshare, ChartStyle&rarr; color,
        ChartLegends&rarr;socialnetwork]}]

Out[29]=

Tutorial_2_answer_85.gif

END exercise

2.2 List - data tabulation example

2.2.1 Grid as a printout display

Graphics:PlotLabel /. Options[{marketshare = {0.46, 0.29,
        0.02, 0.04, 0.04, 0.06, 0.09} ;, ,
        RowBox[{RowBox[{socialnetwork, =, RowBox[{{,
        RowBox[{GraphicsBox[TagBox[RasterBox[NumericArray[<18,45,3>,
        UnsignedInteger8], {{0, 18}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 18}, PlotRange -> {{0, 45}, {0,
        18}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<25,45,3>,
        UnsignedInteger8], {{0, 25}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSize -> {61.3636, Automatic}, ImageSizeRaw -> {45,
        25}, PlotRange -> {{0, 45}, {0, 25}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<25,45,3>,
        UnsignedInteger8], {{0, 25}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSize -> {68.6364, Automatic}, ImageSizeRaw -> {45,
        25}, PlotRange -> {{0, 45}, {0, 25}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<12,45,3>,
        UnsignedInteger8], {{0, 12}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSize -> {77.7273, Automatic}, ImageSizeRaw -> {45,
        12}, PlotRange -> {{0, 45}, {0, 12}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<45,45,3>,
        UnsignedInteger8], {{0, 45}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 45}, PlotRange -> {{0, 45}, {0,
        45}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<45,45,3>,
        UnsignedInteger8], {{0, 45}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {45, 45}, PlotRange -> {{0, 45}, {0,
        45}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<20,45,3>,
        UnsignedInteger8], {{0, 20}, {45, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSize -> {61.3636, Automatic}, ImageSizeRaw -> {45,
        20}, PlotRange -> {{0, 45}, {0, 20}}]}], }}]}], ;}]}]

In[74]:=

Tutorial_2_answer_87.png

Out[74]=

Tutorial_2_answer_88.gif Tutorial_2_answer_89.gif Tutorial_2_answer_90.gif Tutorial_2_answer_91.gif Tutorial_2_answer_92.gif Tutorial_2_answer_93.gif Tutorial_2_answer_94.gif
0.46 0.29 0.02 0.04 0.04 0.06 0.09

In[75]:=

Tutorial_2_answer_95.png

Out[75]=

Tutorial_2_answer_96.gif Tutorial_2_answer_97.gif Tutorial_2_answer_98.gif Tutorial_2_answer_99.gif Tutorial_2_answer_100.gif Tutorial_2_answer_101.gif Tutorial_2_answer_102.gif
0.46 0.29 0.02 0.04 0.04 0.06 0.09

In[76]:=

Tutorial_2_answer_103.png

Out[76]=

Tutorial_2_answer_104.gif Tutorial_2_answer_105.gif Tutorial_2_answer_106.gif Tutorial_2_answer_107.gif Tutorial_2_answer_108.gif Tutorial_2_answer_109.gif Tutorial_2_answer_110.gif
0.46 0.29 0.02 0.04 0.04 0.06 0.09

In[79]:=

Tutorial_2_answer_111.png

Out[79]=

Tutorial_2_answer_112.gif Tutorial_2_answer_113.gif Tutorial_2_answer_114.gif Tutorial_2_answer_115.gif Tutorial_2_answer_116.gif Tutorial_2_answer_117.gif Tutorial_2_answer_118.gif
0.46 0.29 0.02 0.04 0.04 0.06 0.09

In[80]:=

Tutorial_2_answer_119.png

Out[80]=

social network Tutorial_2_answer_120.gif Tutorial_2_answer_121.gif Tutorial_2_answer_122.gif Tutorial_2_answer_123.gif Tutorial_2_answer_124.gif Tutorial_2_answer_125.gif Tutorial_2_answer_126.gif
market share 0.46 0.29 0.02 0.04 0.04 0.06 0.09

In[2]:=

Tutorial_2_answer_127.gif

In[4]:=

Tutorial_2_answer_128.png

Out[4]=

juice eggs fruits vegetables milk cereals coffee tea ice cream napkins foils storage bags toothpaste shampoo detergent
3 4 12 8 2 6 1 2 3 5 2 10 4 3 2

In[84]:=

Tutorial_2_answer_129.png

Out[84]=

juice 3
eggs 4
fruits 12
vegetables 8
milk 2
cereals 6
coffee 1
tea 2
ice cream 3
napkins 5
foils 2
storage bags 10
toothpaste 4
shampoo 3
detergent 2

In[85]:=

Tutorial_2_answer_130.png

Out[85]=

juice 3
eggs 4
fruits 12
vegetables 8
milk 2
cereals 6
coffee 1
tea 2
ice cream 3
napkins 5
foils 2
storage bags 10
toothpaste 4
shampoo 3
detergent 2

In[86]:=

Tutorial_2_answer_131.png

Out[86]=

item unit
juice 3
eggs 4
fruits 12
vegetables 8
milk 2
cereals 6
coffee 1
tea 2
ice cream 3
napkins 5
foils 2
storage bags 10
toothpaste 4
shampoo 3
detergent 2

Later, you can learn about TableForm and MatrixForm.

Exercise 2.4 (answer given)

Find the logos of the following market indices: Dow-Jones, S&P, Nasdaq, FTSE, Nikkei, and Hang Seng and make a named list.

Answer (given)

In[4]:=

Graphics:PlotLabel /.
        Options[{RowBox[{RowBox[{marketindexicon, =, RowBox[{{,
        RowBox[{GraphicsBox[TagBox[RasterBox[NumericArray[<27,120,3>,
        UnsignedInteger8], {{0, 27}, {120, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSize -> Automatic, ImageSizeRaw -> {120, 27},
        PlotRange -> {{0, 120}, {0, 27}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<60,70,3>,
        UnsignedInteger8], {{0, 60}, {70, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {70, 60}, PlotRange -> {{0, 70}, {0,
        60}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<20,100,3>,
        UnsignedInteger8], {{0, 20}, {100, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSize -> Automatic, ImageSizeRaw -> {100, 20},
        PlotRange -> {{0, 100}, {0, 20}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<49,80,3>,
        UnsignedInteger8], {{0, 49}, {80, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSize -> Automatic, ImageSizeRaw -> {80, 49},
        PlotRange -> {{0, 80}, {0, 49}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<21,100,3>,
        UnsignedInteger8], {{0, 21}, {100, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSize -> Automatic, ImageSizeRaw -> {100, 21},
        PlotRange -> {{0, 100}, {0, 21}}], ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<31,140,3>,
        UnsignedInteger8], {{0, 31}, {140, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {140, 31}, PlotRange -> {{0, 140}, {0,
        31}}]}], }}]}], ;}], , marketindexicon}]

Out[5]=

Tutorial_2_answer_133.gif

Exercise 2.5 (answer given)

Make a named list of the market symbols corresponding to the above.

Answer (given)

In[72]:=

Tutorial_2_answer_134.gif

Out[73]=

Tutorial_2_answer_135.png

Exercise 2.6 (answer given)

Make a dynamic Grid display of market index values whenever a button is pushed

Answer (given)

Tutorial_2_answer_136.gif

Out[13]=

3. Table and Array

3.1 Basic concepts

All ordered set of items are called “list” in Mathematica. They can also be called “table” or “array” (generic concepts). It is convenient to generate a list from a formula or function. When we do this, the elements of the list are usually of the same types, for example, they can be numbers, strings, images, etc. Hence, there is really no fundamental difference between general “list” and “array”, except that the latter is usually used to imply that all elements have the same type.
Below, we use Table to generate a list that can be considered as one-dimensional array

In[1]:=

Tutorial_2_answer_138.png

Out[1]=

Tutorial_2_answer_139.png

Tutorial_2_answer_140.gif

Tutorial_2_answer_141.gif

Exercise 3.1

Generate a table, name it with a name of your choice, item generated is Tutorial_2_answer_142.png for index from 0 to 20 in step of 1.

Answer

In[87]:=

Tutorial_2_answer_143.png

Out[87]=

Tutorial_2_answer_144.png

Exercise 3.2 ListPlot

Use ListPlot and ListLinePlot to plot your table data in 1.1 above. For  ListPlot, use this option:
PlotStyle-> {Red,PointSize[0.02]}
Put both graph into a list with a name (only one name for the list), then use Show[“the list name”]

Answer

In[88]:=

Tutorial_2_answer_145.gif

Out[89]=

Tutorial_2_answer_146.gif

Out[90]=

Tutorial_2_answer_147.gif

Exercise 3.3 Damped oscillator

Consider this function:  Tutorial_2_answer_148.png; where t is time. Let τ=0.35 sec, f=440 Hz. Calculate s(t) for t=0 to 1 sec, in step of 1/11025 sec. (11025 is known as the sampling rate).
- Make a ListPlot of the data
- Make a sound with array s(t) that you obtain.

Answer

In[5]:=

Tutorial_2_answer_149.gif

In[91]:=

Tutorial_2_answer_150.gif

Out[91]=

Tutorial_2_answer_151.gif

Out[92]=

Tutorial_2_answer_152.gif

Out[93]=

Tutorial_2_answer_153.gif

END exercise

Tutorial_2_answer_154.gif

Tutorial_2_answer_155.gif

3.2 Range

We don’t always need to use Table to generate a most often used array: a linear array. For this we can also use Range.

In[18]:=

Tutorial_2_answer_156.png

Out[18]=

Tutorial_2_answer_157.png

In[19]:=

Tutorial_2_answer_158.png

Out[19]=

Tutorial_2_answer_159.png

What if we want to generate from -12 to 37?

In[20]:=

Tutorial_2_answer_160.png

Out[20]=

Tutorial_2_answer_161.png

What if we want to generate from 0.8 to 3.6 in step of 0.12

In[21]:=

Tutorial_2_answer_162.png

Out[21]=

Tutorial_2_answer_163.png

In[22]:=

Tutorial_2_answer_164.png

Out[22]=

Tutorial_2_answer_165.gif

Tutorial_2_answer_166.gif

Tutorial_2_answer_167.gif

Tutorial_2_answer_168.gif

Ever since after Math 9, Mathematica Plot function can sometimes be very very slow. Hence, it is sometimes better to generate an array points to plot just like other languages. One can apply a function to a linear array:

In[94]:=

Tutorial_2_answer_169.gif

Out[95]=

Tutorial_2_answer_170.png

Exercise 3.4

Use this code to generate a 2D vector, you must provide values of coordinate x and y for each point below.

In[96]:=

Tutorial_2_answer_171.gif

Answer

In[99]:=

Tutorial_2_answer_172.gif

Out[101]=

Tutorial_2_answer_173.gif

Exercise 3.5

Use the above code in Exc. 1.3 to generate an array of 48 vectors like this:
start point: Tutorial_2_answer_174.png  end point Tutorial_2_answer_175.png for n from 0 to 47. Do this by using Table that contains 48 vectors.

Answer

In[102]:=

Tutorial_2_answer_176.gif

Out[103]=

Tutorial_2_answer_177.gif

3.3 Table of Table: nested Table or 2D-array

In the above example. we have an array of vectors:

In[104]:=

Tutorial_2_answer_178.gif

Out[105]=

Tutorial_2_answer_179.gif

Suppose the function of interest has another variable, t besides x, and it is not Sin[2 π x] but Sin[2 π (x-t)]. Then to show it for different values of t, we need another dimension: we have an array depending of x for each t value. What we need is a table of table: nested table.

Exercise 3.6

Create a table in which, each element is a graphic object of vector above, but let the function be Sin[2 π (x-t)]. The index of the outer table is t, for t from 0 to Tutorial_2_answer_180.png, in step of Tutorial_2_answer_181.png. Name the created table, but don’t print out.

Answer

In[106]:=

Tutorial_2_answer_182.png

Exercise 3.7

Use Manipulate to show the Tutorial_2_answer_183.png element of the list generated in Exc. 1.5.
Manipulate[ yourarray[[i]] , {i, 1 ,Length[ yourarray] , 1 }]

Answer

In[107]:=

Tutorial_2_answer_184.png

Exercise 3.8

Follow instruction in class.

Answer

In[5]:=

Tutorial_2_answer_185.png

In[6]:=

Tutorial_2_answer_186.png

In[51]:=

Tutorial_2_answer_187.png

Out[51]=

Tutorial_2_answer_188.png

Exercise 3.9 Damped oscillator - with different frequencies

Use nested Table to make a table of signals similar to 3.3, but different frequencies and durations: f = {261.63, 261.63, 392, 392, 440, 440, 392}, and for each frequency, the corresponding duration is: t={0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 1}. Then use Flatten to put all of them together into a single list and play.

Answer

In[51]:=

Tutorial_2_answer_189.gif

In[56]:=

Tutorial_2_answer_190.png

Out[56]=

Tutorial_2_answer_191.gif

END exercise

Tutorial_2_answer_192.gif

Tutorial_2_answer_193.gif

3.4 Referencing elements from a multi-D array

It is straight-forward similar to other languages. First, recall what we have with an example above

In[18]:=

Graphics:PlotLabel /. Options[{RowBox[{RowBox[{mydata, =,
        RowBox[{{, RowBox[{Doe, ,, Jane, ,, 0987654321, ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<100,100,3>,
        UnsignedInteger8], {{0, 100}, {100, 0}}, {0, 255}, ColorFunction
        -> RGBColor],
        BoxForm`ImageTag[System`Convert`CommonDump`ConvertText[Byte,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ColorSpace -> System`Convert`CommonDump`ConvertText[RGB,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Interleaving -> True], Selectable -> False],
        DefaultBaseStyle ->
        System`Convert`CommonDump`ConvertText[ImageGraphics,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        ImageSizeRaw -> {100, 100}, PlotRange -> {{0, 100}, {0,
        100}}], ,, TagBox[DynamicModuleBox[{Audio`AudioObjects`audio$$ =
        HoldComplete[Audio[NumericArray[<1,116618>, Integer16],
        System`Convert`CommonDump`ConvertText[SignedInteger16,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Appearance -> Automatic, AudioOutputDevice -> Automatic,
        SampleRate -> 22050, SoundVolume -> 1]],
        Audio`AudioObjects`audioID$$, Audio`AudioObjects`buttonState$$ =
        System`Convert`CommonDump`ConvertText[Basic,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}],
        Audio`AudioObjects`newAudio$$},
        DynamicBox[ToBoxes[Audio`AudioGUI[2,
        Audio`AudioObjects`audioID$$, Audio`AudioObjects`buttonState$$,
        Audio`AudioObjects`audio$$], StandardForm], ImageSizeCache ->
        {136., {46., 55.}}, TrackedSymbols :> {}], Deinitialization
        :> (Clear[Audio`AudioObjects`newAudio$$];
        Audio`ClearRef[Audio`AudioObjects`audioID$$]),
        DynamicModuleValues :> {}, Initialization :>
        ({Audio`AudioObjects`newAudio$$, Audio`AudioObjects`audioID$$} =
        Audio`CheckID[Audio`AudioObjects`audio$$,
        Audio`AudioObjects`audioID$$, Audio`AudioObjects`newAudio$$]),
        UnsavedVariables :> {Audio`AudioObjects`audioID$$,
        Audio`AudioObjects`newAudio$$}],
        Audio`AudioBox[System`Convert`CommonDump`ConvertText[AudioClass,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}]
        -> System`Convert`CommonDump`ConvertText[AudioData,
        System`Convert`HTMLDump`htmlsave, HTMLEntities ->
        {HTMLBasic}, AltMathOutput -> PlotLabel, WindowSize ->
        {2000, Automatic}, MathOutput -> PNG, ConvertClosed ->
        False, ConvertReverseClosed -> False, ConvertLinkedNotebooks
        -> False, CharacterEncoding -> Automatic,
        ConversionStyleEnvironment -> None, ConversionRules ->
        Automatic, HeadAttributes -> {}, HeadElements -> {}, CSS
        -> Automatic, ConvertLinkedNotebooks -> False, MathOutput
        -> GIF, GraphicsOutput -> GIF, Graphics3DOutput ->
        Automatic, ManipulateOutput -> CDF, ConvertClosed -> True,
        ConvertReverseClosed -> False, FullDocument -> True,
        AltMathOutput -> FileName, TableOutput -> {TextForm,
        Automatic}, AnimationOutput -> Automatic, FilesDirectory
        -> HTMLFiles, LinksDirectory -> HTMLLinks, HTMLEntities
        -> {HTML}, AllowBlockMathML -> False, ShowStyles ->
        True, DataUri -> False, MathMLOptions ->
        {UseUnicodePlane1Characters -> False,
        IncludeMarkupAnnotations -> False, Entities -> MathML}]],
        Editable -> False, Selectable -> False]}], }}]}], ;}], ,
        First[mydata], , mydata[[1]], , Last[mydata], , mydata[[4]]}]

Out[19]=

Tutorial_2_answer_195.png

Out[20]=

Tutorial_2_answer_196.png

Out[21]=

Tutorial_2_answer_197.png

Out[22]=

Tutorial_2_answer_198.gif

Now, consider this two dimensional array

In[29]:=

Tutorial_2_answer_199.gif

Out[30]=

0 1 2 3 4 5 6 7
8 9 10 11 12 13 14 15
16 17 18 19 20 21 22 23
24 25 26 27 28 29 30 31
32 33 34 35 36 37 38 39

In[31]:=

Tutorial_2_answer_200.png

Out[31]=

Tutorial_2_answer_201.png

In[66]:=

Tutorial_2_answer_202.png

Out[66]=

Tutorial_2_answer_204.gif

Tutorial_2_answer_205.gif

Created with the Wolfram Language