I had previously adopted the code of the user [mara] from here
which was working fine.
However, it seems that R has started to throw an error:
Error in axes$y$left[]$children$axis$grobs[[lab_idx]] :
attempt to select less than one element in get1index
I had tried on different versions, different operating systems, reinstalling packages etc.., but no luck.
Can anyone please advice what to do?