Waffle chart with 2 categories and raw counts fills out final column with a mysterious 3rd category of made up data

[chhamso]

Trying to make a waffle chart of raw counts and only two categories. For some reason it makes up enough counts of a mysterious 3rd category to fill out the final column. With three or more categories the final column is partially filled as I intend. how do I make this work with just two categories?

Stack Overflow link - https://stackoverflow.com/questions/63624502/waffle-chart-with-2-categories-and-raw-counts-fills-out-final-column-with-a-myst

repro

library(waffle)

test2 <- c(`Group A`= 40, `Group B`= 33)
test3 <- c(`Group A`= 40, `Group B`= 33, `Group c` =10)

#test2 fails, test3 works as intended
waffle(test2)  
waffle(test3)

Images below. top image is what I get. Bottom image is what I want but with one less category.

[chhamso]

Close
See answer in stack overflow
Stack Overflow link - https://stackoverflow.com/questions/63624502/waffle-chart-with-2-categories-and-raw-counts-fills-out-final-column-with-a-myst

library(waffle)

test2 <- c(`Group A`= 40, `Group B`= 33)

waffle(test2, title = "Historical Benchmark Composition", colors = c(RColorBrewer::brewer.pal(3, "Set2")[1:2]))