www.matheraum.de
Das Matheforum.
Das Matheforum des MatheRaum.

Für Schüler, Studenten, Lehrer, Mathematik-Interessierte.
Hallo Gast!einloggen | registrieren ]
Startseite · Forum · Wissen · Kurse · Mitglieder · Team · Impressum
Forenbaum
^ Forenbaum
Status Mathe
  Status Schulmathe
    Status Primarstufe
    Status Mathe Klassen 5-7
    Status Mathe Klassen 8-10
    Status Oberstufenmathe
    Status Mathe-Wettbewerbe
    Status Sonstiges
  Status Hochschulmathe
    Status Uni-Analysis
    Status Uni-Lin. Algebra
    Status Algebra+Zahlentheo.
    Status Diskrete Mathematik
    Status Fachdidaktik
    Status Finanz+Versicherung
    Status Logik+Mengenlehre
    Status Numerik
    Status Uni-Stochastik
    Status Topologie+Geometrie
    Status Uni-Sonstiges
  Status Mathe-Vorkurse
    Status Organisatorisches
    Status Schule
    Status Universität
  Status Mathe-Software
    Status Derive
    Status DynaGeo
    Status FunkyPlot
    Status GeoGebra
    Status LaTeX
    Status Maple
    Status MathCad
    Status Mathematica
    Status Matlab
    Status Maxima
    Status MuPad
    Status Taschenrechner

Gezeigt werden alle Foren bis zur Tiefe 2

Navigation
 Startseite...
 Neuerdings beta neu
 Forum...
 vorwissen...
 vorkurse...
 Werkzeuge...
 Nachhilfevermittlung beta...
 Online-Spiele beta
 Suchen
 Verein...
 Impressum
Das Projekt
Server und Internetanbindung werden durch Spenden finanziert.
Organisiert wird das Projekt von unserem Koordinatorenteam.
Hunderte Mitglieder helfen ehrenamtlich in unseren moderierten Foren.
Anbieter der Seite ist der gemeinnützige Verein "Vorhilfe.de e.V.".
Partnerseiten
Mathe-Seiten:Weitere Fächer:

Open Source FunktionenplotterFunkyPlot: Kostenloser und quelloffener Funktionenplotter für Linux und andere Betriebssysteme
StartseiteMatheForenMathematicaWAV Sound bearbeiten
Foren für weitere Schulfächer findest Du auf www.vorhilfe.de z.B. Deutsch • Englisch • Französisch • Latein • Spanisch • Russisch • Griechisch
Forum "Mathematica" - WAV Sound bearbeiten
WAV Sound bearbeiten < Mathematica < Mathe-Software < Mathe < Vorhilfe
Ansicht: [ geschachtelt ] | ^ Forum "Mathematica"  | ^^ Alle Foren  | ^ Forenbaum  | Materialien

WAV Sound bearbeiten: Aufgabe
Status: (Frage) reagiert/warte auf Reaktion Status 
Datum: 13:39 So 23.12.2012
Autor: belle

Aufgabe
Wie wird eine WAV importiert, so das man an den
Abtastwerten arbeiten und den sound dann wieder als WAV
exportieren kann?

WAV-Sound-Object Manipulation

Eine WAV-Sound-Datei wird importiert. (tuba)
Zum Einen wird das abspielbare Audio importiert und
zum Zweiten die Abtastsignale (tubadat).
Das originale Audio kann abgespielt werden.

An den Daten sollen Veränderungen vorgenommen
werden. (passiert erstmal nicht, da die Fage hier nur
den Import und Export des WAV behandelt).
Mit ListPlay jetzt die Daten abspielen.
Nach einer noch zu erfolgenden Bearbeitung sollen die
Daten dieses Audios wieder als WAV-Sound gespeichert
werden.

Wie man im Diagramm und beim Abspielen von tubadat
sieht und hört, ist der als Data importierte Sound
bereits sehr verzerrt. (Obwohl ja noch nichts
verändert worden ist)

tuba = ExampleData[{"Sound", "Tuba"}]
tubadat = ExampleData[{"Sound", "Tuba"}, "Data"]
ListPlay[tubadat, SampleRate -> 22050]
Export["TubaDat.txt", tubadat];


Wie wird eine WAV importiert, so das man an den
Abtastwerten arbeiten und den sound dann wieder als
WAV speichern kann?

        
Bezug
WAV Sound bearbeiten: Antwort auf abgelaufene Frage
Status: (Antwort) fertig Status 
Datum: 21:08 Mi 30.01.2013
Autor: hieron

tuba = ExampleData[{"Sound", "Tuba"}]
tubadat = ExampleData[{"Sound", "Tuba"}, "Data"]
(* Option PlayRange richtig angeben damit die Amplituden nicht [mm] \ [/mm]
"abgeschnitten" werden, daher das "Knistern" *)

(* Beispiel1: kein Knistern *)
ListPlay[tubadat, SampleRate -> 22050, PlayRange -> {-1, 1}]

(* Beispiel2: kein Knistern und tiefer *)
ListPlay[tubadat, SampleRate -> 11025, PlayRange -> All]

(* Beispiel3: mit Knistern *)
ListPlay[tubadat, SampleRate -> 11025, PlayRange -> Automatic]





(* export + import *)
mytuba = ListPlay[tubadat, SampleRate -> 22050, PlayRange -> All]
Export["tuba.wav", mytuba]

Import["tuba.wav"]

(* oder als Daten importieren, grosses file!!! *)
Import["tuba.wav", "Data"]


(* ins "richtige" verzeichnis exportieren *)
(* aktuelles notebookVerzeichnis + dateiName *)
filename = FileNameJoin[{NotebookDirectory[], "mysound.wav"}]
(* dann exportieren *)
Export[filename, mytuba]
Import[filename]

lg hieron

Bezug
Ansicht: [ geschachtelt ] | ^ Forum "Mathematica"  | ^^ Alle Foren  | ^ Forenbaum  | Materialien


^ Seitenanfang ^
www.matheforum.net
[ Startseite | Forum | Wissen | Kurse | Mitglieder | Team | Impressum ]