      PROGRAM gatheringChildren
      IMPLICIT NONE
      integer(16) :: n
      character(10**5) :: s
      integer(16),allocatable :: ans(:)
      logical,allocatable :: isVisited(:)
      integer(16) :: before,now,cnt,i
      
      read*,s
      n = len_trim( s )
      
      allocate( ans(n),isVisited(n) )
      
      ans = 0
      do i = 1,n
        
        isVisited(:) = .false.
        now = i
        cnt = 0
        isVisited(now) = .true.
        do while( .true. )
          
          cnt = cnt + 1
          before = now
          if( s(now:now)=='R' )then
            now = now + 1
          else
            now = now - 1
          end if
          
          if( isVisited(now) )then
            exit
          end if
          isVisited(now) = .true.
        end do
        
        if( mod(cnt,2)==0 )then
          ans(now) = ans(now) + 1
        else
          ans(before) = ans(before) + 1
        end if
        
      end do
      
      print'(*(i0,x))',ans(1:n)
      
      
      END PROGRAM