In[]:=
Manipulate[Plot[Sin[nx],{x,-1,1}],{n,1,10}]
Out[]=
​
n
-1.0
-0.5
0.5
1.0
-1.0
-0.5
0.5
1.0
In[]:=
NotebookDirectory[]
Out[]=
/wolframcloud/userfiles/236/236ed617-d035-431d-baa7-9aa553dc0ca1/.Objects/f24/