Class blog 2/13 - part 2

ECE 3340 - Han Q. Le (r)

Han Q Le (c) -copyrighted 

We talked in class about creating a function. We had a discussion of what can be input of a function? is it number? string? array? is there any limit to the type of array or array dimension?
The answer is that any computable object can be an input. Below is an example.

1. Object input of a function

Recall that we did this in Tutorial 2, and you should have a record of.

Class_blog_2_13_pt2_1.gif

Now, we will make a function that uses the object above as input,

2. Making a function using Block or Module

First, let’s review basic steps to make a function. You should follow by typing line by line while trying to learn the structure of a Block function below.

2.1 Basic

You can use Block or Module for the basic structure below:

Class_blog_2_13_pt2_2.png

More specific

Class_blog_2_13_pt2_3.png

2.2 No need for input variables: prompt or does thing automatically

It is OK to have no input variable:

In[1]:=

Class_blog_2_13_pt2_4.png

In[2]:=

Class_blog_2_13_pt2_5.png

Out[2]=

Class_blog_2_13_pt2_6.png

In[1]:=

Class_blog_2_13_pt2_7.png

In[70]:=

Class_blog_2_13_pt2_8.png

2.3 Most useful functions need no input variables: it does thing automatically by looking for things, log-in etc.

Class_blog_2_13_pt2_9.png

3. A Block function that reads your record above

In[4]:=

Class_blog_2_13_pt2_10.gif

In[1]:=

Class_blog_2_13_pt2_11.gif

Now, go ahead and put in the data record you did for Tutorial 2. Below is an example.

In[3]:=

Graphics:PlotLabel /. Options[{RowBox[{RowBox[{testdatarec,
        =, RowBox[{{,
        RowBox[{GraphicsBox[TagBox[RasterBox[NumericArray[<720,1280,4>,
        UnsignedInteger8], {{0, 720}, {1280, 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 -> {1280, 720},
        PlotRange -> {{0, 1280}, {0, 720}}], ,,  , 667408,
        , ,,
        GraphicsBox[TagBox[RasterBox[NumericArray[<550,820,4>,
        UnsignedInteger8], {{0, 550}, {820, 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 -> {820, 550},
        PlotRange -> {{0, 820}, {0, 550}}],  , ,,
        fallingapple @ gmail . com,  , , ,,  ,
        TagBox[DynamicModuleBox[{Audio`AudioObjects`audio$$ =
        HoldComplete[Audio[System`Convert`CommonDump`ConvertText[C:\Users\Admin\Documents\WolframAudio\Speech-5de07e55-2ab9-48df-8ac3-c7a05308d0ca.wav,
        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[Real32,
        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[AudioFile,
        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], ,,
        Newton,  , ,,  ,
        GraphicsBox[TagBox[RasterBox[NumericArray[<1192,1984,4>,
        UnsignedInteger8], {{0, 1192}, {1984, 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 -> {1984, 1192},
        PlotRange -> {{0, 1984}, {0, 1192}}], , ,, , ,,  ,
        667408,  , ,, Isaac, , ,, fallingapple @ gmail . com,
        , ,, sirmintwarden @ gov . uk}], , }}]}], ;}], , testdatarec}]

Out[4]=

Class_blog_2_13_pt2_13.gif

Npw, see what the function we design does to the above object.

In[5]:=

Class_blog_2_13_pt2_14.png

Out[5]=

Class_blog_2_13_pt2_15.gif

Another example

In[6]:=

Class_blog_2_13_pt2_16.png

Out[6]=

Class_blog_2_13_pt2_17.png

In[7]:=

Graphics:PlotLabel /. Options[{RowBox[{RowBox[{mydatarec,
        =, RowBox[{{, RowBox[{your last name, ,, first name,
        ,,  , student ID,  , ,, email,  ,
        (* all are String *), , ,,
        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}],
        ImageSize -> {50., Automatic}, ImageSizeRaw -> {100, 100},
        PlotRange -> {{0, 100}, {0, 100}}], (* image object : your
        selfie obtained earlier *), , ,,  ,
        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]}], (* sound object
        : should be sound of you announcing your ID obtained above *),
        }}]}], ;}], , recordreadFunc[mydatarec]}]

Out[8]=

Class_blog_2_13_pt2_19.gif

Class_blog_2_13_pt2_20.png




End


You are strongly encouraged to go through all the tutorials up to now. Send in questions if need help.







Created with the Wolfram Language