777
range
f:
    4
    primes #(4: factor)
    dup
    group
        length
        3
        =
    t3
    &
}
unlines