From SpeechWiki
(Difference between revisions)
|
|
(10 intermediate revisions not shown) |
Line 9: |
Line 9: |
| | | |
| Bowon | | Bowon |
- | <br><br><u style="display:none;">[http://generic-viagra-online.jot.com/WikiHome/index.html Generic viagra online]
| + | |
- | [http://generic-viagra-online.jot.com/WikiHome/Buy-generic-viagra-online.html Buy generic viagra online]
| + | |
- | [http://generic-viagra-online.jot.com/WikiHome/Buy-cheap-generic-viagra-online.html Buy cheap generic viagra online]
| + | |
- | [http://generic-viagra-online.jot.com/WikiHome/Cheap-generic-viagra-online.html Cheap generic viagra online]
| + | |
- | [http://generic-viagra-online.jot.com/WikiHome/Generic-online-pharmacy-viagra.html Generic online pharmacy viagra]
| + | |
- | [http://generic-viagra-online.jot.com/WikiHome/Generic-online-order-viagra.html Generic online order viagra]</u>
| + | |
| | | |
| ==Dynamic Stop Herest== | | ==Dynamic Stop Herest== |
Line 57: |
Line 52: |
| print " herest iterated $itCounter times, eps = ".($nextAvgProb-$lastAvgProb)."\n"; | | print " herest iterated $itCounter times, eps = ".($nextAvgProb-$lastAvgProb)."\n"; |
| ecsystem("mv -v $modelDir/tmp/* $out"); | | ecsystem("mv -v $modelDir/tmp/* $out"); |
- | } | + | }</pre> |
| | | |
- | #error checking system call. dies if called program fails.
| + | = See also = |
- | sub ecsystem{
| + | *[[Htk-group blog]] |
- | system($_[0]);
| + | *[[Train.sh]] |
- | confess( "\nprogram failed with $?") if $?;
| + | |
- | return $?;
| + | |
- | }
| + | |
- | </pre>
| + | |
- | [[User:Arthur|Arthur]] 21:45, 14 January 2006 (CST)
| + | |
- | 8081385342654808751883
| + | |
- | <br><br><u style="display:none;"> <br><br><u style=\"display:none;\">[http://caras.jot.com/WikiHome/index.html Buy celebrex online]
| + | |
- | [http://caras.jot.com/WikiHome/Buy-generic-celebrex.html Buy generic celebrex] | + | |
- | [http://caras.jot.com/WikiHome/Buy-cheap-celebrex.html Buy cheap celebrex] | + | |
- | [http://caras.jot.com/WikiHome/Buy-celebrex-drug.html Buy celebrex drug]
| + | |
- | [http://homeclub.jot.com/WikiHome/index.html Buy cialis] | + | |
- | [http://homeclub.jot.com/WikiHome/Buy-cialis-online.html Buy cialis online] | + | |
- | [http://homeclub.jot.com/WikiHome/Buy-cialis-uk.html Buy cialis uk]
| + | |
- | [http://homeclub.jot.com/WikiHome/Buy-cialis-generic.html Buy cialis generic]
| + | |
- | [http://homeclub.jot.com/WikiHome/Buy-cialis-generic-online.html Buy cialis generic online]
| + | |
- | [http://homeclub.jot.com/WikiHome/Buy-tadalafil-cialis.html Buy tadalafil cialis]
| + | |
- | [http://huyase.jot.com/WikiHome/index.html Buy levitra]
| + | |
- | [http://huyase.jot.com/WikiHome/Buy-levitra-online.html Buy levitra online]
| + | |
- | [http://huyase.jot.com/WikiHome/Buy-levitra-vardenafil.html Buy levitra vardenafil]
| + | |
- | [http://huyase.jot.com/WikiHome/Buy-levitra-uk.html Buy levitra uk]
| + | |
- | [http://huyase.jot.com/WikiHome/Buy-levitra-generic.html Buy levitra generic]
| + | |
- | [http://udaff.jot.com/WikiHome/index.html Buy neurontin ]
| + | |
- | [http://udaff.jot.com/WikiHome/Neurontin-side-effects.html Neurontin side effects]
| + | |
- | [http://udaff.jot.com/WikiHome/Neurontin-lawsuit.html Neurontin lawsuit]
| + | |
- | [http://udaff.jot.com/WikiHome/Neurontin.html Neurontin]</u></u>
| + | |
- | <br><br><u style="display:none;">[http://mdaa.jot.com/WikiHome/index.html Paxil]
| + | |
- | [http://mdaa.jot.com/WikiHome/Paxil-side-effects.html Paxil side effects]
| + | |
- | [http://mdaa.jot.com/WikiHome/Paxil-cr.html Paxil cr]
| + | |
- | [http://mdaa.jot.com/WikiHome/Buy-paxil.html Buy paxil]
| + | |
- | [http://mdaa.jot.com/WikiHome/Paxil-withdrawal.html Paxil withdrawal]
| + | |
- | [http://mdaa.jot.com/WikiHome/Paxil-online.html Paxil online]
| + | |
- | [http://mdaa.jot.com/WikiHome/Paxil-weight-gain.html Paxil weight gain]
| + | |
- | [http://mdaa.jot.com/WikiHome/Paxil-withdrawal-symptom.html Paxil withdrawal symptom]</u>
| + | |
Latest revision as of 22:09, 20 June 2008
Mini Course Video
Part of the HTK Lecture video is currently available.
As of 4:21 p.m. 01/13/2006, part 1 of lecture 1 can be obtained at
http://mickey.ifp.uiuc.edu/speech/HTK/
I will post the rest of the lecture videos during this weekend.
Bowon
Dynamic Stop Herest
Here's a perl routine that runs HERest until likelihood improvement falls below some threshold:
example:
herest("HERest -T 1 -A -D -S $modelDir/timitPLP.scp -I $modelDir/timitCMUPLP.mlf -t 250.0 150.0 1000.0 $modelDir/CMUphonebet.txt","$modelDir/timitMonophonesHRest.hdf", "$modelDir/timitMonophonesHERest1.hdf", .01);
code:
#assumes $modelDir/tmp dir exists, assumes that $in and $out are files
#run until improvment is less than eps
#Arguments:
#1 The HERest command. It must not have the -H and the -M flags - those are added by herest().
#2 The name of the 'In' MMF-file -what normally goes after the -H flag
#3 The name of the final 'Out' MMF-file -what normally goes after the -M flag
#4 The improvement likelihood (not log-likelihood) threshold
sub herest{
(my $cmd, my $in, my $out, my $eps) = @_;
(my $lastAvgProb, my $nextAvgProb, my $itCounter) = (-1,-1,0);
#run it once
my @cmdList = split(/ /, $cmd);
my $hmmList = pop @cmdList;
push @cmdList, ("-H", $in, "-M ", "$modelDir/tmp", $hmmList, " | grep '^[^ ].*' | tee $modelDir/herest.log");
ecsystem(join(' ',@cmdList));
my $getProbCmd = "cat $modelDir/herest.log | grep Reestimation | " . 'sed \'s/.*frame = \(.*\)$/\1/\'';
$nextAvgProb = `$getProbCmd`;
$itCounter++;
#run it a few more times
$cmdList[-5]="$modelDir/tmp/*";
my $iterCmd = join(' ',@cmdList);
while ($nextAvgProb-$lastAvgProb > $eps){
$lastAvgProb = $nextAvgProb;
ecsystem($iterCmd);
$nextAvgProb = `$getProbCmd`;
$itCounter++;
}
print " herest iterated $itCounter times, eps = ".($nextAvgProb-$lastAvgProb)."\n";
ecsystem("mv -v $modelDir/tmp/* $out");
}
See also