2023-11-12 18:20:31 +01:00
|
|
|
include("./readyalefaces_to_tensor.jl")
|
|
|
|
|
|
2023-11-05 21:28:07 +01:00
|
|
|
using Plots, Plots.PlotMeasures, ColorSchemes
|
|
|
|
|
|
|
|
|
|
(X, _) = readyalefaces_to_tensor()
|
|
|
|
|
# X = X[:,:,1:4,[12,9,6,1]]; # filters out only some faces
|
|
|
|
|
(w, h, expr, ind) = size(X)
|
|
|
|
|
|
|
|
|
|
function showyalefaces()::Plots.Plot
|
|
|
|
|
plts = Array{Plots.Plot}(undef, expr, ind)
|
|
|
|
|
|
|
|
|
|
for i ∈ 1:expr
|
|
|
|
|
for j ∈ 1:ind
|
|
|
|
|
plts[i, j] = heatmap(X[:, :, i, j],
|
|
|
|
|
leg = false,
|
|
|
|
|
ticks = nothing,
|
|
|
|
|
yflip=true,
|
|
|
|
|
c = cgrad(:dense, rev = true)
|
|
|
|
|
)
|
|
|
|
|
end
|
|
|
|
|
end
|
|
|
|
|
|
|
|
|
|
l = @layout [
|
|
|
|
|
grid(ind, expr)
|
|
|
|
|
]
|
|
|
|
|
|
|
|
|
|
plot(plts..., layout = l, margin = -2mm)
|
|
|
|
|
end
|
