vl.markBar()
.data(ufoSightings)
.transform(
vl.filter(`datum.encounterDuration <= ${highOutlierThreshold}`),
vl.calculate('datum.encounterDuration < 30 ? "short" : datum.encounterDuration < 600 ? "medium" : "long"')
.as('encounterOrdinal')
)
.encode(
vl.y().fieldO('encounterOrdinal')
.sort(['short', 'medium', 'long']),
vl.x().count()
)
.render()