AlkuluvussaToistuvaNumero.jl

# n-numeroiset alkuluvut, joissa n-1 peräkkäistä toistuvaa numeroa
# Juhani Kaukoranta 25.5.2021
using Primes
function Toistuvanumero(n)
    # n-numeroiset alkuluvut, joissa n-1 peräkkäistä toistuvaa numeroa
    primestr = string.(primes(10^(n-1),10^n)) # alkuluvut
    lukumaara = length(primestr)
    strn = String[]  # sisältää n-1 kpl samoja numeroita
    for i = 1 : 9
        push!(strn,string(i)^(n-1))
    end
    if n > 2
        println(n,"-numeroiset alkuluvut, joissa ",n-1," peräkkäistä numeroa")
        for i = 1 : lukumaara
            for k = 1 : 9
                if contains(primestr[i],strn[k])
                    println(primestr[i])
                end
            end
        end
    end
end