A Shiny version (in a basic way) of one vote, two vote, red vote, blue vote