User Portlet
| Discussions |
|---|
| Gianluca has shown that `PowerExpand` does what you want. Another way to do it is with `Simplify`, with its second argument restricting the base to be a positive real number: Simplify[Sqrt[x^(9/2)], x > 0] (* x^(9/4) *) |
| In general, the use of `Table` is more concise than using `For`. Example: (* Function and loop parameters *) F[x_,y_]:=x+10*y x0=2; xf=12; deltax=3; (* For *) w={}; For[x=x0,x |
| Carl's suggestion on `NotebookWrite` can well be used. Since *data* can also be a complete notebook. An example: Save the following notebook to the default directory (`$HomeDirectory`) and give it the name Example.nb &[Wolfram Notebook][1] ... |
| Taking your first link as an example. Download the **Source notebook** to your desktop or your Wolfram Cloud, whichever is your preference: ![enter image description here][1] Open the downloaded notebook and you will see the source. [1]:... |
| Could the following be an alternative? Definitions: fun[1]=Function[#+5]; fun[2]=Function[(#+6)^2]; fun[3]=Function[(#+7)^3]; fun[index_,argument_]:=fun[index][argument] Use: fun[1,7] fun[2,7] fun[3,7] ... |
| For your second question, on adding units: dataset = Dataset[{{195, 2.3}, {198, 6.4}, {204, -3.1}}] Map[{Quantity[#[[1]],"Centimeters"],Quantity[#[[2]],"Volts"]}&,dataset//Normal]//Dataset |
| `Chop` can be used. It replaces numbers very close to zero by an exact 0 Plot[Sin[x] + Sin[x + Pi] // Chop, {x, 0, 2 Pi}] |
| Hello. I see the yellow boxes as a compact, icon style, way of representing complex data. Printing out the data in full could swamp the notebook. From the `SpectralLineData` documentation, with some additions: ![enter image description here][1]... |
| It is not a bug, it is your syntax/typing error. Swap the slash and semicolon: test[x_List /; VectorQ[x, NumberQ]] := 1 |
| One way, using `Style` and `Which`: pts = Range[-5, 5]; color[n_] := Which[n 0, Green, True, Black] ListPlot[Table[Style[pts[[i]], color[pts[[i]]]], {i, Length[pts]}]] |