aviatesk

aviatesk

# %% defines
function isabranch(numsary)
    s = 0
    for (n1, n2) ∈ numsary
        if n1 isa Int8 && n2 isa Int8
            s += 1
        elseif n1 isa Int8 && n2 isa Int16
            s += 2
        elseif n1 isa Int8 && n2 isa Int32
            s += 3

aviatesk

aviatesk

(q = :(println("(q = $(repr(q))) |> eval"))) |> eval

aviatesk

const ACS = Union{AbstractChar, AbstractString}
(l::ACS)(f::Function, rs::ACS...) = f(l, rs...)
(l::ACS)(rs::ACS...) = l(*, rs...)

'1'("23")                                # "123"
']' .|> collect("julia") .|> '[' |> join # "[j][u][l][i][a]"

aviatesk

using MacroTools


function decompose_forblk(forblk)
    spec, body = forblk.args
    i, itr = spec.args
    return i, itr, body
end

"""

aviatesk

{"version":1,"resource":"file:///Users/aviatesk/IoPLMaterials/textbook/interpreter/dune-project","entries":[{"id":"VJTx","timestamp":1652783352000},{"id":"6qkI","timestamp":1652783387886}]}

aviatesk

using DataFrames, DataFramesMeta, Plots, StatsPlots, StatsBase

# HACK:
# integrate StatsPlots.@df into @linq chain in a way data frame keeps to be passed even after plot
# but, the `names` part might be too dangerous
for n in names(StatsPlots)
    function DataFramesMeta.linq(::DataFramesMeta.SymbolParameter{n}, d, args...)
        plotcall = Expr(:call, n, args...)
        return quote let d = $d
            display(@df d $plotcall)

aviatesk

# what I will do here:
# - dataframe chain
# - keep to pass dataframe while plotting with `StatsPlots.@df`
# - pass columns names as variables

using DataFrames, Pipe, StatsPlots
theme(:juno)


df = DataFrame(x = randn(100), y = rand(Int, 100))

aviatesk

function decompose_forblk(forblk)
    @assert Meta.isexpr(forblk, :for) "for block expression should be given"
    itrspec, body = forblk.args
    @assert Meta.isexpr(itrspec, :(=)) "invalid for loop specification"
    v, itr = itrspec.args
    return body, v, itr
end

function recompose_to_comprehension(forblk, cond = nothing; gen = false)
    body, v, itr = decompose_forblk(forblk)