https://github.com/ymtoo/timescalemodification.jl

Time-scale modification for Julia
https://github.com/ymtoo/timescalemodification.jl

Last synced: about 1 year ago
JSON representation

Time-scale modification for Julia

• Host: GitHub
• URL: https://github.com/ymtoo/timescalemodification.jl
• Owner: ymtoo
• Created: 2021-08-30T06:18:49.000Z (almost 5 years ago)
• Default Branch: main
• Last Pushed: 2024-03-10T07:40:02.000Z (over 2 years ago)
• Last Synced: 2025-01-26T02:44:39.536Z (over 1 year ago)
• Language: Julia
• Homepage:
• Size: 656 KB
• Stars: 2
• Watchers: 1
• Forks: 0
• Open Issues: 0
• Metadata Files:
  • Readme: README.md

Awesome Lists containing this project

README

          
# TimeScaleModification.jl

[![CI](https://github.com/ymtoo/TimeScaleModification.jl/actions/workflows/CI.yml/badge.svg)](https://github.com/ymtoo/TimeScaleModification.jl/actions/workflows/CI.yml)

[![codecov](https://codecov.io/gh/ymtoo/TimeScaleModification.jl/branch/main/graph/badge.svg?token=vXXUGOyv6Q)](https://codecov.io/gh/ymtoo/TimeScaleModification.jl)

The package implements time-scale modification algorithms to speed up or slow down an audio signal without alternating its pitch.

## Installation

```julia-repl

julia>]

pkg> add https://github.com/ymtoo/TimeScaleModification.jl.git

```

## Usage

```julia

using Plots

using SignalAnalysis

using TimeScaleModification

fs = 96000

x = cw(5000, 0.5, fs) |> real |> collect

xburst = [repeat([eps()],10000);

          randn(1000);

          repeat([eps()],20000);

          randn(1000);

          repeat([eps()],16000)]

```

### OLA

```julia

y = tsmodify(OLA(256,128,hanning), x, 1.5)

yburst = tsmodify(OLA(256,128,hanning), xburst, 1.5)

```

#### Sinusoidal signal

```julia

l = @layout [a b]

p1 = specgram(signal(x, fs); legend=:none, title="original")

p2 = specgram(signal(y, fs); ylabel="", legend=:none, title="time-scale modified")

plot(p1, p2; layout=l)

```

![](docs/images/ola-cw-spec.png)

```

plot(signal(x[1:960], fs); legend=true, label="original")

plot!(signal(y[1:960], fs); legend=true, label="time-scale modified")

```

![](docs/images/ola-cw-time.png)

#### Burst signal

```julia

l = @layout [a b]

p1 = specgram(signal(xburst, fs); legend=:none, title="original")

p2 = specgram(signal(yburst, fs); ylabel="", legend=:none, title="time-scale modified")

plot(p1, p2; layout=l)

```

![](docs/images/ola-burst-spec.png)

```

plot(signal(xburst, fs); legend=true, label="original")

plot!(signal(yburst, fs); legend=true, label="time-scale modified")

```

![](docs/images/ola-burst-time.png)

### WSOLA

```julia

y = tsmodify(WSOLA(256,128,hanning,10), x, 1.5)

yburst = tsmodify(WSOLA(256,128,hanning,10), xburst, 1.5)

```

#### Sinusoidal signal

```julia

l = @layout [a b]

p1 = specgram(signal(x, fs); legend=:none, title="original")

p2 = specgram(signal(y, fs); ylabel="", legend=:none, title="time-scale modified")

plot(p1, p2; layout=l)

```

![](docs/images/wsola-cw-spec.png)

```julia

plot(signal(x[1:960], fs); legend=true, label="original")

plot!(signal(y[1:960], fs); legend=true, label="time-scale modified")

```

![](docs/images/swola-cw-time.png)

#### Burst signal

```julia

l = @layout [a b]

p1 = specgram(signal(xburst, fs); legend=:none, title="original")

p2 = specgram(signal(yburst, fs); ylabel="", legend=:none, title="time-scale modified")

plot(p1, p2; layout=l)

```

![](docs/images/wsola-burst-spec.png)

```

plot(signal(xburst, fs); legend=true, label="original")

plot!(signal(yburst, fs); legend=true, label="time-scale modified")

```

![](docs/images/wsola-burst-time.png)

### Phase Vocoder

```julia

y = tsmodify(PhaseVocoder(256,128,hanning,16,false,false,true), x, 1.5)

yburst = tsmodify(PhaseVocoder(256,128,hanning,16,false,false,true), xburst, 1.5)

```

#### Sinusoidal signal

```julia

l = @layout [a b]

p1 = specgram(signal(x, fs); legend=:none, title="original")

p2 = specgram(signal(y, fs); ylabel="", legend=:none, title="time-scale modified")

plot(p1, p2; layout=l)

```

![](docs/images/phasevocoder-cw-spec.png)

```julia

plot(signal(x[1:960], fs); legend=true, label="original")

plot!(signal(y[1:960], fs); legend=true, label="time-scale modified")

```

![](docs/images/phasevocoder-cw-time.png)

#### Burst signal

```julia

l = @layout [a b]

p1 = specgram(signal(xburst, fs); legend=:none, title="original")

p2 = specgram(signal(yburst, fs); ylabel="", legend=:none, title="time-scale modified")

plot(p1, p2; layout=l)

```

![](docs/images/phasevocoder-burst-spec.png)

```

plot(signal(xburst, fs); legend=true, label="original")

plot!(signal(yburst, fs); legend=true, label="time-scale modified")

```

![](docs/images/phasevocoder-burst-time.png)

### Pitch shifting

```julia

xps = pitchshift(WSOLA(256,128,hanning,10), x, 6)

l = @layout [a b]

p1 = specgram(signal(x, fs); legend=:none, title="original")

p2 = specgram(signal(xps, fs); ylabel="", legend=:none, title="pitch-shifted")

plot(p1, p2; layout=l)

```

![](docs/images/pitchshift-wsola-cw-spec.png)

### Time stretching

```julia

xburstts = timestretch(PhaseVocoder(256,128,hanning,16,false,false,true), xburst, 3; fixlen=false)

l = @layout [a b]

p1 = specgram(signal(xburst, fs); legend=:none, title="original")

p2 = specgram(signal(xburstts, fs); ylabel="", legend=:none, title="time-scaled")

plot(p1, p2; layout=l)

```

![](docs/images/timestretch-phasevocoder-burst-spec.png)

## Reference

Driedger J, Müller M., "TSM Toolbox: MATLAB Implementations of Time-Scale Modification Algorithms", In DAFx, pp. 249-256. 2014.