# Segmentliste v.s = emu.query("florian", "*", "phonetic=i:|u:|a:") # Label-Vektor v.l = label(v.s) # Spektrale Trackdatei v.dft = emu.track(v.s, "dft") # Spektra zum zeitlichen Mittelpunkt sp = dcut(v.dft, .5, prop=T) # Abbildung plot(sp[,0:3000], v.l, xlab="Frequenz (Hz)", ylab="Intensitaet (dB)")