Search Results
| Search type | Search syntax |
|---|---|
| Tags | [tag] |
| Exact | "words here" |
| Author |
user:1234 user:me (yours) |
| Score |
score:3 (3+) score:0 (none) |
| Answers |
answers:3 (3+) answers:0 (none) isaccepted:yes hasaccepted:no inquestion:1234 |
| Views | views:250 |
| Code | code:"if (foo != bar)" |
| Sections |
title:apples body:"apples oranges" |
| URL | url:"*.example.com" |
| Saves | in:saves |
| Status |
closed:yes duplicate:no migrated:no wiki:no |
| Types |
is:question is:answer |
| Exclude |
-[tag] -apples |
| For more details on advanced search visit our help page | |
Results tagged with display
Search options answers only
not deleted
user 1997
Questions about solutions and support for mathematical typesetting and layout, and the appearance of elements in input and output as displayed by the front-end.
4
votes
Display 10^n as power
An example using Format:
Format[h[x_]] :=
With[{p = Log10[x]},
If[p == 0, Style[1, 20], Style[10^HoldForm[p], 20]]]
r = PowerRange[1/1000, 1000, 10];
tu = Tuples[r, 2];
TableForm[Partition[h@*Ti …
- 64.9k
3
votes
Pretty printing of factorization output
fun[x_] :=
Row@Riffle[
MapThread[If[#2 == 1, #1, HoldForm[#1^#2]] &,
Transpose[FactorInteger[x]]], "\[CenterDot]"]
Grid[Prepend[{#, fun[#!]} & /@ Range[0, 10], {"N",
"Factorization N!"}] …
- 64.9k
9
votes
Accepted
How to add/insert a well aligned graphics on top of another one?
I think it may perhaps be easier just to combine plots and modify (e.g. suppress unnecessary frame ticks). I post this as a motivating answer rather than definitive answer. li is a modified version of …
- 64.9k
4
votes
Accepted
Format a formula in human readable form
I have interpreted this is wishing to display an expression in a particular form. …
- 64.9k
2
votes
How to display the value of a very small number instead of "0."
I have interpreted this question as per george2079s comment. I think this may a case of "asking too much" but I defer to numerical experts.
Note:
Manipulate[
Plot[Evaluate[
BesselJ[2, 2 x] Besse …
- 64.9k
1
vote
Accepted
How can I combine several 2D-plots to one big 3D plot?
I have extended your range for illustrative purposes. Two ways:
Plot3D[Sin[x/(2*Pi)*1/10]*Cos[y/(2*Pi)*1/10], {x, 1, 100}, {y, 1,
100}]
ListSurfacePlot3D[
Partition[
Flatten@Table[{x, y, Sin[x/ …
- 64.9k