Skip to main content
1 of 3

How about plotting it around a circle. This just wraps the amplitude signal on top of a circle which represents the time of your signal?

data = Import["directory/T55test.WAV"][[1, 1]]; signal = Transpose[Norm /@ Partition[#, 480] & /@ data]; s1 = Transpose[signal][[1]]; s2 = Transpose[signal][[2]]; aroundcircle[datain_] := {(1 + 10 datain[[#]]) Sin[(# 2 \[Pi])/ 1894], (1 + 10 datain[[#]]) Cos[(# 2 \[Pi])/1894]} & /@ Range[1894]; s1around = aroundcircle[s1]; s2around = aroundcircle[s2]; Show[ListLinePlot[{s1around, s2around}, PlotStyle -> {Red, Blue}], Graphics[Circle[{0, 0}, 1]], AspectRatio -> 1] 

sound profile about a circle