For the sake of our discussion suppose this represents a generic waveform. Don’t ask how I derived this just indulge me for now. This generates the type of plot we see so much. 1d and boring. ... at least to the public. So these are just some ideas of what we could do to visualize our data that might be more interesting to the public and who knows could be more useful to science.
In[]:=
ManipulatePlotRe,{t,0,100},PlotPoints->300,{β,0.1,1},{Ω,0.1,10},{R0,0.1,1},{T0,0.1,1},{M,100,}
T0+R0(-1+2β)Cos-T0-
32
3
π
M
2
Ω
t
2
β
32
3
π
M
tΩ
2
β
ΩSint
2
β
-1+2β
2
Ω
7
10
Out[]=
In[]:=
AnimatePlotRe,{t,0,100},PlotPoints->300,{β,0.1,1},{Ω,0.1,10},{R0,0.1,1},{T0,0.1,1},{M,100,},AnimationRepetitions->3
T0+R0(-1+2β)Cos-T0-
32
3
π
M
2
Ω
t
2
β
32
3
π
M
tΩ
2
β
ΩSint
2
β
-1+2β
2
Ω
7
10
Out[]=
Suppose we can somehow combine two or more waves (perhaps from different observatories) to create an image that is 2D.
In[]:=
ManipulateParametricPlotRe,Re,{t,0,100},PlotPoints->300,{β,0.1,1},{Ω,0.1,200},{R0,0.1,1},{T0,0.1,1},{M,100,},{α,0,2π}
T0+R0(-1+2β)Cos-T0-
32
3
π
M
2
Ω
t
2
β
32
3
π
M
tΩ
2
β
ΩSint
2
β
-1+2β
2
Ω
T0+R0(-1+2β)Cos-T0-
32
3
π
M
2
Ω
t-α
2
β
32
3
π
M
(t-α)Ω
2
β
ΩSint-α
2
β
-1+2β
2
Ω
7
10
Out[]=
In[]:=
AnimateParametricPlotRe,Re,{t,0,100},PlotPoints->300,{β,0.1,1},{Ω,0.1,200},{R0,0.1,1},{T0,0.1,1},{M,100,},{α,0,2π},AnimationRepetitions3
T0+R0(-1+2β)Cos-T0-
32
3
π
M
2
Ω
t
2
β
32
3
π
M
tΩ
2
β
ΩSint
2
β
-1+2β
2
Ω
T0+R0(-1+2β)Cos-T0-
32
3
π
M
2
Ω
t-α
2
β
32
3
π
M
(t-α)Ω
2
β
ΩSint-α
2
β
-1+2β
2
Ω
7
10
Out[]=
In[]:=
ManipulateParametricPlot3DRe,Re,Re,{t,0,100},PlotPoints->300,{β,0.1,1},{Ω,0.1,200},{R0,0.1,1},{T0,0.1,1},{M,100,},{α,0,2π},{γ,0,2π}
T0+R0(-1+2β)Cos-T0-
32
3
π
M
2
Ω
t
2
β
32
3
π
M
tΩ
2
β
ΩSint
2
β
-1+2β
2
Ω
T0+R0(-1+2β)Cos-T0-
32
3
π
M
2
Ω
t-α
2
β
32
3
π
M
(t-α)Ω
2
β
ΩSint-α
2
β
-1+2β
2
Ω
T0+R0(-1+2β)Cos-T0-
32
3
π
M
2
Ω
t+γ
2
β
32
3
π
M
(t+γ)Ω
2
β
ΩSint+γ
2
β
-1+2β
2
Ω
7
10
Out[]=
