JuliaAnalysisPlotter.jl

function JuliaAnalysisPlotter(plotID)
    # Setting Enviorment Parameters
    generateImages = 1
    saveImages = 1


    # Loading Data
    tRunTimeMatlab = readdlm(joinpath("RunTimeData", "RunTimeMatlabTable.csv"),',',)
    mRunTimeMatlab = tRunTimeMatlab[2:end, 2:end]
    vMatrixSizeMatlab = tRunTimeMatlab[1, 2:end]
    sFunNameMatlab = tRunTimeMatlab[2:end, 1]

    tRunTimeJulia = readdlm(joinpath("RunTimeData", "RunTimeJuliaopenblas64Table.csv"),',',)
    mRunTimeJulia = tRunTimeJulia[2:end, 2:end]
    vMatrixSizeJulia = tRunTimeJulia[1, 2:end]
    sFunNameJulia = tRunTimeJulia[2:end, 1]

    tRunTimeJuliaSIMD = readdlm(joinpath("RunTimeData", "RunTimeJuliaopenblas64SIMDTable.csv"),',',)
    mRunTimeJuliaSIMD = tRunTimeJuliaSIMD[2:end, 2:end]
    vMatrixSizeJuliaSIMD = tRunTimeJuliaSIMD[1, 2:end]
    sFunNameJuliaSIMD = tRunTimeJuliaSIMD[2:end, 1]

    tRunTimeJuliaThreads4 = readdlm(joinpath("RunTimeData", "RunTimeJuliaopenblas64Table_4Thread.csv"),',',)
    mRunTimeJuliaThreads4 = tRunTimeJuliaThreads4[2:end, 2:end]
    vMatrixSizeJuliaThreads4 = tRunTimeJuliaThreads4[1, 2:end]
    sFunNameJuliaThreads4 = tRunTimeJuliaThreads4[2:end, 1]

    tRunTimeJuliaSIMDThreads4 = readdlm(joinpath("RunTimeData", "RunTimeJuliaopenblas64SIMDTable_4Thread.csv"),',',)
    mRunTimeJuliaSIMDThreads4 = tRunTimeJuliaSIMDThreads4[2:end, 2:end]
    vMatrixSizeJuliaSIMDThreads4 = tRunTimeJuliaSIMDThreads4[1, 2:end]
    sFunNameJuliaSIMDThreads4 = tRunTimeJuliaSIMDThreads4[2:end, 1]

    tRunTimeJuliamkl = readdlm(joinpath("RunTimeData", "RunTimeJuliamklTable.csv"),',',)
    mRunTimeJuliamkl = tRunTimeJuliamkl[2:end, 2:end]
    vMatrixSizeJuliamkl = tRunTimeJuliamkl[1, 2:end]
    sFunNameJuliamkl = tRunTimeJuliamkl[2:end, 1]

    tRunTimeJuliamklSIMD = readdlm(joinpath("RunTimeData", "RunTimeJuliamklSIMDTable.csv"),',',)
    mRunTimeJuliamklSIMD = tRunTimeJuliamklSIMD[2:end, 2:end]
    vMatrixSizeJuliamklSIMD = tRunTimeJuliamklSIMD[1, 2:end]
    sFunNameJuliamklSIMD = tRunTimeJuliamklSIMD[2:end, 1]

    folderName=join(plotID,"_")

    if ~isdir(joinpath("Figures", "JuliaGenerated",folderName))
        mkdir(joinpath("Figures", "JuliaGenerated",folderName))
    end

    # Displaying Results
    ii = 1
    for fun in sFunNameMatlab

        plotVect=Any[]
        plotVectSIMD=Any[]
        plotLabels=Any[]
        plotLabelsSIMD=Any[]

        if  any(occursin.("Matlab", plotID))
            push!(plotVect,mRunTimeMatlab[ii, :])
            push!(plotLabels,"MATLAB")
        end
        if  any(occursin.("Julia-1-BLAS-Thread", plotID))
            push!(plotVect,mRunTimeJulia[ii, :])
            push!(plotLabels,"Julia-1-BLAS-Thread")
        end
        if  any(occursin.("Julia-4-BLAS-Threads", plotID))
            push!(plotVect,mRunTimeJuliaThreads4[ii, :])
            push!(plotLabels,"Julia-4-BLAS-Threads")
        end
        if  any(occursin.("Julia-MKL", plotID))
            push!(plotVect,mRunTimeJuliamkl[ii, :])
            push!(plotLabels,"Julia-MKL")
        end

        plt = plot(
            vMatrixSizeMatlab,
            plotVect,
            labels = plotLabels,
            legend = :bottomright,
            markershape = :auto,
            markersize = 2,
            xlabel = "Matrix Size",
            ylabel = "Run Time  [micro Seconds]",
            guidefontsize = 10,
            title = "$fun",
            titlefontsize = 10,
            xscale = :log10,
            yscale = :log10,
            dpi = 300
        )

        plotJuliaSIMD = occursin.(fun, sFunNameJuliamklSIMD) # if 1 will plot Julia-SIMD
        if any(plotJuliaSIMD)

            if  any(occursin.("Julia-SIMD-1-BLAS-Thread", plotID))
                push!(plotVectSIMD,dropdims(mRunTimeJuliaSIMD[plotJuliaSIMD, :], dims = 1))
                push!(plotLabelsSIMD,"Julia-SIMD-1-BLAS-Thread")
            end
            if  any(occursin.("Julia-SIMD-4-BLAS-Threads", plotID))
                push!(plotVectSIMD,dropdims(mRunTimeJuliaSIMDThreads4[plotJuliaSIMD, :], dims = 1))
                push!(plotLabelsSIMD,"Julia-SIMD-4-BLAS-Threads")
            end
            if  any(occursin.("Julia-MKL-SIMD", plotID))
                push!(plotVectSIMD,dropdims(mRunTimeJuliamklSIMD[plotJuliaSIMD, :], dims = 1))
                push!(plotLabelsSIMD,"Julia-MKL-SIMD")
            end

            if ~isempty(plotLabelsSIMD)
            plt=plot!(
                vMatrixSizeJuliamklSIMD,
                plotVectSIMD,
                labels = [plotLabels;plotLabelsSIMD],
            )

            end

        end
        display(plt) # display in plot pane
        if (saveImages == 1)
            savefig(joinpath("Figures", "JuliaGenerated", folderName, "Figure$(ii).png"))
        end

        ii = ii + 1
    end

    nothing
end