Importe y exporte archivos Ogg Vorbis 

Ogg Vorbis es un esquema de compresión con pérdida usado comúnmente para la transmisión de audio de consumo, almacenaje, transferencia y reproducción, que también puede ser usado en la web.

Importe un archivo Ogg Vorbis.

In[1]:=

X Import["ExampleData/drums.ogg"]

Out[1]=

Exporte a Ogg Vorbis para almacenaje más compacto.

In[2]:=

X snd = ExampleData[{"Sound", "Apollo11PhoneCall"}]

Out[2]=

In[3]:=

X Grid[{# , Quantity[N@FileByteCount[Export["file." <> #, snd]]/2^10, "Kilobytes"]} & /@ {"wav", "ogg"}, Frame -> All, ItemStyle -> Directive[FontFamily -> "Verdana"], Dividers -> {{True, Thickness[2]}, Automatic}]

Out[3]=

Distintos niveles de compresión pueden ser usados cuando se exporta a Ogg Vorbis. Niveles más altos de compresión producen archivos más pequeños pero pueden distorsionar la calidad de sonido.

In[4]:=

X t = Table[{l, N@FileByteCount[Export["file.ogg", snd, "CompressionLevel" -> l]]/ 2^10}, {l, 0, 1, .02}];

In[5]:=

X ListLinePlot[t, Frame -> True, FrameLabel -> {"Ogg Vorbis compression level", "kB"}, ImageSize -> 300, PlotRange -> All, PlotStyle -> AbsoluteThickness[3], LabelStyle -> Bold]

Out[5]=