Cell[CellGroupData[{Cell[BoxData[
 RowBox[{"Manipulate", "[", 
  RowBox[{
   RowBox[{"ListPlot", "[", 
    RowBox[{
     RowBox[{"Table", "[", 
      RowBox[{
       RowBox[{"FrobeniusNumber", "[", 
        RowBox[{"{", 
         RowBox[{"m", ",", "n", ",", "p"}], "}"}], "]"}], ",", 
       RowBox[{"{", 
        RowBox[{"p", ",", "1", ",", "100"}], "}"}]}], "]"}], ",", 
     RowBox[{"AxesLabel", "->", 
      RowBox[{"{", 
       RowBox[{
       "\"\<third value\>\"", ",", "\"\<maximal unattainable\>\""}], 
       "}"}]}], ",", 
     RowBox[{"Joined", "->", "True"}], ",", 
     RowBox[{"ImageSize", "->", "500"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"m", ",", "9", ",", "\"\<first value\>\""}], "}"}], ",",
      "1", ",", "200", ",", "1", ",", 
     RowBox[{"Appearance", "->", "\"\<Labeled\>\""}]}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"n", ",", "20", ",", "\"\<second value\>\""}], "}"}], 
     ",", "1", ",", "200", ",", "1", ",", 
     RowBox[{"Appearance", "->", "\"\<Labeled\>\""}]}], "}"}]}], 
  "]"}]], "Input",
 CellGroupingRules->{"GroupTogetherGrouping", 10000.},
 CellChangeTimes->{
  3.35696210375764*^9, 3.371824333125037*^9, {3.371824819398506*^9, 
   3.3718248247564783`*^9}, 3.3718248609603415`*^9, {
   3.3718249763119593`*^9, 3.3718250025610123`*^9}, {
   3.3718250622798615`*^9, 3.3718251143272963`*^9}, {
   3.371827156832014*^9, 3.371827163722595*^9}, {
   3.3823748836878686`*^9, 3.3823749073048444`*^9}, {
   3.3823749488602877`*^9, 3.3823749779049544`*^9}, {
   3.3823750704265137`*^9, 3.3823750947056475`*^9}, {
   3.382375875713595*^9, 3.3823758800599747`*^9}, {
   3.382376120392745*^9, 3.3823761210637302`*^9}, 
   3.382376297572818*^9, {3.382787340398755*^9, 3.382787346273755*^9},
    3.759804980722836*^9},
 CellID->1496021318],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`m$$ = 9, $CellContext`n$$ = 20, 
    Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, 
    Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, 
    Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", 
    Typeset`specs$$ = {{{
       Hold[$CellContext`m$$], 9, "first value"}, 1, 200, 1}, {{
       Hold[$CellContext`n$$], 20, "second value"}, 1, 200, 1}}, 
    Typeset`size$$ = {500., {139., 144.}}, Typeset`update$$ = 0, 
    Typeset`initDone$$, Typeset`skipInitDone$$ = 
    True, $CellContext`m$2408$$ = 0, $CellContext`n$2409$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`m$$ = 9, $CellContext`n$$ = 20}, 
      "ControllerVariables" :> {
        Hold[$CellContext`m$$, $CellContext`m$2408$$, 0], 
        Hold[$CellContext`n$$, $CellContext`n$2409$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$,
         Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, 
        Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> 
      ListPlot[
        Table[
         
         FrobeniusNumber[{$CellContext`m$$, $CellContext`n$$, \
$CellContext`p}], {$CellContext`p, 1, 100}], 
        AxesLabel -> {"third value", "maximal unattainable"}, Joined -> 
        True, ImageSize -> 500], 
      "Specifications" :> {{{$CellContext`m$$, 9, "first value"}, 1, 
         200, 1, Appearance -> 
         "Labeled"}, {{$CellContext`n$$, 20, "second value"}, 1, 200, 
         1, Appearance -> "Labeled"}}, "Options" :> {}, 
      "DefaultOptions" :> {ControllerLinking -> True}],
     ImageSizeCache->{545., {198., 204.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellGroupingRules->{"GroupTogetherGrouping", 10000.},
 CellChangeTimes->{3.759804980723071*^9},
 CellID->57379471]
}, {2}]]