How to do a human infographic (waffle plot) considering decimal values? (e.g., have human icon with two colors)

Question

I have been strugglig with a waffle plot with human icon using R, where my data has decimal values. (I based my code in this link: https://www.listendata.com/2019/06/create-infographics-with-r.html) So, I want to plot 100 human, where 97.5 will be black and 2.5 will be blue.

For that, I do the following code:

waffle(
  c(`No-disease` =97.5, 
    `Disease` = 2.5), rows = 10, colors = c("black", "blue"),
  use_glyph = "female", glyph_size = 10 ,title = 'Percentage of disease', legend_pos="bottom"
)

I get this:

enter image description here

But my goal would be this:

enter image description here

Thank's in advance.