Revision as of 13:52, 18 June 2021 (view source) Jgrprior (talk \| contribs) (A Python implementation) ← Older edit		Revision as of 17:27, 18 March 2022 (view source) Petelomax (talk \| contribs) m (→‎fast estimate: syntax coloured) Newer edit →
Line 834: (ie the p(20) shown below is actually pure guesswork, with a 50:50 chance of being correct)<br> Note that several other references/links disagree on p(17) and up.</small> <!--<lang Phix>~~function pancake~~(~~integer n~~phixonline)--> <span style="color: #008080;">with</span> <span style="color: #008080;">javascript_semantics</span> ~~integer gap = 2, sum_gaps = gap, adj = -1~~ <span style="color: #008080;">function</span> <span style="color: #000000;">pancake</span><span style="color: #0000FF;">(</span><span style="color: #004080;">integer</span> <span style="color: #000000;">n</span><span style="color: #0000FF;">)</span> ~~while sum_gaps<n do~~ <span style="color: #004080;">integer</span> <span style="color: #000000;">gap</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">2</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">sum_gaps</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">gap</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">adj</span> <span style="color: #0000FF;">=</span> <span style="color: #0000FF;">-</span><span style="color: #000000;">1</span> ~~adj += 1~~ <span style="color: #008080;">while</span> <span style="color: #000000;">sum_gaps</span><span style="color: #0000FF;"><</span><span style="color: #000000;">n</span> <span style="color: #008080;">do</span> ~~gap = gap2-1~~ <span style="color: #000000;">adj</span> <span style="color: #0000FF;">+=</span> <span style="color: #000000;">1</span> ~~sum_gaps += gap~~ <span style="color: #000000;">gap</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">gap</span><span style="color: #0000FF;"></span><span style="color: #000000;">2</span><span style="color: #0000FF;">-</span><span style="color: #000000;">1</span> ~~end while~~ <span style="color: #000000;">sum_gaps</span> <span style="color: #0000FF;">+=</span> <span style="color: #000000;">gap</span> ~~n += adj~~ <span style="color: #008080;">end</span> <span style="color: #008080;">while</span> ~~return n~~ <span style="color: #000000;">n</span> <span style="color: #0000FF;">+=</span> <span style="color: #000000;">adj</span> ~~end function~~ <span style="color: #008080;">return</span> <span style="color: #000000;">n</span> ~~sequence t = tagset(20),~~ <span style="color: #008080;">end</span> <span style="color: #008080;">function</span> ~~r = columnize({t,apply(t,pancake)}),~~ <span style="color: #004080;">sequence</span> <span style="color: #000000;">t</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">tagset</span><span style="color: #0000FF;">(</span><span style="color: #000000;">20</span><span style="color: #0000FF;">),</span> ~~p = apply(true,sprintf,{{"p(%2d) = %2d"},r})~~ <span style="color: #000000;">r</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">columnize</span><span style="color: #0000FF;">({</span><span style="color: #000000;">t</span><span style="color: #0000FF;">,</span><span style="color: #7060A8;">apply</span><span style="color: #0000FF;">(</span><span style="color: #000000;">t</span><span style="color: #0000FF;">,</span><span style="color: #000000;">pancake</span><span style="color: #0000FF;">)}),</span> ~~printf(1,"%s\n",join_by(p,1,5))</lang>~~ <span style="color: #000000;">p</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">apply</span><span style="color: #0000FF;">(</span><span style="color: #004600;">true</span><span style="color: #0000FF;">,</span><span style="color: #7060A8;">sprintf</span><span style="color: #0000FF;">,{{</span><span style="color: #008000;">"p(%2d) = %2d"</span><span style="color: #0000FF;">},</span><span style="color: #000000;">r</span><span style="color: #0000FF;">})</span> <span style="color: #7060A8;">printf</span><span style="color: #0000FF;">(</span><span style="color: #000000;">1</span><span style="color: #0000FF;">,</span><span style="color: #008000;">"%s\n"</span><span style="color: #0000FF;">,</span><span style="color: #7060A8;">join_by</span><span style="color: #0000FF;">(</span><span style="color: #000000;">p</span><span style="color: #0000FF;">,</span><span style="color: #000000;">1</span><span style="color: #0000FF;">,</span><span style="color: #000000;">5</span><span style="color: #0000FF;">))</span> <!--</lang>--> {{out}} <pre>

Pancake numbers: Difference between revisions

Pancake numbers (view source)

Revision as of 17:27, 18 March 2022