User Portlet User Portlet

Discussions
&[Wolfram Notebook][1] [1]: https://www.wolframcloud.com/obj/1bf9931d-f6fb-480c-a3cd-214f53203fa6
&[Wolfram Notebook][1] [1]: https://www.wolframcloud.com/obj/27a1b3b1-6c65-46b7-b88e-04baf0e998a2
&[Wolfram Notebook][1] [1]: https://www.wolframcloud.com/obj/c2578ae3-647c-4ed7-9d63-8cb00663ae5c
&[Wolfram Notebook][1] This is the resulting gif image: ![a.gif][2] [1]: https://www.wolframcloud.com/obj/d7058889-ebe4-440b-aa0d-8e4a87174c54 [2]: https://community.wolfram.com//c/portal/getImageAttachment?filename=a.gif&userId=949223
Hi, All! &[Wolfram Notebook][1] [1]: https://www.wolframcloud.com/obj/3029ad8e-0a3d-4339-bd16-cd9bf2ce247c
Hi! &[Wolfram Notebook][1] [1]: https://www.wolframcloud.com/obj/bf7c1b48-0a6d-4d24-bfa8-2f279450dd80
Hi, All! I want to write a function in Mathematica 9 that opens and closes all sections in my notebook. I do it as follows: openCloseAll[nb_, target_String, to : (Open | Closed)] := Do[SelectionMove[cell, All, CellGroup, AutoScroll...
Hi, all! I cannot understand meanings of some LinearModelFit outputs. &[Wolfram Notebook][1] [1]: https://www.wolframcloud.com/obj/bf5548aa-4233-43a1-818f-7f6fc43401b6
Hello! Let us write such a code in WM9: d = With[{n = 10}, ConstantArray[1, 2 n + 1] + ArrayPad[{1}, n]] {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1} w = DiscreteWaveletTransform[d, MeyerWavelet[3]]; d2 =...
Hello! I want to make a procedure for minimization of function that takes a vector of arbitrary dimension as the input argument (it is the starting point) and provides a vector as the output one. My solution: In[1] := myFindMinimum[func_,...