-
Notifications
You must be signed in to change notification settings - Fork 0
/
pe112.nb
392 lines (374 loc) · 16.5 KB
/
pe112.nb
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
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
(* Content-type: application/vnd.wolfram.mathematica *)
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
(* CreatedBy='Mathematica 12.1' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
NotebookDataLength[ 16762, 384]
NotebookOptionsPosition[ 15331, 352]
NotebookOutlinePosition[ 15904, 370]
CellTagsIndexPosition[ 15861, 367]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"ClearAll", "[",
RowBox[{"f", ",", "g", ",", "h", ",", "i", ",", "j"}], "]"}],
"\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{"x", ":",
RowBox[{"previous", " ", "digits"}]}], "*)"}], "\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{"d", "<=", "x"}], "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "1"}], "]"}], ":=",
RowBox[{"x", "+", "1"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"x_", ",", "n_"}], "]"}], ":=",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",", "n"}], "]"}], "=",
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"k", ",",
RowBox[{"n", "-", "1"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"k", ",", "x", ",", "0", ",",
RowBox[{"-", "1"}]}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{"d", ">=", "x"}], "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"g", "[",
RowBox[{"x_", ",", "1"}], "]"}], ":=",
RowBox[{"10", "-", "x"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"g", "[",
RowBox[{"x_", ",", "n_"}], "]"}], ":=",
RowBox[{
RowBox[{"g", "[",
RowBox[{"x", ",", "n"}], "]"}], "=",
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"g", "[",
RowBox[{"k", ",",
RowBox[{"n", "-", "1"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"k", ",", "x", ",", "9"}], "}"}]}], "]"}]}]}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{"non", " ", "bounce", " ", "under", " ", "lenth", " ", "n"}],
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"h", "[", "n_", "]"}], ":=",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{
RowBox[{"f", "[",
RowBox[{"9", ",", "k"}], "]"}], "+",
RowBox[{"g", "[",
RowBox[{"1", ",", "k"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"k", ",", "1", ",", "n"}], "}"}]}], "]"}], "-",
RowBox[{"10", "*", "n"}]}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"h", "[", "100", "]"}], "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{"bounce", " ", "under", " ", "lenth", " ", "n"}],
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"i", "[", "n_", "]"}], ":=",
RowBox[{
RowBox[{"10", "^", "n"}], "-", "1", "-",
RowBox[{"h", "[", "n", "]"}]}]}], "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{
"non", " ", "bounce", " ", "starts", " ", "with", " ", "x", " ", "of", " ",
"lenth", " ", "n"}], "*)"}], "\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{
RowBox[{"-", "1"}], "means", " ", "xxxxx"}],
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"j", "[",
RowBox[{"x_", ",", "n_"}], "]"}], ":=",
RowBox[{
RowBox[{"f", "[",
RowBox[{"x", ",",
RowBox[{"n", "-", "1"}]}], "]"}], "+",
RowBox[{"g", "[",
RowBox[{"x", ",",
RowBox[{"n", "-", "1"}]}], "]"}], "-", "1"}]}], "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{"todo", ":", " ",
RowBox[{
"find", " ", "the", " ", "non", " ", "bounce", " ", "number", " ",
"under", " ", "12312414", " ", "specific", " ", "number"}]}],
"*)"}]}], "\[IndentingNewLine]"}], "Input",
CellChangeTimes->{{3.8440265473005733`*^9, 3.844026606895766*^9}, {
3.8440266388477592`*^9, 3.8440266388985147`*^9}, {3.8440266781375275`*^9,
3.844026723776712*^9}, {3.844026791461713*^9, 3.8440268052783017`*^9}, {
3.84402717504177*^9, 3.8440271820158644`*^9}, {3.8440272585206375`*^9,
3.844027437129236*^9}, {3.844027470285657*^9, 3.844027502568855*^9}, {
3.844027576696411*^9, 3.844027595217393*^9}, {3.844027673855123*^9,
3.844027727452005*^9}, {3.844027766375165*^9, 3.844027855362809*^9}, {
3.844027891268969*^9, 3.8440279184013157`*^9}, {3.8440279660364704`*^9,
3.8440279872868795`*^9}, {3.8440280339156857`*^9, 3.8440280516652613`*^9},
3.844028087604426*^9, {3.8440281431422873`*^9, 3.8440281637447505`*^9}, {
3.8440282071880903`*^9, 3.8440282423139277`*^9}, {3.844028484883676*^9,
3.844028485055537*^9}, {3.8440286589578624`*^9, 3.844028692208954*^9}, {
3.8440287578692884`*^9, 3.8440287853338737`*^9}, {3.844028858303357*^9,
3.8440289008156223`*^9}, {3.8440289700451794`*^9,
3.8440289757767854`*^9}, {3.8440290192318554`*^9,
3.8440290224490833`*^9}, {3.844029085136372*^9, 3.844029203346237*^9}, {
3.8440293529425125`*^9, 3.8440293577740626`*^9}, {3.8440294079391217`*^9,
3.844029490014613*^9}, {3.8440296505038195`*^9, 3.844029670224346*^9}, {
3.844029905417453*^9, 3.8440299303557467`*^9}, {3.844029981173297*^9,
3.8440300010155387`*^9}, {3.8440300344838595`*^9, 3.844030162162653*^9}, {
3.8440302070722837`*^9, 3.8440304464244833`*^9}, {3.8440305036308126`*^9,
3.844030514814864*^9}, {3.8440306471172223`*^9, 3.844030649100277*^9}, {
3.844030770292996*^9, 3.8440307872131443`*^9}, {3.844030927033764*^9,
3.844030936876864*^9}, 3.844030968674765*^9, {3.844031162369894*^9,
3.844031165884319*^9}, {3.844031648864458*^9, 3.844031680401675*^9}, {
3.844031715717697*^9, 3.844031763952614*^9}, {3.8440317946410165`*^9,
3.8440318108289356`*^9}, {3.844032480237545*^9, 3.844032510464292*^9}, {
3.844032613347472*^9, 3.8440326154691963`*^9}, {3.84403271237642*^9,
3.8440327844881525`*^9}, {3.844032846835153*^9, 3.84403290887042*^9}, {
3.844032946478948*^9, 3.8440330053569965`*^9}, {3.844033057499485*^9,
3.8440330990006676`*^9}, {3.8440331308759956`*^9,
3.8440331366108775`*^9}, {3.8440331744527454`*^9,
3.8440333440098825`*^9}, {3.844033386968629*^9, 3.84403341038591*^9}, {
3.8440334669522333`*^9, 3.844033634095649*^9}, {3.844033697094486*^9,
3.844033758524669*^9}, {3.8440338006663857`*^9, 3.844033838200075*^9}, {
3.8440338813090134`*^9, 3.8440339591875315`*^9}, {3.8440340011423655`*^9,
3.844034004312525*^9}, {3.8440340462224636`*^9, 3.844034127966135*^9}, {
3.844034167334132*^9, 3.844034183350911*^9}, {3.8440342325232244`*^9,
3.8440342329033375`*^9}, {3.844034369440293*^9, 3.8440344078996754`*^9}, {
3.844034438737728*^9, 3.8440344402590685`*^9}, {3.844034773830182*^9,
3.8440348047012405`*^9}, {3.8440348366127048`*^9,
3.8440348414630785`*^9}, {3.8440348723673077`*^9,
3.8440348876358137`*^9}, {3.844034992721138*^9, 3.844035056608075*^9}, {
3.8440351397202263`*^9, 3.8440353640454903`*^9}, {3.844035400221034*^9,
3.844035486315439*^9}, {3.8440356236203885`*^9, 3.8440356936818347`*^9}, {
3.844035753008359*^9, 3.844035763894602*^9}, {3.8440358311712084`*^9,
3.8440358354894266`*^9}, {3.84403715510156*^9, 3.8440371569023085`*^9},
3.8440376379330235`*^9, {3.8440376752620115`*^9, 3.844037708906007*^9}, {
3.844038200905218*^9, 3.8440382079268475`*^9}, {3.844038241260146*^9,
3.844038367014848*^9}, {3.8440384564557056`*^9, 3.8440384788719807`*^9}, {
3.844038532719249*^9, 3.844038535196844*^9}, {3.844038894725519*^9,
3.8440388971662464`*^9}, {3.844039024823868*^9, 3.8440390441063175`*^9}, {
3.844039133047613*^9, 3.84403913315688*^9}, {3.8440391919993563`*^9,
3.844039192108671*^9}, {3.844039280410906*^9, 3.844039318489599*^9}, {
3.844039367109396*^9, 3.844039383588922*^9}, {3.8440395755128736`*^9,
3.844039577999556*^9}, 3.844039632923025*^9, {3.8440396780684223`*^9,
3.844039708012162*^9}, {3.8440400874889717`*^9, 3.8440401615576367`*^9}, {
3.8440403180424395`*^9, 3.8440403239802113`*^9}, {3.844040359624996*^9,
3.844040362753927*^9}, {3.844040478303273*^9, 3.8440405330204005`*^9}, {
3.844040588091611*^9, 3.844040617273126*^9}, {3.8440406684738474`*^9,
3.8440406802647734`*^9}, {3.844040712569078*^9, 3.844040712693991*^9}, {
3.8440407460707283`*^9, 3.844040775172717*^9}, {3.844040808579175*^9,
3.8440408848699083`*^9}, {3.8440409165768905`*^9,
3.8440409733646708`*^9}, {3.844041025968603*^9, 3.844041046488826*^9}, {
3.8440410782097535`*^9, 3.844041078407437*^9}, {3.84404129765525*^9,
3.844041305884831*^9}, {3.8440413661240444`*^9, 3.844041366446937*^9}, {
3.844041651698208*^9, 3.8440416815485806`*^9}, {3.8440417202645164`*^9,
3.844041738005745*^9}, {3.8440418269040756`*^9, 3.844041901602837*^9}, {
3.84404193205834*^9, 3.8440419454659185`*^9}, {3.8440419792313395`*^9,
3.8440420120260267`*^9}, {3.8440420725185995`*^9, 3.844042100207921*^9}, {
3.844042131071906*^9, 3.8440421315101757`*^9}, {3.8440421620679665`*^9,
3.844042162609418*^9}, {3.8440422031846995`*^9, 3.844042243354641*^9}, {
3.8440423345226107`*^9, 3.844042347747471*^9}, {3.8440423990993834`*^9,
3.844042455503194*^9}, {3.844042486032485*^9, 3.8440425012718463`*^9}, {
3.8440494902629533`*^9, 3.844049494859621*^9}, {3.844067142225244*^9,
3.8440671923291445`*^9}, {3.844067229617472*^9, 3.844067294189604*^9}, {
3.8440675344476595`*^9, 3.8440676322296295`*^9}, {3.8440676940834446`*^9,
3.844067700313135*^9}},ExpressionUUID->"3c2f13f3-6fa2-4fe6-8bb2-\
9cb189b5a41b"],
Cell[BoxData["51161058134250"], "Output",
CellChangeTimes->{{3.8440676004473844`*^9, 3.844067633938306*^9}},
CellLabel->
"Out[3520]=",ExpressionUUID->"7afb0a1b-d0db-4341-9af9-98e1966d92db"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
StyleBox[
RowBox[{
RowBox[{
RowBox[{
RowBox[{"data", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Range", "[", "1000", "]"}], ",",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"Sort", "[",
RowBox[{"IntegerDigits", "[", "#", "]"}], "]"}], "\[Equal]",
RowBox[{"IntegerDigits", "[", "#", "]"}]}], "||",
RowBox[{
RowBox[{
RowBox[{"ReverseSort", "[",
RowBox[{"IntegerDigits", "[", "#", "]"}], "]"}], "\[Equal]",
RowBox[{"IntegerDigits", "[", "#", "]"}]}], ")"}]}],
"&"}]}]}]}]}], "]"}], ";"}], "\[IndentingNewLine]"}],
FontWeight->"Plain"], "\[IndentingNewLine]",
StyleBox[
RowBox[{"Select", "[",
RowBox[{"data", ",",
RowBox[{
RowBox[{
RowBox[{"Quotient", "[",
RowBox[{"#", ",", "100"}], "]"}], "\[Equal]", "3"}], "&"}]}], "]"}],
FontWeight->"Plain"], "\[IndentingNewLine]",
StyleBox[
RowBox[{"%", "//", "Length"}],
FontWeight->"Plain"]}], "Input",
CellChangeTimes->{{3.8440385445465565`*^9, 3.8440385614961104`*^9}, {
3.844038623193081*^9, 3.8440386407844534`*^9}, {3.8440387943306637`*^9,
3.844038794611862*^9}, {3.8440389817247524`*^9, 3.8440389829922495`*^9}, {
3.844039979190959*^9, 3.844039988488188*^9}, {3.8440405293085346`*^9,
3.844040529386753*^9}, {3.84404059096976*^9, 3.8440405991209784`*^9}, {
3.844040706187274*^9, 3.8440407075625334`*^9}, {3.8440420167669687`*^9,
3.844042029689324*^9}, {3.844065469828394*^9,
3.844065475108037*^9}},ExpressionUUID->"c316aa34-41ca-4d47-aefd-\
c12b5d867ab3"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"300", ",", "310", ",", "311", ",", "320", ",", "321", ",", "322", ",",
"330", ",", "331", ",", "332", ",", "333", ",", "334", ",", "335", ",",
"336", ",", "337", ",", "338", ",", "339", ",", "344", ",", "345", ",",
"346", ",", "347", ",", "348", ",", "349", ",", "355", ",", "356", ",",
"357", ",", "358", ",", "359", ",", "366", ",", "367", ",", "368", ",",
"369", ",", "377", ",", "378", ",", "379", ",", "388", ",", "389", ",",
"399"}], "}"}]], "Output",
CellChangeTimes->{{3.8440386240852394`*^9, 3.8440386409719057`*^9},
3.844038906812811*^9, 3.844038983477395*^9, 3.8440399926808825`*^9,
3.8440403572793665`*^9, 3.8440404955807824`*^9, {3.844040527252271*^9,
3.8440405296678534`*^9}, 3.84404059959044*^9, 3.8440407084169397`*^9, {
3.844042018503459*^9, 3.8440420300023603`*^9}, 3.8440653923853617`*^9},
CellLabel->
"Out[3232]=",ExpressionUUID->"a54ccbe1-09ae-4e34-8a71-e386fb36ff13"],
Cell[BoxData["37"], "Output",
CellChangeTimes->{{3.8440386240852394`*^9, 3.8440386409719057`*^9},
3.844038906812811*^9, 3.844038983477395*^9, 3.8440399926808825`*^9,
3.8440403572793665`*^9, 3.8440404955807824`*^9, {3.844040527252271*^9,
3.8440405296678534`*^9}, 3.84404059959044*^9, 3.8440407084169397`*^9, {
3.844042018503459*^9, 3.8440420300023603`*^9}, 3.844065392388381*^9},
CellLabel->
"Out[3233]=",ExpressionUUID->"3aa3ddbe-4dfd-43aa-89fc-5f8e90b9483d"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"b", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{"Monitor", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Do", "[",
RowBox[{
RowBox[{
RowBox[{"x", "=",
RowBox[{"IntegerDigits", "[", "n", "]"}]}], ";",
RowBox[{"If", "[",
RowBox[{
RowBox[{"!",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Sort", "[", "x", "]"}], "\[Equal]", "x"}], "||",
RowBox[{"x", "\[Equal]",
RowBox[{"ReverseSort", "[", "x", "]"}]}]}], ")"}]}], ",",
RowBox[{"b", "+=", "1"}]}], "]"}], ";",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"b", "/", "n"}], "\[Equal]", "0.99"}], ",",
RowBox[{"Return", "[", "n", "]"}]}], "]"}]}], ",", " ",
RowBox[{"{",
RowBox[{"n", ",", "Infinity"}], "}"}]}], "]"}], "\[IndentingNewLine]",
",",
RowBox[{"{",
RowBox[{"b", ",", "n", ",",
RowBox[{
RowBox[{"b", "/", "n"}], "//", "N"}]}], "}"}]}],
"]"}], "\[IndentingNewLine]"}], "Input",
CellChangeTimes->{{3.8440654009114184`*^9, 3.844065574190688*^9}, {
3.844065615761164*^9, 3.844065728701717*^9}, {3.84406576502042*^9,
3.844065886000331*^9}, {3.84406592269246*^9, 3.844065923363475*^9}, {
3.844065956489002*^9, 3.84406601632623*^9}, {3.8440661153813143`*^9,
3.844066241130707*^9}, {3.8440662822753677`*^9, 3.844066286953698*^9}},
CellLabel->
"In[3283]:=",ExpressionUUID->"acd8e300-519d-4539-a2bb-1cb3d45ae1d0"],
Cell[BoxData["1587000"], "Output",
CellChangeTimes->{{3.844066013194518*^9, 3.84406603388612*^9},
3.844066246512906*^9, 3.844066294432772*^9},
CellLabel->
"Out[3284]=",ExpressionUUID->"3fe8497e-46a5-467e-a0a2-24b632e50ad0"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"h", "[", "1000", "]"}]], "Input",
CellChangeTimes->{{3.8440670903421545`*^9, 3.8440671325624247`*^9}},
CellLabel->
"In[3289]:=",ExpressionUUID->"929d3809-4abe-4ab6-8330-34f0fd260946"],
Cell[BoxData["$Aborted"], "Output",
CellChangeTimes->{{3.844067103070574*^9, 3.8440671356299767`*^9}},
CellLabel->
"Out[3289]=",ExpressionUUID->"1c13f529-0eba-4c8e-9386-b37889147eb5"]
}, Open ]]
},
WindowSize->{1166, 680},
WindowMargins->{{Automatic, 2}, {157, Automatic}},
FrontEndVersion->"12.1 for Microsoft Windows (64-bit) (March 14, 2020)",
StyleDefinitions->FrontEnd`FileName[{$RootDirectory, "C:", "Users", "stary",
"AppData", "Roaming", "Mathematica", "SystemFiles", "FrontEnd",
"StyleSheets"}, "OD.nb", CharacterEncoding -> "UTF-8"],
ExpressionUUID->"d2641e47-8500-46a8-9659-2536d9bcd51a"
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 9135, 184, 708, "Input",ExpressionUUID->"3c2f13f3-6fa2-4fe6-8bb2-9cb189b5a41b"],
Cell[9718, 208, 193, 3, 47, "Output",ExpressionUUID->"7afb0a1b-d0db-4341-9af9-98e1966d92db"]
}, Open ]],
Cell[CellGroupData[{
Cell[9948, 216, 1675, 42, 144, InheritFromParent,ExpressionUUID->"c316aa34-41ca-4d47-aefd-c12b5d867ab3"],
Cell[11626, 260, 975, 16, 78, "Output",ExpressionUUID->"a54ccbe1-09ae-4e34-8a71-e386fb36ff13"],
Cell[12604, 278, 478, 7, 47, "Output",ExpressionUUID->"3aa3ddbe-4dfd-43aa-89fc-5f8e90b9483d"]
}, Open ]],
Cell[CellGroupData[{
Cell[13119, 290, 1524, 39, 228, "Input",ExpressionUUID->"acd8e300-519d-4539-a2bb-1cb3d45ae1d0"],
Cell[14646, 331, 231, 4, 47, "Output",ExpressionUUID->"3fe8497e-46a5-467e-a0a2-24b632e50ad0"]
}, Open ]],
Cell[CellGroupData[{
Cell[14914, 340, 211, 4, 47, "Input",ExpressionUUID->"929d3809-4abe-4ab6-8330-34f0fd260946"],
Cell[15128, 346, 187, 3, 47, "Output",ExpressionUUID->"1c13f529-0eba-4c8e-9386-b37889147eb5"]
}, Open ]]
}
]
*)