chart_Series candlesticks cutting off title and Y-axis for short timeseries

[helgasoft]

Title (or 'name') and right-side Y-axis labels are trimmed when timeseries are shorter than ~10 days.

library(quantmod)
getSymbols('IBM', from=Sys.Date()-15)
chart_Series(tail(IBM,7))   # << change the number to see trimming effect

It's even more pronounced in the Rstudio Zoom display.
If the cause is candlestick width made proportional to the number of days, then limiting the width to max 1/15 of X-axis length could fix it.