commute stats: attempt to weed out non-work stations for auto-fill
This commit is contained in:
parent
5ce4bc6995
commit
346f1474bb
1 changed files with 8 additions and 0 deletions
|
@ -534,6 +534,14 @@ sub commute {
|
|||
elsif ( $dep->dow <= 5 and $dep->hour > 12 ) {
|
||||
$candidate_count{ $journey->{from_name} }++;
|
||||
}
|
||||
else {
|
||||
# Avoid selecting an intermediate station for multi-leg commutes.
|
||||
# Assumption: The intermediate station is also used for private
|
||||
# travels -> penalize stations which are used on weekends or at
|
||||
# unexpected times.
|
||||
$candidate_count{ $journey->{from_name} }--;
|
||||
$candidate_count{ $journey->{to_name} }--;
|
||||
}
|
||||
}
|
||||
$station = max_by { $candidate_count{$_} } keys %candidate_count;
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue