'Compressing' a 1 bar full bar rest

[Jacques Menu]

Hello folks,

I’d like to show that explicitly with a number, i.e. to have a ‘1’ above 
measure 2 in this example:

\version "2.19.83"

{
  \time 4/4
  \compressFullBarRests
  
  R1*2 |
  R1*1 |
  c' |
}
  

How can that be achieved?
Thanks for your help!

JM