createComment produced "height argument must be a numeric vector" when number is integer

[yb2125]

Expected Behavior

When creating comments using createComment and set height, I used the following code:
writeComment(wb, "sheet1", col = 1, row = 1,
comment = createComment(comment = "test", width = num.com, height = num.hgt)

Actual Behavior

I received the error message "height argument must be a numeric vector"

Steps to Reproduce the Problem

(please attach an example xlsx file if possible)

1. I tried to replace num.hgt with a specific number (e.g., 5) and it worked

2. I tried to convert num.hgt from integer to numeric with following code and it worked
   writeComment(wb, "sheet1", col = 1, row = 1,
   comment = createComment(comment = "test", width = num.com, height = as.numeric(num.hgt))

sessionInfo()

• Version of openxlsx: 4.2.4
• Version of R: 4.0.3