Look and say sequence in Kotlin

look_and_say_sequence_kotlin_coroutine.kt

fun ant2(count: Int) {
    fun lookAndSay(sequence: Sequence<String>): Sequence<String> {
        return buildSequence {
            var head = '1'
            var count = 0

            sequence.forEach {
                for (c in it) {
                    if (c != head) {
                        yield("$head$count")
                        count = 1
                        head = c
                    } else {
                        count++
                    }
                }
            }
            yield("$head$count")
        }
    }

    var sequence: Sequence<String> = sequenceOf("1")
    val antSeq = buildSequence {
        while (true) {
            yield(sequence)
            sequence = lookAndSay(sequence)
        }
    }

    antSeq.take(count).last().forEach(::print)
    println()
}