'Return the region R1 that is used by the Scandinavian stemmers.
R1 is the region after the first non-vowel following a vowel,
or is the null region at the end of the word if there is no
such non-vowel. But then R1 is adjusted so that the region
before it contains at least three letters.
:param word: The word whose region R1 is determined.
:type word: str or unicode
:param vowels: The vowels of the respective language that are
used to determine the region R1.
:type vowels: unicode
:return: the region R1 for the respective word.
:rtype: unicode
:note: This helper method is invoked by the respective stem method of
the subclasses DanishStemmer, NorwegianStemmer, and
SwedishStemmer. It is not to be invoked directly!'

def _r1_scandinavian(self, word, vowels):

    r1 = u''
    for i in range(1, len(word)):
        if ((word[i] not in vowels) and (word[(i - 1)] in vowels)):
            if ((len(word[:(i + 1)]) < 3) and (len(word[:(i + 1)]) > 0)):
                r1 = word[3:]
            elif (len(word[:(i + 1)]) >= 3):
                r1 = word[(i + 1):]
            else:
                return word
            break
    return r1
