Praat editor script for getting average values of the first three formants for the selected segment

getAveragedFormants.praat

Extract selected sound (time from 0)
endeditor
duration = Get total duration
writeInfoLine: fixed$ (duration, 3)
# Replace 5000 with 5500 for female voice.
# You may need to tweak the number of formants (2nd parameter) based on
# your data. Sometimes, if two formants are close to each other,
# it is necessary to ask for 6 formants so that they may be decoupled.
# In other cases, however, this may introduce spurious formants, and
# it is always advisable to check both the spectrogram and
# formant plot produced by the Draw command in the Object window
# (or by measureAndPlotFormants.praat).
To Formant (burg): 0, 5, 5000, 0.05, 50
for i from 1 to 3
	f_i = Get mean: i, 0.0, 0.0, "Hertz"
	appendInfoLine: f_i
endfor
removeObject: "Sound untitled"
removeObject: "Formant untitled"