Skip to main content
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
Search options not deleted user 7009

Questions on creating visualizations from functions or data using high-level constructors such as Plot, ListPlot, Histogram, etc.

4 votes

Does a manipulation of a plot area produce new data?

You can do the following:- points = Cases[ Cases[InputForm["Paste Here"], Line[___], Infinity], {_?NumericQ, _?NumericQ}, Infinity]; copy paste your modified plot where it says …
Hubble07's user avatar
  • 3,706
1 vote

Label multiple Data in Set of plots

Is this what you want data1 = {{1, 3, 4, 4, 5}, {1, 3, 4, 5, 5}, {1, 3, 4, 5, 5}, {2, 3, 4, 5, 5}, {2, 3, 4, 5, 5}}; data2 = {{1, 2, 2, 3, 1}, {1, 2, 2, 3, 1}, {1, 2, 2, 4, 1}, {1, 3, 4, 4, 1}, {1, …
Hubble07's user avatar
  • 3,706
2 votes
Accepted

Plotting 4 separate lines on a graph

v = {3.26797, 4.07436, 5.12821, 5.42005}; m = {0.004, 0.00592,0.00836, 0.01060}; ListLinePlot[Table[{{0, 0}, {m[[i]], v[[i]]}}, {i, 1, 4}],Frame -> True]
Hubble07's user avatar
  • 3,706
4 votes

Two axis on a BarChart

Edit 2 : Improved Version Firstly I'm renaming your data set b as b1. Create a new data c such that c = a + (10*b1); I'm scaling the data set b1 according to the axis you wanted. Create a barch …
Hubble07's user avatar
  • 3,706
4 votes
Accepted

Mathematica is not able to plot this DensityPlot

Make your definition functions and use numerical integration f[k_, t_, p_] := Exp[I 2 t] Exp[I (k Cos[t - p])] g[k_, p_] := Re[NIntegrate[f[k, t, p], {t, 0, 2 Pi}]] DensityPlot[g[k, p], {k, 0, 1}, {p …
Hubble07's user avatar
  • 3,706
0 votes
Accepted

Plotting relationship between more than two variables

Let your function be simply a+b+c then you can do the following: f[d_, c_] := Module[{a = 1, b}, b = a/d; a + b + c] Plot[{f[d, 1], f[d, 2]}, {d, 1, 5}, PlotRange -> Full, Frame -> True, PlotLegen …
Hubble07's user avatar
  • 3,706
24 votes
Accepted

How does one plot a Möbius Strip?

Equation taken form the wiki page x[u_, v_] := (1 + (v/2) Cos[u/2]) Cos[u] y[u_, v_] := (1 + (v/2) Cos[u/2]) Sin[u] z[u_, v_] := (v/2) Sin[u/2] plot = ParametricPlot3D[{x[u, v], y[u, v], z[u, …
Hubble07's user avatar
  • 3,706
1 vote
Accepted

ColorFunction still interferes with PlotLegends in Mathematica 10?

The error appears due to a simple syntax error in PlotLegends for plot2. The correct syntax should be as follows: PlotLegends -> LineLegend[{"DarkRainbow"}, {" W-range"}]
Hubble07's user avatar
  • 3,706
1 vote

labeling ListPlot data and drawing vectors

Using what you already have done just make these functions and then use Table inside Show blabelEl[i_] := Graphics[Text[elements[[1, i]], {FkFl2[[i, 1]], FkFl2[[i, 2]]}], PlotRange -> {{-1, 1}, …
Hubble07's user avatar
  • 3,706
3 votes

How can I draw a hyperbola of a complex form

This function finds the points that satisfy the complex equation and then plots it. complexPlot[complexEq_, range_, points_] := Module[{sol, data}, sol = FindInstance[complexEq && -range < Re[z] < …
Hubble07's user avatar
  • 3,706
16 votes

Manually assigning Axes label position in Plot3D

Edit in response to the comment about Dynamic Rotating (1/3/17) Make a function with three angles as its arguments. The three angles control the rotation of the three axis labels. f[xangle_, yangle_ …
Hubble07's user avatar
  • 3,706
2 votes
Accepted

ListPlot of a complex data file

Make a function to select $n_x,n_y,n_z$ from the $i^{th}$ data set p[i_, n_] := d2[[i, All, n]] Another function to select all the time component t[i_] := d2[[i, All, 1]] Combine them properly …
Hubble07's user avatar
  • 3,706
3 votes
Accepted

Table and ListPlot3D

The data feed to ListPlot3D should be of the form {{x1,y1,z1},{x2,y2,z2},....} timingData = Partition[ Flatten[Table[{c, d, tkappa[0, 0, c, d]}, {c, 0, 1, 0.1}, {d, 0, 1,0.1}]], …
Hubble07's user avatar
  • 3,706
0 votes
1 answer
135 views

MMA not showing bounding box for 3D plots

I'm not sure if this is a problem with MMA or my sytem but I'm facing a strange issue with 3D plots. MMA is not showing the bounding box it just displays the plot. Do any of you know the possible rea …
Hubble07's user avatar
  • 3,706
3 votes
1 answer
547 views

Remove shadow in 3D plots with different viewpoint [duplicate]

Consider the following two plots plot1=Plot3D[Exp[x + y], {x, 0, 10}, {y, 0, 10}, PlotRange -> All, ViewPoint -> {-2.883444524117677`, -0.3079985688886338`, 1.7438132233408123`}] plot2=Plot3D[Exp …
Hubble07's user avatar
  • 3,706

15 30 50 per page