(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 13.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 55533, 1505] NotebookOptionsPosition[ 49641, 1364] NotebookOutlinePosition[ 51397, 1416] CellTagsIndexPosition[ 51354, 1413] WindowTitle->MapBatched | Example Notebook WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[TextData[{ "Basic Examples", "\[NonBreakingSpace]", Cell["(2)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->1878538314], Cell[TextData[{ "MapBatched applies a function to a list or association. By default, batches \ consist of 5 entries, and the action taken is to ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Pause", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Pause", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " for one second per batch:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.787684832918847*^9, 3.787684930617573*^9}, { 3.788180584284544*^9, 3.7881805879757347`*^9}}, CellID->663194322], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["MapBatched", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["MapBatched", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/MapBatched"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "MapBatched"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["MapBatched"], BoxID -> "MapBatched", Selectable->False], "[", RowBox[{ RowBox[{"#", "&"}], ",", RowBox[{"Range", "[", "20", "]"}]}], "]"}], "//", "AbsoluteTiming"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.784844516056733*^9, 3.784844518790319*^9}, { 3.786113880695462*^9, 3.786113978397539*^9}, {3.787684911135117*^9, 3.7876849140875587`*^9}, 3.7881805782443943`*^9}, CellID->2136087301], Cell[BoxData[ RowBox[{"{", RowBox[{"3.004317`", ",", RowBox[{"{", RowBox[{ "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20"}], "}"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.784844523353786*^9, {3.786113821252434*^9, 3.786113915077539*^9}, 3.7875761837738457`*^9, 3.787684794964518*^9}, CellLabel->"Out[2]=", CellID->1249985008] }, Open ]], Cell[TextData[{ "The result using ", Cell[BoxData[ StyleBox["MapBatched", "InlineResourceFunction"]], "InlineFormula", FontFamily->"Source Sans Pro"], " identical to an ordinary ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Map", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Map", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " except for inserting this ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Pause", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Pause", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{3.7876848762729597`*^9, 3.787684927257371*^9, 3.7881805830368767`*^9, 3.788180669244687*^9}, CellID->483155420], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{"#", "&"}], ",", RowBox[{"Range", "[", "20", "]"}]}], "]"}], "//", "AbsoluteTiming"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.784844516056733*^9, 3.784844518790319*^9}, { 3.786113880695462*^9, 3.786113978397539*^9}, 3.78818058005932*^9}, CellID->857229511], Cell[BoxData[ RowBox[{"{", RowBox[{"0.000058`", ",", RowBox[{"{", RowBox[{ "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15", ",", "16", ",", "17", ",", "18", ",", "19", ",", "20"}], "}"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.784844523353786*^9, {3.786113821252434*^9, 3.786113915077539*^9}, 3.7875761837738457`*^9, 3.7876847919703493`*^9}, CellLabel->"Out[1]=", CellID->69071884] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->600294137], Cell[TextData[{ "When the number of elements is less than the batch size, no ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Pause", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Pause", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " is inserted:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.7848445456049347`*^9, 3.7848445588464613`*^9}, { 3.786113984372838*^9, 3.7861139845327797`*^9}, 3.7861146785075493`*^9}, CellID->1158253897], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["MapBatched", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["MapBatched", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/MapBatched"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "MapBatched"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["MapBatched"], BoxID -> "MapBatched", Selectable->False], "[", RowBox[{ RowBox[{"#", "&"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4", ",", "5"}], "}"}]}], "]"}], "//", "AbsoluteTiming"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7793211842816467`*^9, 3.779321244204588*^9}, { 3.78104285541903*^9, 3.781042862207995*^9}, {3.78484441874654*^9, 3.784844488104578*^9}, {3.786113925047181*^9, 3.7861139266982517`*^9}}, CellLabel->"In[3]:=", CellID->1981470471], Cell[BoxData[ RowBox[{"{", RowBox[{"0.000053`", ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4", ",", "5"}], "}"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.784844436535179*^9, {3.7848444819863787`*^9, 3.784844488675271*^9}, 3.786113927013789*^9, 3.7876847950594873`*^9}, CellLabel->"Out[3]=", CellID->1812994502] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Scope", "\[NonBreakingSpace]", Cell["(2)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->1822053474], Cell[TextData[{ "The ", Cell[BoxData[ StyleBox["expr", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " can be any expression over which the function ", Cell[BoxData[ StyleBox["f", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " can be mapped (e.g., lists and associations). ", "\n", "The ", Cell[BoxData[ StyleBox["action", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " can be any expression:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.786118409283924*^9, 3.78611840928624*^9}, 3.786118785134089*^9, {3.786119234376445*^9, 3.7861192488197803`*^9}, 3.786119467712412*^9, {3.788180682674243*^9, 3.788180685219162*^9}}, CellID->301361905], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["MapBatched", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["MapBatched", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/MapBatched"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "MapBatched"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["MapBatched"], BoxID -> "MapBatched", Selectable->False], "[", RowBox[{ RowBox[{"#", "&"}], ",", RowBox[{"Range", "[", "15", "]"}], ",", RowBox[{ RowBox[{"Print", "[", "\"\\"", "]"}], ";", RowBox[{"Pause", "[", "0.2", "]"}], ";"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.786119569247122*^9, 3.786119601154043*^9}, { 3.786119635235011*^9, 3.786119639776029*^9}, {3.786119700810967*^9, 3.786119705042535*^9}}, CellLabel->"In[1]:=", CellID->1197602128], Cell[CellGroupData[{ Cell[BoxData["\<\"batch action\"\>"], "Print", TaggingRules->{}, CellChangeTimes->{{3.786119595219594*^9, 3.786119601658465*^9}, 3.7861197057110653`*^9, 3.78768480266215*^9}, CellLabel->"During evaluation of In[1]:=", CellID->1522138956], Cell[BoxData["\<\"batch action\"\>"], "Print", TaggingRules->{}, CellChangeTimes->{{3.786119595219594*^9, 3.786119601658465*^9}, 3.7861197057110653`*^9, 3.7876848028466377`*^9}, CellLabel->"During evaluation of In[1]:=", CellID->1764230428] }, Open ]], Cell[BoxData[ RowBox[{"{", RowBox[{ "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15"}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.786119595221246*^9, 3.786119601661718*^9}, 3.786119706088646*^9, 3.787684803048153*^9}, CellLabel->"Out[1]=", CellID->1114089267] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->1781478568], Cell[TextData[{ "The size ", Cell[BoxData[ StyleBox["n", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " can be any integer:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.786119726374392*^9, 3.786119740810421*^9}, { 3.7881807189727716`*^9, 3.788180748716008*^9}}, CellID->1986956477], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["MapBatched", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["MapBatched", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/MapBatched"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "MapBatched"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["MapBatched"], BoxID -> "MapBatched", Selectable->False], "[", RowBox[{ RowBox[{"#", "&"}], ",", RowBox[{"Range", "[", "10", "]"}], ",", RowBox[{"Print", "[", "\"\\"", "]"}], ",", "2"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.786119619754678*^9, 3.7861196452167177`*^9}, { 3.788180736386451*^9, 3.788180760102571*^9}}, CellLabel->"In[36]:=", CellID->24409843], Cell[CellGroupData[{ Cell[BoxData["\<\"batch action\"\>"], "Print", TaggingRules->{}, CellChangeTimes->{3.788180760471013*^9}, CellLabel->"During evaluation of In[36]:=", CellID->1621069627], Cell[BoxData["\<\"batch action\"\>"], "Print", TaggingRules->{}, CellChangeTimes->{3.7881807604729853`*^9}, CellLabel->"During evaluation of In[36]:=", CellID->192191500], Cell[BoxData["\<\"batch action\"\>"], "Print", TaggingRules->{}, CellChangeTimes->{3.78818076047884*^9}, CellLabel->"During evaluation of In[36]:=", CellID->347135412], Cell[BoxData["\<\"batch action\"\>"], "Print", TaggingRules->{}, CellChangeTimes->{3.788180760480348*^9}, CellLabel->"During evaluation of In[36]:=", CellID->1739284232] }, Open ]], Cell[BoxData[ RowBox[{"{", RowBox[{ "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8", ",", "9", ",", "10"}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.786119623490193*^9, 3.7861196456966953`*^9}, 3.7876848031072483`*^9, {3.78818073702509*^9, 3.7881807604817743`*^9}}, CellLabel->"Out[36]=", CellID->602684260] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Applications", "\[NonBreakingSpace]", Cell["(3)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellChangeTimes->{{3.788180617559938*^9, 3.7881806226458673`*^9}}, CellID->434285177], Cell["\<\ One intended usage is to access web APIs that restrict request rates. For \ example, manual access to PubChem via the PUG API:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.784844581687899*^9, 3.784844627524952*^9}, { 3.784844742393609*^9, 3.7848447551131573`*^9}, {3.786118370849038*^9, 3.786118387558814*^9}, 3.788180596523452*^9}, CellID->56560058], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"retrieveName", "[", "myName_String", "]"}], ":=", RowBox[{"With", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ "pugrest", "=", "\"\\""}], ",", RowBox[{"pugoper", "=", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"pugout", "=", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"pugin", " ", "=", " ", RowBox[{"\"\\"", "<>", "myName"}]}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"URLExecute", "@", RowBox[{"URLBuild", "[", RowBox[{"{", RowBox[{"pugrest", ",", "pugin", ",", "pugoper", ",", "pugout"}], "}"}], "]"}]}]}], "]"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.784844637539864*^9, 3.7848446461696463`*^9}, { 3.7881806061336718`*^9, 3.7881806087864723`*^9}}, CellLabel->"In[30]:=", CellID->1417122832], Cell["Define a list of chemicals:", "Text", TaggingRules->{}, CellChangeTimes->{{3.788180777065371*^9, 3.7881807859754553`*^9}}, CellID->1093285902], Cell[BoxData[ RowBox[{ RowBox[{"names", "=", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\<1-propanol\>\"", ",", "\"\<2-propanol\>\"", ",", "\"\\"", ",", "\"\<1-butanol\>\"", ",", "\"\<2-butanol\>\"", ",", "\"\\""}], "}"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.784844637539864*^9, 3.7848446461696463`*^9}, { 3.7881806061336718`*^9, 3.788180607124003*^9}}, CellLabel->"In[31]:=", CellID->1666114561], Cell["Retrieve results from the API in batches:", "Text", TaggingRules->{}, CellChangeTimes->{{3.78818079096911*^9, 3.788180810680241*^9}}, CellID->1103585852], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["MapBatched", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["MapBatched", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/MapBatched"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "MapBatched"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["MapBatched"], BoxID -> "MapBatched", Selectable->False], "[", RowBox[{"retrieveName", ",", "names"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.784844637539864*^9, 3.7848446461696463`*^9}, { 3.7881806061336718`*^9, 3.788180607124003*^9}}, CellLabel->"In[32]:=", CellID->1348153494], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"O\"\>", ",", "\<\"C1=CC=CC=C1\"\>", ",", "\<\"CO\"\>", ",", "\<\"C=C\"\>", ",", "\<\"CCO\"\>", ",", "\<\"CC=C\"\>", ",", "\<\"CCCO\"\>", ",", "\<\"CC(C)O\"\>", ",", "\<\"C=CC=C\"\>", ",", "\<\"CCCCO\"\>", ",", "\<\"CCC(C)O\"\>", ",", "\<\"CC(C)(C)O\"\>"}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.7848446563790417`*^9, 3.787684802423151*^9, 3.7881806529984083`*^9}, CellLabel->"Out[32]=", CellID->2061372416] }, Open ]] }, Closed]] }, ClosingSaveDialog->False, WindowSize->Automatic, WindowMargins->Automatic, WindowTitle->"MapBatched | Example Notebook", Visible->False, FrontEndVersion->"13.0 for Mac OS X x86 (64-bit) (December 9, 2021)", StyleDefinitions->Notebook[{ Cell[ StyleData[ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb", CharacterEncoding -> "UTF-8"]]], Cell[ StyleData[All, "Working"], Editable -> True, DockedCells -> {}], Cell[ StyleData["Notebook"], Editable -> True, DockedCells -> {}, ScrollingOptions -> {"VerticalScrollRange" -> Automatic}], Cell[ StyleData[ "Section", StyleDefinitions -> StyleData["PrimaryExamplesSection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData["Subsection", StyleDefinitions -> StyleData["ExampleSection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData[ "Subsubsection", StyleDefinitions -> StyleData["ExampleSubsection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData[ "Subsubsubsection", StyleDefinitions -> StyleData["ExampleSubsubsection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData["Text", StyleDefinitions -> StyleData["ExampleText"]], Editable -> True]}, Visible -> False, FrontEndVersion -> "13.0 for Mac OS X x86 (64-bit) (December 9, 2021)", StyleDefinitions -> "PrivateStylesheetFormatting.nb"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[623, 23, 169, 7, 70, "Subsection",ExpressionUUID->"b9f91b9c-9986-4dad-a5a0-ccfe3fdd9d43", CellID->1878538314], Cell[795, 32, 815, 23, 70, "Text",ExpressionUUID->"bee5f2e2-3c5e-41c0-84a9-9affc4e15180", CellID->663194322], Cell[CellGroupData[{ Cell[1635, 59, 7552, 188, 70, "Input",ExpressionUUID->"07f0081d-299a-462c-a5e1-15e92391ff26", CellID->2136087301], Cell[9190, 249, 545, 14, 70, "Output",ExpressionUUID->"23b70142-e037-4b1a-8748-b6a44cc1cd66", CellID->1249985008] }, Open ]], Cell[9750, 266, 1326, 42, 70, "Text",ExpressionUUID->"3f5d45c5-e7a9-4c14-a40d-48a8e2b3c580", CellID->483155420], Cell[CellGroupData[{ Cell[11101, 312, 351, 10, 70, "Input",ExpressionUUID->"744b1b58-7431-49e5-9d4f-9231cdda01a7", CellID->857229511], Cell[11455, 324, 545, 14, 70, "Output",ExpressionUUID->"67f12fe9-97f7-4170-83bd-05d6df8ac6fd", CellID->69071884] }, Open ]], Cell[CellGroupData[{ Cell[12037, 343, 144, 4, 70, "ExampleDelimiter",ExpressionUUID->"c78c4af1-0e9a-4692-a8c8-bd55a71d4dae", CellID->600294137], Cell[12184, 349, 765, 22, 70, "Text",ExpressionUUID->"ce6b413e-124a-413a-b079-6d34752dd634", CellID->1158253897], Cell[CellGroupData[{ Cell[12974, 375, 7641, 190, 70, "Input",ExpressionUUID->"cc4c20d1-a1db-4f02-8fe2-f67ab7dc8b4d", CellID->1981470471], Cell[20618, 567, 369, 11, 70, "Output",ExpressionUUID->"fb02b307-cef2-4b3b-bf31-32d4fe052e69", CellID->1812994502] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[21048, 585, 160, 7, 70, "Subsection",ExpressionUUID->"31556aeb-4ea3-4a03-b648-eef011b62a42", CellID->1822053474], Cell[21211, 594, 712, 21, 70, "Text",ExpressionUUID->"e783b129-61bf-4f52-93c2-114bc2ceb1b7", CellID->301361905], Cell[CellGroupData[{ Cell[21948, 619, 7418, 187, 70, "Input",ExpressionUUID->"79bea520-e90f-4d0e-af37-320a4495194c", CellID->1197602128], Cell[CellGroupData[{ Cell[29391, 810, 245, 5, 70, "Print",ExpressionUUID->"178f0d18-ef70-4544-b068-6001fb7aef2a", CellID->1522138956], Cell[29639, 817, 248, 5, 70, "Print",ExpressionUUID->"e571319b-93f0-47f4-a9b7-ab5cad7e62cc", CellID->1764230428] }, Open ]], Cell[29902, 825, 397, 10, 70, "Output",ExpressionUUID->"be283b37-3aa1-4d6f-bc99-b82a5cf42939", CellID->1114089267] }, Open ]], Cell[CellGroupData[{ Cell[30336, 840, 145, 4, 70, "ExampleDelimiter",ExpressionUUID->"013ac379-a973-416c-976b-d20c8a94a080", CellID->1781478568], Cell[30484, 846, 312, 10, 70, "Text",ExpressionUUID->"1519d66e-5bc9-483d-8be3-892da9345210", CellID->1986956477], Cell[CellGroupData[{ Cell[30821, 860, 7317, 185, 70, "Input",ExpressionUUID->"723cc07a-7de7-421d-a0a5-b00291adf19d", CellID->24409843], Cell[CellGroupData[{ Cell[38163, 1049, 173, 4, 70, "Print",ExpressionUUID->"701d033d-7082-4fa5-979c-a61be4af7748", CellID->1621069627], Cell[38339, 1055, 174, 4, 70, "Print",ExpressionUUID->"e4297875-88f1-4e59-b8d2-b0748f2c3b4d", CellID->192191500], Cell[38516, 1061, 171, 4, 70, "Print",ExpressionUUID->"fc84a276-25c1-449a-8b11-ea6ced8fac54", CellID->347135412], Cell[38690, 1067, 173, 4, 70, "Print",ExpressionUUID->"8792db39-a01a-4dbd-91c8-c3daf374a936", CellID->1739284232] }, Open ]], Cell[38878, 1074, 367, 9, 70, "Output",ExpressionUUID->"a5981586-6c52-4fb0-aacc-6af80314304f", CellID->602684260] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[39306, 1090, 234, 8, 70, "Subsection",ExpressionUUID->"37baf9d1-92c7-4754-900b-103f8d04fad5", CellID->434285177], Cell[39543, 1100, 378, 8, 70, "Text",ExpressionUUID->"fb49ed01-65ca-4cad-ae23-dc64204ced9d", CellID->56560058], Cell[39924, 1110, 1026, 26, 70, "Input",ExpressionUUID->"9e4cffb2-9117-46b1-9c18-19a0f27affb3", CellID->1417122832], Cell[40953, 1138, 151, 3, 70, "Text",ExpressionUUID->"e66d1b25-4014-4e9d-9720-e1d8b4142345", CellID->1093285902], Cell[41107, 1143, 615, 14, 70, "Input",ExpressionUUID->"25a10c45-54c0-4baf-89c8-5aab00fafdea", CellID->1666114561], Cell[41725, 1159, 162, 3, 70, "Text",ExpressionUUID->"6aca9bc8-040f-480a-838f-c2fcca36181e", CellID->1103585852], Cell[CellGroupData[{ Cell[41912, 1166, 7208, 181, 70, "Input",ExpressionUUID->"b960b6fb-7d04-4aeb-bb9e-ed4597dd08b0", CellID->1348153494], Cell[49123, 1349, 490, 11, 70, "Output",ExpressionUUID->"fade4dd9-f311-4837-bb09-297a617fae5c", CellID->2061372416] }, Open ]] }, Closed]] } ] *) (* End of internal cache information *)